main module testf

	fortran procedure JOE
	    param
		I : val 16 bit integer
	    endparam
	endprocedure
endmodule