record a(b,c,d)

global x, y

procedure f1()
   write("f1")
end

procedure f2()
   write("f2")
end

procedure f3()
   write("f3")
end

procedure f3()
   write("f3")
end

global A
gloabl B
global C

record f(g,h,i)