C
C
C     This code is distributed under the terms and conditions of the
C     CCP4 licence agreement as `Part 2' (Annex 2) software.
C     A copy of the CCP4 licence can be obtained by writing to the
C     CCP4 Secretary, Daresbury Laboratory, Warrington WA4 4AD, UK.
C
c+++ flow.fh +++
c
c  Flags for control of flow through program
c
c  lanlin      .true. to do initial analysis pass
c  lscale      .true. to do scaling pass
c  lanout      .true. to do final analysis & output pass
c
      common /flow/ lanlin, lscale, lanout
      logical lanlin, lscale, lanout
      save /flow/
c
c--- flow.fh ---