diff options
| author | aarne <unknown> | 2004-01-09 16:48:19 +0000 |
|---|---|---|
| committer | aarne <unknown> | 2004-01-09 16:48:19 +0000 |
| commit | 5c88df10bbf6c38b00e63bf897b5561417dd10fe (patch) | |
| tree | 19ea44cb6e2d9137a754ad8786706b3913f003c8 /grammars/database/DatabaseEngRes.gf | |
| parent | 86d811f2a6b29db64595b8ada83f8ffc33e9489f (diff) | |
Rewriting with interface to resource.
Diffstat (limited to 'grammars/database/DatabaseEngRes.gf')
| -rw-r--r-- | grammars/database/DatabaseEngRes.gf | 11 |
1 files changed, 0 insertions, 11 deletions
diff --git a/grammars/database/DatabaseEngRes.gf b/grammars/database/DatabaseEngRes.gf deleted file mode 100644 index e00501a47..000000000 --- a/grammars/database/DatabaseEngRes.gf +++ /dev/null @@ -1,11 +0,0 @@ -resource DatabaseEngRes = open Prelude in { -oper - mkSent : SS -> SS -> SS1 Bool = \long, short -> - {s = table {b => if_then_else Str b long.s short.s}} ; - - mkSentPrel : Str -> SS -> SS1 Bool = \prel, matter -> - mkSent (ss (prel ++ matter.s)) matter ; - - mkSentSame : SS -> SS1 Bool = \s -> - mkSent s s ; -} ; |
