global gvar          # a global

procedure main(arglist)         # arglist is a parameter of main
local a,b,i,x                   # a, b, i, x are locals withing main
static y                        # a static (silly in main)

x := arglist[1]
a := 1.0
i := 10
b := [x,a,i,b]

# ... rest of program
end