source/unres/src-HCD-5D/COMMON.DISTFIT

   1       integer maxres22
   2 c      parameter (maxres22=maxres*(maxres+1)/2)
   3       parameter (maxres22=1)
   4       double precision w,d0,DRDG,DD,H,XX
   5       COMMON /WAGI/ w(MAXRES22),d0(MAXRES22)
   6       integer nx,ny,mask
   7       COMMON /POCHODNE/ NX,NY,DRDG(MAXRES22,MAXRES),DD(MAXRES22),
   8      1 H(MAXRES,MAXRES),XX(MAXRES)
   9       COMMON /frozen/ mask(maxres)
  10       COMMON /store0/ nhpb0