c  no while statement in fortran
      stop
      end