begin
routine
fred
end
fred
endofprogram