program test implicit none print *, "match" end program test