external routine test(integer i)
end

endoffile