begin
  routine call(integer a, b, c)
  end
  call(1, 2, 3)
endofprogram