source/unres/src-HCD-5D/output.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 output  --  output file format control parameters  ##
  11 c     ##                                                            ##
  12 c     ################################################################
  13 c
  14 c
  15 c     archive     logical flag to save structures in an archive
  16 c     noversion   logical flag governing use of filename versions
  17 c     overwrite   logical flag to overwrite intermediate files inplace
  18 c     cyclesave   logical flag to mark use of numbered cycle files
  19 c     velsave     logical flag to save velocity vector components
  20 c     frcsave     logical flag to save force vector components
  21 c     uindsave    logical flag to save induced atomic dipoles
  22 c     coordtype   selects Cartesian, internal, rigid body or none
  23 c
  24 c
  25       module output
  26       implicit none
  27       logical archive
  28       logical noversion
  29       logical overwrite
  30       logical cyclesave
  31       logical velsave
  32       logical frcsave
  33       logical uindsave
  34       character*9 coordtype
  35       save
  36       end