! Program to test simple IO
program testwrite
   write (*,*) 1
   write (*,*) "Hello World"
end program