source/xdrfpdb/src-M/nazwy.f

   1       block data nazwy
   2       implicit real*8 (a-h,o-z)
   3       include 'DIMENSIONS'
   4       include 'COMMON.NAMES'
   5       include 'COMMON.FFIELD'
   6       data restyp /
   7      &'DD','DAU','DAI','DDB','DSM','DPR','DLY','DAR','DHI','DAS','DGL',
   8      & 'DSG','DGN','DSN','DTH',
   9      &'DYY','DAL','DTY','DTR','DVA','DLE','DIL','DPN','MED','DCY','ZER',
  10      &'CYS','MET','PHE','ILE','LEU','VAL','TRP','TYR','ALA','GLY','THR',
  11      &'SER','GLN','ASN','GLU','ASP','HIS','ARG','LYS','PRO','SME','DBZ',
  12      &'AIB','ABU','D'/
  13       data onelet /
  14      &'z','z','z','z','z','p','k','r','h','d','e','n','q','s','t','g',
  15      &'a','y','w','v','l','i','f','m','c','x',
  16      &'C','M','F','I','L','V','W','Y','A','G','T',
  17      &'S','Q','N','E','D','H','R','K','P','z','z','z','z','X'/
  18       data potname /'LJ','LJK','BP','GB','GBV'/
  19       end
  20