      program test
      write(*,*) 'test'
      stop
      end
      program test
      write(*,*) 'test'
      stop
      end
