diff options
Diffstat (limited to 'grammars/logic/LogicResEng.gf')
| -rw-r--r-- | grammars/logic/LogicResEng.gf | 27 |
1 files changed, 0 insertions, 27 deletions
diff --git a/grammars/logic/LogicResEng.gf b/grammars/logic/LogicResEng.gf deleted file mode 100644 index 94866bf05..000000000 --- a/grammars/logic/LogicResEng.gf +++ /dev/null @@ -1,27 +0,0 @@ -resource LogicResEng = { - -param Num = sg | pl ; - -oper - - ss : Str -> {s : Str} = \s -> {s = s} ; - - nomReg : Str -> Num => Str = \s -> table {sg => s ; pl => s + "s"} ; - - indef : Str = pre {"a" ; "an" / strs {"a" ; "e" ; "i" ; "o"}} ; - - LinElem : Type = {s : Str} ; - LinProp : Type = {s : Str} ; - - adj1 : Str -> LinElem -> LinProp = - \adj,x -> ss (x.s ++ "is" ++ adj) ; - adj2 : Str -> LinElem -> LinElem -> LinProp = - \adj,x,y -> ss (x.s ++ "is" ++ adj ++ y.s) ; - - fun1 : Str -> LinElem -> LinElem = - \f,x -> ss ("the" ++ f ++ "of" ++ x.s) ; - fun2 : Str -> LinElem -> LinElem -> LinElem = - \f,x,y -> ss ("the" ++ f ++ "of" ++ x.s ++ "and" ++ y.s) ; - - -} ; |
