1 f1.icn
   1 f2.icn
   1 f3.icn
   1 f4.icn

procedure f1()
   write("f1")
end

procedure f2()
   write("f2")
end

procedure f3()
   write("f3")
end
record a(b,c,d)

global x, y

global A
gloabl B
global C

record f(g,h,i)