main module g
%set debug_print_ccode=true

fortran procedure g ()
endprocedure

g()
endmodule