source/unres/src-HCD-5D/inform.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 inform  --  program I/O and flow control values  ##
  11 c     ##                                                          ##
  12 c     ##############################################################
  13 c
  14 c
  15 c     maxask    maximum number of queries for interactive input
  16 c
  17 c     digits    decimal places output for energy and coordinates
  18 c     iprint    steps between status printing (0=no printing)
  19 c     iwrite    steps between coordinate saves (0=no saves)
  20 c     isend     steps between socket communication (0=no sockets)
  21 c     silent    logical flag to turn off all information printing
  22 c     verbose   logical flag to turn on extra information printing
  23 c     debug     logical flag to turn on full debug printing
  24 c     holdup    logical flag to wait for carriage return on exit
  25 c     abort     logical flag to stop execution at next chance
  26 c
  27 c
  28       module inform
  29       implicit none
  30       integer maxask
  31       parameter (maxask=5)
  32       integer digits,jprint
  33       integer iwrite,isend
  34       logical silent,verbose
  35       logical debug,holdup
  36       logical abort
  37       save
  38       end