# -*- coding: utf-8 -*-

# Copyright 2005 - 2007 Harri Pitkänen (hatapitk@iki.fi)

# Functions and data for Joukahainen -> Suomi-malaga converter

# This program is free software; you can redistribute it and/or modify

# it under the terms of the GNU General Public License as published by

# the Free Software Foundation; either version 2 of the License, or

# (at your option) any later version.

#

# This program is distributed in the hope that it will be useful,

# but WITHOUT ANY WARRANTY; without even the implied warranty of

# MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the

# GNU General Public License for more details.

#

# You should have received a copy of the GNU General Public License

# along with this program; if not, write to the Free Software

# Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, MA  02110-1301  USA

# Hannu Väisänen has added some inflection types.

import re

grads = [ (u'sw', u'tt', u'av1'),

	(u'sw', u'pp', u'av1'),

	(u'sw', u'kk', u'av1'),

	(u'sw', u'mp', u'av1'),

	(u'sw', u'p', u'av1'),

	(u'sw', u'nt', u'av1'),

	(u'sw', u'lt', u'av1'),

	(u'sw', u'rt', u'av1'),

	(u'sw', u't', u'av1'),

	(u'sw', u'nk', u'av1'),

	(u'sw', u'uku', u'av1'),

	(u'sw', u'yky', u'av1'),

	(u'ws', u'b', u'av2'),

	(u'ws', u'g', u'av2'),

	(u'ws', u't', u'av2'),

	(u'ws', u'p', u'av2'),

	(u'ws', u'k', u'av2'),

	(u'ws', u'mm', u'av2'),

	(u'ws', u'v', u'av2'),

	(u'ws', u'nn', u'av2'),

	(u'ws', u'll', u'av2'),

	(u'ws', u'rr', u'av2'),

	(u'ws', u'd', u'av2'),

	(u'ws', u'ng', u'av2'),

	(u'sw', u'k>j', u'av3'),

	(u'ws', u'j>k', u'av4'),

	(u'sw', u'k>', u'av5'),

	(u'ws', u'>k', u'av6')   ]

# Joukahainen word classes

SUBST = 1

ADJ = 2

VERB = 3

modern_classmap = [(u'valo', u'sw', [(None,u'(.*)',u'valo'),

			(u'k>',u'(ko)ko',u'koko'),

			(u'k>',u'(.*uo)ko',u'ruoko'),

			(u'kk',u'(.*k)kU',u'alku'),

			(u'uku',u'(.*U)kU',u'luku'),

			(u'k>',u'(..U)kU',u'tiuku'),

			(u'k>',u'(.*)kU',u'alku'),

			(u'lt',u'(.*l)tO',u'aalto'),

			(u'nt',u'(.*n)tO',u'anto'),

			(u'nt',u'(.*n)tU',u'lintu'),

			(u'nk',u'(.*n)kO',u'hanko'),

			(u'tt',u'(.*t)tU',u'hattu'),

			(u'tt',u'(.*t)tO',u'liitto'),

			(u'nk',u'(.*n)kU',u'hinku'),

			(u'pp',u'(.*p)pU',u'hoppu'),

			(u'rt',u'(.*r)tO',u'kaarto'),

			(u'pp',u'(.*p)pO',u'kippo'),

			(u'mp',u'(.*m)pO',u'sampo'),

			(u'mp',u'(.*m)pU',u'kumpu'),

			(u't',u'(.*)tU',u'laatu'),

			(u'p',u'(.*)pU',u'apu'),

			(u'p',u'(.*)pO',u'lepo'),

			(u't',u'(.*)tO',u'leuto'),

			(u'kk',u'(.*k)kO',u'verkko'),

			(u'k>',u'(.*h)kO',u'vihko'),

			(u'k>',u'(.*)kO',u'verkko')   ]),

	(u'arvelu', u'sw', [(None,u'(.*Ce[lr])O',u'hontelo',[ADJ]),

			(None,u'(.*)',u'arvelu'),

			(u'nk',u'(.*n)kO',u'alanko'),

			(u'nt',u'(.*n)tO',u'avanto'),

			(u'kk',u'(.*k)kO',u'laatikko'),

			(u'tt',u'(.*t)tO',u'pihatto'),

			(u'tt',u'(.*t)tU',u'raamattu') ]),

	(u'autio', u'-', [(None,u'(.*)',u'autio')]),

	(u'kiiski', u'-', [(None,u'(.*)i',u'kiiski')]),

	(u'siisti', u'-', [(None,u'(.*)i',u'siisti')]),

	(u'risti', u'sw', [(None,u'(.*)i',u'risti'),

			(u'pp',u'(pop)pi',u'pop'),

			(u'pp',u'(.*p)pi',u'keppi'),

			(u'lt',u'(.*l)ti',u'pelti'),

			(u'nk',u'(.*n)ki',u'renki'),

			(u'kk',u'(punk)ki',u'punk'),

			(u'kk',u'(.*k)ki',u'takki'),

			(u'tt',u'(.*t)ti',u'tatti'),

			(u'nt',u'(.*n)ti',u'tunti'),

			(u'p',u'(.*)pi',u'hupi'),

			(u't',u'(.*)ti',u'vati'),

			(u'k>',u'(.*)ki',u'takki')]),

	(u'paperi', u'sw', [(None,u'(.*)i',u'paperi'),

			(u'nt',u'(.*n)ti',u'hollanti'),

			(u'nk',u'(.*n)ki',u'killinki'),

			(u'kk',u'(.*k)ki',u'kajakki'),

			(u'tt',u'(.*t)ti',u'salaatti'),

			(u'pp',u'(.*p)pi',u'sinappi'),

			(u't',u'(.*)ti',u'konvehti') ]),

	(u'edam', u'-', [(None,u'(.*C)',u'edam')]),

	(u'kalsium', u'-', [(None,u'(.*)i',u'fan'),

			 (None,u'(.*)',u'kalsium')]),

	(u'lovi', u'sw',   [(None,u'(.*)i',u'lovi'),

			(u'nk',u'(.*n)ki',u'hanki'),

			(u'pp',u'(.*p)pi',u'happi'),

			(u'mp',u'(.*lam)pi',u'lampi'),

			(u'mp',u'(.*m)pi',u'sampi'),

			(u'kk',u'(.*k)ki',u'kaikki'),

			(u'k>j',u'(.*)ki',u'kylki'),

			(u't',u'(.*lah)ti',u'lahti'),

			(u't',u'(.*h)ti',u'lehti'),

			(u'p',u'(.*)pi',u'siipi'),

			(u'k>',u'(.*i)ki',u'piki'),

			(u'k>',u'(.*)ki',u'kaikki')]),

	(u'toholampi', u'-', [(None,u'(.*lam)pi',u'toholampi')]),

	(u'suksi', u'-', [(None,u'(.*u)ksi',u'suksi')]),

	(u'veli', u'-', [(None,u'(.*el)i',u'veli')]),

	(u'nalle', u'sw', [(None,u'(.*Ce)',u'nalle'),

			 (None,u'(.*Cé)',u'nalle'),

		         (None,u'(.*[iu]e)',u'nalle'),

		         (u'tt',u'(.*t)te',u'atte'),

		         (u'kk',u'(.*k)ke',u'nukke')]),

	(u'kala', u'sw',   [(None,u'(.*)A',u'kala'),

			(u'tt',u'(.*t)tA',u'aitta'),

			(u'nk',u'(.*n)kA',u'hanka'),

			(u'mp',u'(.*m)pA',u'kampa'),

			(u'nt',u'(.*n)tA',u'kanta'),

			(u'pp',u'(.*p)pA',u'kappa'),

			(u'rt',u'(.*r)tA',u'parta'),

			(u'lt',u'(.*l)tA',u'valta'),

			(u'kk',u'(.*k)kA',u'haka'),

			(u'p',u'(.*)pA',u'napa'),

			(u't',u'(.*)tA',u'pata'),

			(u'k>j',u'(.*A)ikA',u'aika'),

			(u'k>',u'(.*AA)kA',u'raaka'),

			(u'k>',u'(.*V)kA',u'liika'),

			(u'k>',u'(.*C)kA',u'haka')]),

	(u'nahka', u'-', [(None,u'(.*)kA',u'nahka')]),

	(u'jumala', u'-', [(None,u'(.*l)A',u'jumala')]),

	(u'koira', u'sw',   [(None,u'(.*)A',u'koira'),

			(u'tt',u'(.*t)tA',u'kenttä'),

			(u'nk',u'(.*n)kA',u'honka'),

			(u'mp',u'(.*m)pA',u'kompa'),

			(u'nt',u'(.*n)tA',u'suunta'),

			(u'pp',u'(.*p)pA',u'tolppa'),

			(u'rt',u'(.*r)tA',u'turta'),

			(u'lt',u'(.*l)tA',u'kulta'),

			(u'kk',u'(.*k)kA',u'hoikka'),

			(u'p',u'(.*)pA',u'huopa'),

			(u't',u'(.*)tA',u'juhta'),

			(u'k>',u'(.*i)kA',u'ikä'),

			(u'k>',u'(.*)kA',u'hoikka')]),

	(u'ylkä', u'-', [(None,u'(.*l)kA',u'ylkä')]),

	(u'pitkä', u'-', [(None,u'(.*pi)tkA',u'pitkä')]),

	(u'ruoka', u'-', [(None,u'(.*ru)oka',u'ruoka')]),

	(u'poika', u'-', [(None,u'(.*po)ikA',u'poika')]),

	(u'matala', u'-', [(None,u'(.*C)A',u'matala')]),

	(u'asema', u'sw',  [(None,u'(.*)A',u'asema'),

			(u'tt',u'(.*t)tA',u'opotta'),

			(u'nt',u'(.*n)tA',u'emäntä')]),

	(u'kulkija', u'-', [(None,u'(.*i)jA',u'kulkija'),

			(None,u'(.*)A',u'apila')]),

	(u'video', u'-', [(None,u'(.*deO)',u'video')]),

	(u'karahka', u'sw', [(None,u'(.*)A',u'karahka'),

			(u'tt',u'(.*t)tA',u'savotta'),

			(u'pp',u'(.*p)pA',u'ulappa'),

			(u'kk',u'(.*k)kA',u'solakka'),

		        (u'nt',u'(.*n)tA',u'veranta')]),

	(u'apaja', u'-', [(None,u'(.*C)A',u'apaja')]),

	(u'peruna', u'-', [(None,u'(.*C)A',u'peruna')]),

	(u'korkea', u'-', [(None,u'(.*C)eA',u'korkea'),

		         (None,u'(.*O)A',u'ainoa')]),

	(u'suurempi', u'sw', [(u'mp',u'(.*V)mpi',u'suurempi')]),

	(u'vapaa', u'-', [(None,u'(.*CA)A',u'vapaa'),

		        (None,u'(.*CO)O',u'tienoo'),

		        (None,u'(.*CU)U',u'leikkuu')]),

	(u'kamee', u'-',   [(None,u'(.*Ce)e',u'kamee'),

			(None,u'(.*CA)A',u'nugaa'),

			(None,u'(.*CO)O',u'trikoo'),

			(None,u'(.*CU)U',u'revyy')]),

	(u'pii', u'-', [(None,u'(.*V)i',u'pii'),

		      (None,u'(.*A)A',u'maa'),

		      (None,u'(.*Ce)e',u'tee'),

		      (None,u'(.*U)U',u'puu')]),

	(u'suo', u'-', [(None,u'(.*C)UO',u'suo')]),

	(u'askel', u'ws', [(None,u'(.*VC)',u'askel'),

		         (u'nn',u'(.*n)nel',u'kannel'),

		         (u'nn',u'(.*n)ner',u'kinner'),

		         (u'nn',u'(.*n)nAr',u'piennar'),

		         (u'mm',u'(.*m)mel',u'ommel'),

		         (u'ng',u'(.*n)ger',u'penger'),

		         (u'd',u'(.*)dAr',u'udar'),

		         (u'v',u'(.*)vAl',u'taival'),

		         (u'>k',u'(.*)en',u'säen')]),

	(u'rosé', u'-', [(None,u'(.*V)',u'rosé')]),

	(u'spray', u'-', [(None,u'(.*[ao]y)',u'spray')]),

	(u'parfait', u'-', [(None,u'(.*)',u'parfait')]),

	(u'huuli', u'-', [(None,u'(.*C)i',u'tuohi')]),

	(u'meri', u'-', [(None,u'(.*er)i',u'meri')]),

	(u'tuohi', u'-', [(None,u'(.*C)i',u'lohi')]),

	(u'niemi', u'-', [(None,u'(.*V)mi',u'niemi')]),

	(u'pieni', u'-', [(None,u'(.*n)i',u'pieni')]),

	(u'lumi', u'-', [(None,u'(.*V)mi',u'lumi')]),

	(u'susi', u'-', [(None,u'(.*V)si',u'susi')]),

	(u'tosi', u'-', [(None,u'(.*V)si',u'tosi')]),

	(u'kansi', u'-', [(None,u'(.*n)si',u'kansi'),

	                  (None,u'(.*r)si',u'hirsi'),

		        (None,u'(.*l)si',u'jälsi')]),

	(u'sisar', u'ws', [(None,u'(.*CVC)',u'sisar'),

		         (u't',u'(.*t)Ar',u'tytär'),

		         (u'>k',u'(.*i)en',u'ien')]),

	(u'hapan', u'-', [(None,u'(.*p)An',u'hapan')]),

	(u'uistin', u'ws', [(None,u'(.*[iaä])n',u'uistin'),

	                    (u'nn',u'(.*n)nin',u'vaimennin'),

		          (u'll',u'(.*l)lin',u'sivellin'),

		          (u'rr',u'(.*r)rin',u'kiharrin'),

		          (u'rr',u'(.*r)rOin',u'kerroin'),

		          (u'd',u'(.*)din',u'kaadin'),

		          (u'v',u'(.*)vin',u'kaavin'),

			  (u't',u'(.*t)in',u'suodatin'),

			  (u'k',u'(.*k)in',u'puin'),

		          (u'j>k',u'(.*l)jin',u'poljin'),

		          (u'>k',u'(.*)in',u'puin')]),

	(u'laidun', u'-', [(None,u'(.*)dUn',u'laidun')]),

	(u'onneton', u'ws', [(None,u'(.*t)On',u'alaston'),

	                     (u't',u'(.*t)On',u'onneton')]),

	(u'lämmin', u'-', [(None,u'(.*m)min',u'lämmin')]),

	(u'vasen', u'-', [(None,u'(.*e)n',u'vasen')]),

	(u'sisin', u'', [(None,u'(.*)in',u'pahin')]),

	(u'nainen', u'-', [(None,u'(.*)nen',u'nainen')]),

	(u'vastaus', u'-', [(None,u'(.*V)s',u'vastaus')]),

	(u'kalleus', u'-', [(None,u'(.*VU)s',u'kalleus'),

	                    (None,u'(.*vU)s',u'kalleus')]),

	(u'kaunis', u'-', [(None,u'(.*C)is',u'kaunis')]),

	(u'autuas', u'-', [(None,u'(.*U)As',u'autuas')]),

	(u'laupias', u'-', [(None,u'(.*p)iAs',u'laupias')]),

	(u'vieras', u'ws', [(None,u'(.*[lmr]i[aä])s',u'antelias'),

		            (None,u'(.*il[aä])s',u'antelias'),

		            (None,u'(.*A)s',u'vieras'),

	                    (None,u'(.*)is',u'kauris'),

			(None,u'(.*e)s',u'kirves'),

	                    (u'nn',u'(.*n)nAs',u'kinnas'),

		          (u'll',u'(.*l)lAs',u'allas'),

		          (u'rr',u'(.*r)rAs',u'harras'),

		          (u'mm',u'(.*m)mAs',u'hammas'),

		          (u'ng',u'(.*n)gAs',u'kangas'),

			(u'k',u'(.*k)As',u'avokas',[SUBST]),

			(u'k',u'(.*k)As',u'vilkas',[ADJ]),

		          (u'p',u'(.*p)As',u'saapas'),

		          (u'd',u'(.*)dAs',u'ahdas'),

		          (u'v',u'(.*)vAs',u'varvas'),

		          (u't',u'(.*t)As',u'ratas'),

			(u't',u'(.*t)is',u'altis'),

		          (u'>k',u'(.*)As',u'varas'),

			(u'>k',u'(.*)is',u'ruis'),

			(u'>k',u'(.*)es',u'ies')]),

	(u'iäkäs', u'ws', [(u'k',u'(.*k)As',u'iäkäs',[ADJ]),

		         (u'k',u'(.*k)As',u'asiakas',[SUBST])]),

	(u'ohut', u'-', [(None,u'(.*CU)t',u'airut')]),

	(u'kevät', u'-', [(None,u'(.*A)t',u'kevät')]),

	(u'mies', u'-', [(None,u'(.*mie)s',u'mies')]),

	(u'kuollut', u'-', [(None,u'(.*C)Ut',u'kuollut')]),

	(u'hame', u'ws', [(None,u'(.*e)',u'hame'),

	                  (u'nn',u'(.*n)ne',u'enne'),

		        (u'll',u'(.*l)le',u'helle'),

		        (u'rr',u'(.*r)re',u'kierre'),

		        (u'mm',u'(.*m)me',u'lumme'),

		        (u'j>k',u'(.*C)je',u'lahje'),

		        (u'p',u'(.*p)e',u'lape'),

		        (u'd',u'(.*)de',u'sade'),

		        (u'v',u'(.*)ve',u'taive'),

		        (u'k',u'(.*k)e',u'tarvike'),

		        (u'>k',u'(.*V)e',u'tarvike'),

		        (u'>k',u'(.*h)e',u'tarvike'),

		        (u't',u'(.*Vt)e',u'vaate'),

		        (u't',u'(.*lt)e',u'vaate'),

		        (u't',u'(.*rt)e',u'vaate')]),

	(u'alkeet', u'-', [(None,u'(.*ke)et',u'alkeet')]),

	(u'tie', u'-', [(None,u'(.*t)ie',u'tie')]),

	(u'lapsi', u'-', [(None,u'(.*)psi',u'lapsi')]),

	(u'hapsi', u'-', [(None,u'(.*)psi',u'hapsi')]),

	(u'loppu', u'-', [(None,u'(.*)',u'loppu')]),

	(u'veitsi', u'-', [(None,u'(.*)tsi',u'veitsi')]),

	# Verbs

	(u'punoa', u'sw', [(None,u'(.*)A',u'punoa'),

	                   (u'mp',u'(.*m)pUA',u'ampua'),

	                   (u'mp',u'(.*m)pOA',u'tempoa'),

		         (u'tt',u'(.*t)tUA',u'asettua'),

		         (u'tt',u'(.*t)tOA',u'viittoa'),

		         (u'kk',u'(.*k)kOA',u'aikoa'),

		         (u'kk',u'(.*k)kUA',u'kiekua'),

		         (u'pp',u'(.*p)pOA',u'harppoa'),

		         (u'pp',u'(.*p)pUA',u'kieppua'),

		         (u'nt',u'(.*n)tUA',u'jakaantua'),

		         (u'rt',u'(.*r)tOA',u'kertoa'),

		         (u'rt',u'(.*r)tUA',u'kumartua'),

		         (u'nk',u'(.*n)kUA',u'mankua'),

		         (u'nk',u'(.*n)kOA',u'penkoa'),

		         (u'lt',u'(.*l)tUA',u'paleltua'),

		         (u't',u'(.*)tUA',u'kaatua'),

		         (u't',u'(.*)tOA',u'tahtoa'),

		         (u'p',u'(.*)pOA',u'leipoa'),

		         (u'p',u'(.*)pUA',u'saapua'),

		         (u'k>',u'(.*U)kUA',u'liukua'),

		         (u'k>',u'(.*)kOA',u'aikoa'),

		         (u'k>',u'(.*)kUA',u'kiekua')]),

	(u'aavistaa', u'sw', [(None,u'(.*t)AA',u'aavistaa'),

	                      (u'rt',u'(.*r)tAA',u'longertaa'),

	                      (u'tt',u'(.*t)tAA',u'alittaa'),

			  (u't',u'(.*h)tAA',u'astahtaa')]),

	(u'hidastaa', u'-', [(None,u'(.*t)AA',u'hidastaa')]),

	(u'heittää', u'sw', [(u'tt',u'(.*t)tAA',u'heittää')]),

	(u'muistaa', u'-', [(None,u'(.*C)AA',u'muistaa')]),

	(u'inttää', u'sw', [(u'tt',u'(.*t)tAA',u'inttää'),

	                    (u't',u'(.*)tAA',u'itää')]),

	(u'sulaa', u'sw', [(None,u'(.*C)AA',u'sulaa'),

	                   (u'nt',u'(.*n)tAA',u'kyntää'),

		         (u'tt',u'(.*t)tAA',u'autioittaa'),

		         (u't',u'(.*h)tAA',u'kulahtaa'),

		         (u'k>',u'(.*C)kAA',u'purkaa')]),

	(u'hohtaa', u'sw', [(u'tt',u'(.*t)tAA',u'jättää'),

	                    (u't',u'(.*)tAA',u'hohtaa')]),

	(u'hujahtaa', u'sw', [(u't',u'(.*V)htAA',u'hujahtaa')]),

	(u'kirjoittaa', u'sw', [(u'tt',u'(.*V)ittAA',u'kirjoittaa'),

			    (u'tt',u'(.*V)ttAA',u'ammottaa')]),

	(u'loistaa', u'-', [(None,u'(.*C)AA',u'loistaa')]),

	(u'vuotaa', u'sw', [(u'lt',u'(.*Vl)tAA',u'puoltaa'),

			(u'rt',u'(.*Vr)tAA',u'juurtaa'),

			(u'nt',u'(.*Vn)tAA',u'saksantaa'),

			(u't',u'(.*V)tAA',u'vuotaa')]),

	(u'huutaa', u'sw', [(u'nt',u'(.*Vn)tAA',u'alentaa'),

			(u't',u'(.*V)tAA',u'huutaa')]),

	(u'sukeltaa', u'sw', [(u'lt',u'(.*Vl)tAA',u'sukeltaa'),

			  (u'rt',u'(.*Vr)tAA',u'musertaa'),

			  (u'nt',u'(.*Vn)tAA',u'jäykentää')]),

	(u'paleltaa', u'sw', [(u'lt',u'(.*Vl)tAA',u'paleltaa'),

			  (u'nt',u'(.*Vn)tAA',u'nuotintaa')]),

	(u'murtaa', u'sw', [(u'rt',u'(.*Vr)tAA',u'murtaa')]),

	(u'juontaa', u'sw', [(u'nt',u'(.*Vn)tAA',u'juontaa'),

			 (u'rt',u'(.*Vr)tAA',u'pyörtää')]),

	(u'pahentaa', u'sw', [(u'nt',u'(.*Vn)tAA',u'pahentaa')]),

	(u'kaivaa', u'sw', [(None,u'(.*C)AA',u'kaivaa'),

	                    (u'nt',u'(.*n)tAA',u'antaa'),

			(u'pp',u'(.*p)pAA',u'lappaa'),

			(u'tt',u'(.*t)tAA',u'saattaa'),

			(u'kk',u'(.*k)kAA',u'jakaa'),

			(u'k>',u'(.*)kAA',u'jakaa'),

			(u't',u'(.*)tAA',u'raataa')]),

	(u'kaikaa', u'-', [(None,u'(.*C)AA',u'kapsaa')]),

	(u'soutaa', u'sw', [(u't',u'(.*)tAA',u'soutaa')]),

	(u'saartaa', u'-', [(None,u'(.*r)tAA',u'saartaa')]),

	(u'laskea', u'sw', [(None,u'(.*C)eA',u'laskea'),

	                    (u'nk',u'(.*n)keA',u'tunkea'),

			(u't',u'(.*)teA',u'kutea'),

			(u'kk',u'(.*k)keA',u'hakea'),

			(u'p',u'(.*)peA',u'rypeä'),

			(u'k>j',u'(.*)keA',u'polkea'),

			(u'k>',u'(.*)keA',u'hakea')]),

	(u'tuntea', u'sw', [(u'nt',u'(.*tUn)teA',u'tuntea')]),

	(u'lähteä', u'sw', [(u't',u'(.*lA)hteA',u'lähteä')]),

	(u'sallia', u'sw', [(None,u'(.*C)iA',u'sallia'),

			(u'nk',u'(.*n)kiA',u'onkia'),

			(u'mp',u'(.*m)piA',u'empiä'),

			(u'nt',u'(.*n)tiA',u'kontia'),

			(u'pp',u'(.*p)piA',u'oppia'),

			(u'kk',u'(.*k)kiA',u'loikkia'),

			(u'tt',u'(.*t)tiA',u'sättiä'),

			(u't',u'(.*)tiA',u'laatia'),

			(u'p',u'(.*)piA',u'kaapia'),

			(u'k>j',u'(.*)kiA',u'hylkiä'),

			(u'k>',u'(.*i)kiA',u'poikia'),

			(u'k>',u'(.*)kiA',u'loikkia')]),

	(u'voida', u'ws', [(u't',u'(.*)idA',u'voida')]),

	(u'käydä', None, [(None,u'(.*)UdA',u'käydä')]),

	(u'kanavoida', u'ws', [(u't',u'(.*O)idA',u'kanavoida')]),

	(u'saada', u'-', [(None,u'(.*CA)AdA',u'saada'),

	                  (None,u'(.*CU)UdA',u'myydä')]),

	(u'juoda', u'-', [(None,u'(.*C)UOdA',u'juoda'),

		        (None,u'(.*C)iedA',u'viedä')]),

	(u'nuolaista', u'ws', [(None,u'(CAis)tA',u'nousta'),

			   (None,u'(.*CA)istA',u'nuolaista'),

			   (None,u'(.*C)istA',u'kalista'),

			   (None,u'(.*s)tA',u'nousta'),

			   (u'v',u'(.*)vistA',u'vavista'),

			   (u'ng',u'(.*n)gAistA',u'rangaista')]),

	(u'mennä', u'-', [(None,u'(.*n)nA',u'mennä')]),

	(u'purra', u'-', [(None,u'(.*r)rA',u'purra')]),

	(u'katsella', u'ws', [(None,u'(.*Ael)lA',u'arvailla'),

			(None,u'(.*el)lA',u'katsella'),

			(None,u'(.*eil)lA',u'katsella'),

			(None,u'(.*Vil)lA',u'arvailla'),

			(None,u'(.*il)lA',u'katsella'),

			(None,u'(.*Ol)lA',u'tulla'),

			(None,u'(.*Ul)lA',u'tulla'),

			(u'mm',u'(.*m)mellA',u'ommella'),

			(u'rr',u'(.*r)rellA',u'askarrella'),

			(u'nn',u'(.*n)nellA',u'pienennellä'),

			(u'll',u'(.*l)lellA',u'takellella'),

			(u'k',u'(.*k)ellA',u'nakella'),

			(u't',u'(.*t)ellA',u'aatella'),

			(u'p',u'(.*p)ellA',u'tapella'),

			(u'd',u'(.*)dellA',u'kohdella'),

			(u'>k',u'(.*)ellA',u'nakella')]),

	(u'haravoida', u'ws', [(u't',u'(.*O)idA',u'haravoida')]),

	(u'valita', u'-', [(None,u'(.*i)tA',u'valita')]),

	(u'saneerata', u'-', [(None,u'(.*C)AtA',u'saneerata')]),

	(u'aleta', u'ws',  [(None,u'(.*CV)tA',u'aleta'),

	                    (u'mm',u'(.*m)metA',u'lämmetä'),

			(u't',u'(.*t)OtA',u'loitota'),

			(u'p',u'(.*p)AtA',u'hapata'),

			(u'p',u'(.*p)etA',u'suipeta'),

			(u'k',u'(.*k)etA',u'vaieta'),

			(u'd',u'(.*)detA',u'edetä'),

			(u'd',u'(.*)dOtA',u'leudota'),

			(u'd',u'(.*)dAtA',u'mädätä'),

			(u'v',u'(.*)vetA',u'kaveta'),

			(u'j>k',u'(.*)jetA',u'tarjeta'),

			(u'>k',u'(.*)OtA',u'ulota'),

			(u'>k',u'(.*)AtA',u'erata'),

			(u'>k',u'(.*)etA',u'vaieta')]),

	(u'haluta', u'ws', [(None,u'(.*C)itA',u'selvitä'),

			(None,u'(.*gO)tA',u'bingota'),

			(None,u'(.*U)tA',u'haluta'),

			(u'll',u'(.*l)litA',u'hellitä'),

			(u'mm',u'(.*m)mitA',u'lämmitä'),

			(u'p',u'(.*p)UtA',u'silputa'),

			(u'v',u'(.*)vUtA',u'vivuta'),

			(u'>k',u'(.*)itA',u'keritä')]),

	(u'juoruta', u'ws', [(None,u'(.*U)tA',u'juoruta'),

			(u'mm',u'(.*m)mUtA',u'kummuta'),

			(u't',u'(.*t)UtA',u'luututa'),

			(u'p',u'(.*p)UtA',u'ryöpytä'),

			(u'k',u'(.*k)UtA',u'takuta'),

			(u'v',u'(.*)vUtA',u'kavuta')]),

	(u'salata', u'ws', [(None,u'(.*)AtA',u'salata'),

	                    (u'ng',u'(.*n)gAtA',u'hangata'),

			(u'mm',u'(.*m)mAtA',u'kammata'),

			(u'rr',u'(.*r)rAtA',u'kerrata'),

			(u'nn',u'(.*n)nAtA',u'suunnata'),

			(u'll',u'(.*l)lAtA',u'vallata'),

			(u'b',u'(.*b)AtA',u'lobata'),

			(u'g',u'(.*g)AtA',u'digata'),

			(u'v',u'(.*)vAtA',u'kelvata'),

			(u't',u'(.*t)AtA',u'kuitata'),

			(u'd',u'(.*)dAtA',u'ladata'),

			(u'j>k',u'(.*)jAtA',u'peljätä'),

			(u'k',u'(.*k)AtA',u'pakata'),

			(u'p',u'(.*p)AtA',u'pompata'),

			(u'>k',u'(.*)AtA',u'taata')]),

	(u'katketa', u'ws', [(None,u'(.*[oe])tA',u'katketa'),

	                     (u'mm',u'(.*m)metA',u'kammeta'),

			 (u'ng',u'(.*n)getA',u'langeta'),

			 (u't',u'(.*t)OtA',u'lotota'),

			 (u'k',u'(.*k)etA',u'poiketa'),

			 (u'v',u'(.*)vetA',u'ruveta'),

			 (u'd',u'(.*)detA',u'todeta'),

			 (u'j>k',u'(.*)jetA',u'lohjeta'),

			 (u'>k',u'(.*)OtA',u'saota'),

			 (u'>k',u'(.*)etA',u'poiketa')]),

	(u'kohota', u'ws', [(None,u'(.*O)tA',u'kohota'),

	                    (u'rr',u'(.*r)rOtA',u'irrota'),

			(u'mm',u'(.*m)mOtA',u'kimmota'),

			(u'ng',u'(.*n)gOtA',u'lingota'),

			(u't',u'(.*t)OtA',u'netota'),

			(u'p',u'(.*p)OtA',u'upota'),

			(u'v',u'(.*r)vOtA',u'turvota'),

			(u'k',u'(.*Vk)OtA',u'laota'),

			(u'd',u'(.*)dOtA',u'kadota'),

			(u'>k',u'(.*)OtA',u'laota')]),

	(u'kihistä', u'-', [(None,u'(.*C)istA',u'kihistä')]),

	(u'kitistä', u'-', [(None,u'(.*C)istA',u'kitistä')]),

	(u'taitaa', u'-', [(None,u'(.*)tAA',u'taitaa')]),

	(u'juosta', u'-', [(None,u'(.*V)stA',u'juosta')]),

	(u'nähdä', u'-', [(None,u'(.*)hdA',u'nähdä')]),

	(u'kevetä', u'-', [(None,u'(.*)vetA',u'kevetä')])

	]

def compileClassmapREs(inputClassmap):

	"""Converts a classmap to a form where regular expressions have been

	compiled to regular expression objects"""

	outputClassmap = []

	for joClass in inputClassmap:

		ruleList = []

		for inputRule in joClass[2]:

			pattern = inputRule[1]

			pattern = pattern.replace(u'V', u'(?:a|á|e|i|o|u|y|ä|ö|é)')

			pattern = pattern.replace(u'C', u'(?:b|c|d|f|g|h|j|k|l|m|n|p|q|r|s|t|v|w|x|y|z|š|ž)')

			pattern = pattern.replace(u'A', u'(?:a|ä)')

			pattern = pattern.replace(u'O', u'(?:o|ö)')

			pattern = pattern.replace(u'U', u'(?:u|y)')

			regExp = re.compile(u'^' + pattern + u'$', re.IGNORECASE)

			outputRule = (inputRule[0], regExp, inputRule[2])

			if len(inputRule) == 4:

				outputRule = (inputRule[0], regExp, inputRule[2], inputRule[3])

			ruleList.append(outputRule)

		outputClassmap.append((joClass[0], joClass[1], ruleList))

	return outputClassmap

def match_re(string, regExp):

	match = regExp.match(string)

	if match == None: return None

	else: return match.group(1)