type R = record a: Int; b: Int end proc f(): R return R(1, 2) begin assert(f() = R(1, 2)) end.