corrections prompted by Janna's examples in resource

This commit is contained in:
aarne
2007-12-19 20:53:29 +00:00
parent e2185ffb38
commit 5cb91cd027
8 changed files with 27 additions and 23 deletions

View File

@@ -502,6 +502,8 @@ reg3N = \vesi,veden,vesi
} ;
mk1A = \x -> {s = \\_ => (noun2adj x).s ; lock_A = <>} ;
---- mkADeg (noun2adj x).s ...
mkA2 = \x,c -> x ** {c2 = c ; lock_A2 = <>} ;
mkADeg x kivempi kivin =
let