started a subdir for the book

This commit is contained in:
aarne
2010-11-22 12:55:37 +00:00
parent 8ab5ec00c6
commit 46137ab6a6
97 changed files with 2026 additions and 0 deletions

View File

@@ -0,0 +1,28 @@
abstract Classes = {
flags
startcat = Command ;
cat
Command ;
Kind ;
Class ;
Instance Class Kind ;
Action Class ;
Device Kind ;
fun
Act : (c : Class) -> (k : Kind) -> Instance c k -> Action c -> Device k -> Command ;
The : (k : Kind) -> Device k ;
Light, Fan : Kind ;
Switchable, Dimmable : Class ;
SwitchOn, SwitchOff : Action Switchable ;
Dim : Action Dimmable ;
switchable_Light : Instance Switchable Light ;
switchable_Fan : Instance Switchable Fan ;
dimmable_Light : Instance Dimmable Light ;
}