import STDLIB/default-instruction-set.lm;
import STDLIB/default-primitives.lm;
import STDLIB/default-stdlib.lm;
import STDLIB/default-rules.lm;
type E CaseOne | CaseTwo | CaseThree;
main := (
(let x CaseOne)
(let y CaseTwo)
(let z CaseThree)
(print (.0 x))
(print (.0 y))
(print (.0 z))
);