SUBROUTINE CEE
      RETURN
      END
      SUBROUTINE OH
      RETURN
      END
      SUBROUTINE PART1
      RETURN
      END
      SUBROUTINE PART2
      RETURN
      END
      SUBROUTINE PART3
      RETURN
      END
      SUBROUTINE PART4
      RETURN
      END
      SUBROUTINE PART5
      RETURN
      END
      SUBROUTINE UNDERO
      RETURN
      END
      SUBROUTINE INOH
      RETURN
      END
      SUBROUTINE COP
      RETURN
      END
      SUBROUTINE PMAJ
      RETURN
      END
      SUBROUTINE INPEE
      RETURN
      END