import Generics.gdynamic
import iTasks
-import GenEq, StdMisc, StdArray
+import GenEq, StdMisc, StdArray, GenBimap
import mTaskCode
import mTaskSerial, mTaskLCD
instance == DigitalPin where (==) x y = x === y
instance == AnalogPin where (==) x y = x === y
-derive consName DigitalPin, AnalogPin, PinMode
-derive consIndex DigitalPin, AnalogPin
+derive gPrint Pin, Button, UserLED, AnalogPin, DigitalPin, PinMode
+derive class gCons Pin, Button, UserLED, AnalogPin, DigitalPin, PinMode
+
tab =: toString (repeatn tabSize ' ')
tabSize :== 2