7 lines
110 B
Plaintext
7 lines
110 B
Plaintext
type t = A | B | C | D
|
|
|
|
node t2bool(x: t) returns (b: bool)
|
|
let
|
|
b = merge x (B-> true) (C-> true)
|
|
tel
|