C C C Copyright (C) C C This code is distributed under the terms and conditions of the C CCP4 Program Suite Licence Agreement as a CCP4 Application. C A copy of the CCP4 licence can be obtained by writing to the C CCP4 Secretary, Daresbury Laboratory, Warrington WA4 4AD, UK. C implicit none integer MAXATM,MAXFRG,MAXLEN parameter (MAXATM=100000,MAXFRG=20000,MAXLEN=100)