-
[clean-tests.git] / old / new-layouts / test.icl
1 module test
2
3 import iTasks
4
5 Start w = startEngine (viewInformation () [] v) w
6
7 derive class iTask B, C
8
9 v :: B
10 v = B2 C2
11
12 :: B = B1 | B2 C
13 :: C = C1 Int | C2