program hi
   use, intrinsic :: iso_fortran_env
	implicit none
	write(output_unit, '(a)') "Hello World!"
end program