diff options
| author | aarne <aarne@chalmers.se> | 2010-03-29 13:59:46 +0000 |
|---|---|---|
| committer | aarne <aarne@chalmers.se> | 2010-03-29 13:59:46 +0000 |
| commit | bec718d49deb4000bbf99adbef66b27e93d08f1b (patch) | |
| tree | d30747e52b053b58434cff8d4175502223267d1d /examples/attempto/LexAttemptoUrd.gf | |
| parent | 04784b7c31bec63c1fa9c17884347c61491f9874 (diff) | |
AttemptoUrd added
Diffstat (limited to 'examples/attempto/LexAttemptoUrd.gf')
| -rw-r--r-- | examples/attempto/LexAttemptoUrd.gf | 39 |
1 files changed, 39 insertions, 0 deletions
diff --git a/examples/attempto/LexAttemptoUrd.gf b/examples/attempto/LexAttemptoUrd.gf new file mode 100644 index 000000000..c38885a25 --- /dev/null +++ b/examples/attempto/LexAttemptoUrd.gf @@ -0,0 +1,39 @@ +instance LexAttemptoUrd of LexAttempto =
+ open
+ ExtraUrd,
+ SyntaxUrd,
+ ParadigmsUrd,
+ ConstructX,
+ (M = MakeStructuralUrd)
+-- IrregUrd
+ in {
+
+oper
+ possible_A = mkA "mmkn" ;
+ necessary_A = mkA "Zrwry" ;
+ own_A = mkA "apna" ;
+ have_VV = mkVV have_V ;
+ provably_Adv = ParadigmsUrd.mkAdv "sabt" ;
+ provable_A = mkA "sabt" ;
+ false_A = mkA "GlT" ;
+ such_A = mkA "aisa" ;
+
+ genitiveNP np = mkNP (GenNP np) ;
+
+ kilogram_CN = mkCN (mkN "klwgram") ;
+
+ each_Det = ExtraUrd.each_Det ;
+
+ that_Subj = M.mkSubj "kh" ;
+
+ comma_and_Conj = mkConj [] "awr" plural ;
+ comma_or_Conj = mkConj [] "ya" singular ;
+ slash_Conj = mkConj [] "/" singular ;
+
+ whose_IDet = M.mkIDet "ks ka" singular ;
+
+ eachOf np = mkNP (mkNP each_Det) (SyntaxUrd.mkAdv part_Prep np) ;
+
+ adj_thatCl : A -> S -> Cl = \a,s -> mkCl (mkVP (mkAP (mkAP a) s)) ;
+
+}
|