c
c --- machine-specific Fortran routines
c
      subroutine machine()
c
c --- always called once at the start of the program.
c



      end