begin
recordformat
simple(
integer
a, b)
record
(simple) rec rec_b = 1
endofprogram