diff options
| author | aarne <aarne@cs.chalmers.se> | 2008-06-27 09:18:50 +0000 |
|---|---|---|
| committer | aarne <aarne@cs.chalmers.se> | 2008-06-27 09:18:50 +0000 |
| commit | 5c713d8f027a9b6be687ee3f7e917e8bd2115773 (patch) | |
| tree | 65da19829810b753345a5b2164bef2d8876268dd /old-examples/dialogue/LightsEng.gf | |
| parent | f7b2a83059697f1b36a6369e489ac276e7ff875d (diff) | |
took away old-examples
Diffstat (limited to 'old-examples/dialogue/LightsEng.gf')
| -rw-r--r-- | old-examples/dialogue/LightsEng.gf | 19 |
1 files changed, 0 insertions, 19 deletions
diff --git a/old-examples/dialogue/LightsEng.gf b/old-examples/dialogue/LightsEng.gf deleted file mode 100644 index dfed6de85..000000000 --- a/old-examples/dialogue/LightsEng.gf +++ /dev/null @@ -1,19 +0,0 @@ ---# -path=.:multimodal:alltenses:prelude - -concrete LightsEng of Lights = - DialogueEng ** open MultiEng, ParadigmsEng, AuxEng, Prelude in { - - lin - Light = UseN (regN "light") ; - Room = UseN (regN "room") ; - SwitchOnIn = dirV3 (partV (regV "switch") "on") (mkPrep "in") ; - SwitchOffIn = dirV3 (partV (regV "switch") "off") (mkPrep "in") ; - SwitchOn = dirV2 (partV (regV "switch") "on") ; - SwitchOff = dirV2 (partV (regV "switch") "off") ; - - LivingRoom = defN (regN ["living-room"]) ; - Kitchen = defN (regN ["kitchen"]) ; - - MorningMode = mkMove (optStr "the" ++ ["morning mode"]) ; - -} |
