diff options
Diffstat (limited to 'examples/dialogue/LightsProlog.gf')
| -rw-r--r-- | examples/dialogue/LightsProlog.gf | 20 |
1 files changed, 20 insertions, 0 deletions
diff --git a/examples/dialogue/LightsProlog.gf b/examples/dialogue/LightsProlog.gf new file mode 100644 index 000000000..4a93ee469 --- /dev/null +++ b/examples/dialogue/LightsProlog.gf @@ -0,0 +1,20 @@ +--# -path=.:prelude + +concrete LightsProlog of Lights = + DialogueProlog ** open ResProlog, Prelude in { + + lin + Light = ss "light" ; + Room = ss "room" ; + SwitchOnIn = ss "switch_on" ; + SwitchOffIn = ss "switch_off" ; + SwitchOn = ss "switch_on" ; + SwitchOff = ss "switch_off" ; + + LivingRoom = ss "living_room" ; + Kitchen = ss "kitchen" ; + + MorningMode = ss "morning_mode" ; + +} + |