C C PARAMETERS USED IN PDS FOR THE ROUTINE TO READ PROTEIN DATA BANK C FORMAT. MANY OF THIS PARAMETERS ARE NOT NEEDED WHEN THE ROUTINE C IS USED IN * T A B L E S * FOR READING A PROTEIN DATA BANK FILE. C C. ABAD-ZAPATERO . JAN.15.1987. THEREFORE, THIS FILE COULD BE C SHORTENED SUBSTANTIALLY... IF AND WHEN I HAVE THE TIME C C CLEANED UP. JUNE 10.1987 FOR PROGRAM EXPORT (C.A-Z). C C C LEN_LINE - length of a line C LEN_FIELD - length of a field C MAX_MOLES - maximum number of molecules C MAX_CROSSES - maximum length of crosslink list C MAX_CHAINS - maximum number of chains C MAX_RESIDUES - maximum number of residues C MAX_ATOMS - maximum number of atoms C MAX_ATMRES - maximum number of atoms in a single residue INTEGER 1 LEN_LINE, LEN_FIELD, WLD_RESN, WLD_FLAG, 1 MAX_MOLES, MAX_CROSSES, MAX_CHAINS, MAX_RESIDUES, 1 MAX_ATOMS, MAX_ATMRES REAL*4 1 MAX_REAL4, MIN_REAL4 CHARACTER*1 1 CHR_BLANK, CHR_WILD PARAMETER ( 1 LEN_LINE = 256, 1 LEN_FIELD = 16 1 ) PARAMETER ( 1 MAX_MOLES = 16, 1 MAX_CROSSES = 256, 1 MAX_CHAINS = 64, 1 MAX_RESIDUES = 4096, 1 MAX_ATOMS = 12288, 1 MAX_ATMRES = 1024 1 ) PARAMETER ( 1 CHR_WILD = '*', 1 CHR_BLANK = ' ' 1 ) PARAMETER ( 1 WLD_FLAG = 0, 1 WLD_RESN = -29999 1 )