completed book examples

This commit is contained in:
aarne
2010-11-22 15:48:52 +00:00
parent 76ba03b545
commit 67176f1520
11 changed files with 110 additions and 9 deletions

View File

@@ -18,8 +18,8 @@ lin
Fan = mkCN (mkN "fan") ;
Switchable, Dimmable = <> ;
SwitchOn = mkV2 (mkV "on" (mkV "switch")) ;
SwitchOff = mkV2 (mkV "off" (mkV "switch")) ;
SwitchOn = mkV2 (partV (mkV "switch") "on") ;
SwitchOff = mkV2 (partV (mkV "switch") "off") ;
Dim = mkV2 (mkV "dim") ;
switchable_Light = <> ;