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

2006-02-28 19:02:43 +00:00
parent cd1fcf61c3
commit ec217d9b6e
3 changed files with 24 additions and 6 deletions
--- a/examples/bronzeage/SwadeshFre.gf
+++ b/examples/bronzeage/SwadeshFre.gf
@@ -37,8 +37,14 @@ concrete SwadeshFre of Swadesh = CatFre
      n = Pl
      } ;

--    left_Ord = regA "gauche" ;
--    right_Ord = regA "droite" ;
+    left_Ord = mkOrd (regA "gauche") ;
+    right_Ord = mkOrd (regA "droite") ;
+
+  oper
+    mkOrd : A -> Ord ;
+    mkOrd x = {s = \\ag => x.s ! Posit ! AF ag.g ag.n; lock_Ord = <> } ;
+
+  lin

    -- Adverbs