forked from GitHub/gf-core
new tutorial almost finished
This commit is contained in:
17
doc/tutorial/smarthouse/Smart.gf
Normal file
17
doc/tutorial/smarthouse/Smart.gf
Normal file
@@ -0,0 +1,17 @@
|
||||
abstract Smart = {
|
||||
|
||||
flags startcat = Command ;
|
||||
|
||||
cat
|
||||
Command ;
|
||||
Kind ;
|
||||
Action Kind ;
|
||||
Device Kind ;
|
||||
fun
|
||||
CAction : (k : Kind) -> Action k -> Device k -> Command ;
|
||||
DKindOne : (k : Kind) -> Device k ;
|
||||
light, fan : Kind ;
|
||||
switchOn, switchOff : (k : Kind) -> Action k ;
|
||||
dim : Action light ;
|
||||
}
|
||||
|
||||
Reference in New Issue
Block a user