external
integer
xi = 4
own
integer
oi = 5
const
integer
ci = 6
endoffile