Commit 904428f 1 parent 8723bde commit 904428f Copy full SHA for 904428f
File tree 2 files changed +2
-9
lines changed
2 files changed +2
-9
lines changed Original file line number Diff line number Diff line change @@ -139,13 +139,6 @@ lin InflectionA, InflectionA2 = \adj -> {
139
139
tr (th "Loc" ++ td (adj. s ! AAdj Compar Def Masc Sg Loc) ++ td (adj. s ! AAdj Compar Def Masc Pl Loc) ++ td (adj. s ! AAdj Compar Def Fem Sg Nom) ++ td (adj. s ! AAdj Compar Def Fem Pl Nom)) ++
140
140
tr (th "Voc" ++ td (adj. s ! AAdj Compar Def Masc Sg Voc) ++ td (adj. s ! AAdj Compar Def Masc Pl Voc) ++ td (adj. s ! AAdj Compar Def Fem Sg Nom) ++ td (adj. s ! AAdj Compar Def Fem Pl Nom)) ++
141
141
intagAttr "th" "colspan=\" 6\ "" "Superlative" ++
142
- tr (intagAttr "th" "rowspan=\" 6\ "" "Indef" ++
143
- th "Nom" ++ td (adj. s ! AAdj Superl Indef Masc Sg Nom) ++ td (adj. s ! AAdj Superl Indef Masc Pl Nom) ++ td (adj. s ! AAdj Superl Indef Fem Sg Nom) ++ td (adj. s ! AAdj Superl Indef Fem Pl Nom)) ++
144
- tr (th "Acc" ++ td (adj. s ! AAdj Superl Indef Masc Sg Acc) ++ td (adj. s ! AAdj Superl Indef Masc Pl Acc) ++ td (adj. s ! AAdj Superl Indef Fem Sg Nom) ++ td (adj. s ! AAdj Superl Indef Fem Pl Nom)) ++
145
- tr (th "Dat" ++ td (adj. s ! AAdj Superl Indef Masc Sg Dat) ++ td (adj. s ! AAdj Superl Indef Masc Pl Dat) ++ td (adj. s ! AAdj Superl Indef Fem Sg Nom) ++ td (adj. s ! AAdj Superl Indef Fem Pl Nom)) ++
146
- tr (th "Gen" ++ td (adj. s ! AAdj Superl Indef Masc Sg Gen) ++ td (adj. s ! AAdj Superl Indef Masc Pl Gen) ++ td (adj. s ! AAdj Superl Indef Fem Sg Nom) ++ td (adj. s ! AAdj Superl Indef Fem Pl Nom)) ++
147
- tr (th "Loc" ++ td (adj. s ! AAdj Superl Indef Masc Sg Loc) ++ td (adj. s ! AAdj Superl Indef Masc Pl Loc) ++ td (adj. s ! AAdj Superl Indef Fem Sg Nom) ++ td (adj. s ! AAdj Superl Indef Fem Pl Nom)) ++
148
- tr (th "Voc" ++ td (adj. s ! AAdj Superl Indef Masc Sg Voc) ++ td (adj. s ! AAdj Superl Indef Masc Pl Voc) ++ td (adj. s ! AAdj Superl Indef Fem Sg Nom) ++ td (adj. s ! AAdj Superl Indef Fem Pl Nom)) ++
149
142
tr (intagAttr "th" "rowspan=\" 6\ "" "Def" ++
150
143
th "Nom" ++ td (adj. s ! AAdj Superl Def Masc Sg Nom) ++ td (adj. s ! AAdj Superl Def Masc Pl Nom) ++ td (adj. s ! AAdj Superl Def Fem Sg Nom) ++ td (adj. s ! AAdj Superl Def Fem Pl Nom)) ++
151
144
tr (th "Acc" ++ td (adj. s ! AAdj Superl Def Masc Sg Acc) ++ td (adj. s ! AAdj Superl Def Masc Pl Acc) ++ td (adj. s ! AAdj Superl Def Fem Sg Nom) ++ td (adj. s ! AAdj Superl Def Fem Pl Nom)) ++
Original file line number Diff line number Diff line change 31
31
-- Indeclinable adjective: theoretically, any #vowel ending
32
32
mkAdjective_Indecl : Str -> Adjective = \ lemma -> {
33
33
s = table {
34
- AAdj Superl Indef _ _ _ => NON_EXISTENT ;
34
+ AAdj Superl Indef _ _ _ => nonExist ;
35
35
AAdj _ _ _ _ _ => lemma ;
36
36
AAdv d => mkAdjective_Adverb lemma ! d-- TODO - notestēt šādu keisu
37
37
}
43
43
AAdj Posit d g n c => mkAdjective_Pos lemma d ! g ! n ! c ;
44
44
AAdj Compar d g n c => mkAdjective_Comp lemma d ! g ! n ! c ;
45
45
AAdj Superl Def g n c => mkAdjective_Sup lemma ! g ! n ! c ;
46
- AAdj Superl Indef _ _ _ => NON_EXISTENT ;
46
+ AAdj Superl Indef _ _ _ => nonExist ;
47
47
AAdv d => mkAdjective_Adverb lemma ! d
48
48
}
49
49
} ;
You can’t perform that action at this time.
0 commit comments