begin
routine
test(
integer
i)
end
test(42)
endofprogram