1 2 3 4 5 6 7 8 9 10 11 12 13
program() type R = record a: Int; b: Int end proc f(r: R) -> Bool return r.a = 1 & r.b = 2 begin assert(f({ R; a: 1, b: 2 })) end.