source/unres/Tinker-minimize/iounit.f

   1 c
   2 c
   3 c     ###################################################
   4 c     ##  COPYRIGHT (C)  1992  by  Jay William Ponder  ##
   5 c     ##              All Rights Reserved              ##
   6 c     ###################################################
   7 c
   8 c     ############################################################
   9 c     ##                                                        ##
  10 c     ##  module iounit  --  Fortran input/output unit numbers  ##
  11 c     ##                                                        ##
  12 c     ############################################################
  13 c
  14 c
  15 c     input   Fortran I/O unit for main input (default=5)
  16 c     iout    Fortran I/O unit for main output (default=6)
  17 c
  18 c
  19       module iounit
  20       implicit none
  21       integer input
  22       integer jout
  23       save
  24       end