Guessed implementation of left and right in spanish, french and italian.

This commit is contained in:
bringert
2006-02-28 19:02:43 +00:00
parent cb18bc2557
commit 179331dde5
3 changed files with 24 additions and 6 deletions

View File

@@ -41,8 +41,14 @@ concrete SwadeshFin of Swadesh = CatFin
few_Det = mkDet Sg (regN "harva") ;
other_Det = mkDet Sg (regN "muu") ;
-- left_Ord = mkA (regN "vasen") ;
-- right_Ord = mkA (regN "oikea") ;
left_Ord = mkOrd (regN "vasen") ;
right_Ord = mkOrd (regN "oikea") ;
oper
mkOrd : N -> Ord ;
mkOrd x = {s = \\n,c => x.s ! NCase n c; lock_Ord = <> } ;
lin
-- Adverbs