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       integer nbfrag,bfrag,nhfrag,hfrag,bvar_frag,hvar_frag,nhpb0,
   6      1        lvar_frag,svar_frag,avar_frag
   7       COMMON /c_frag/ nbfrag,bfrag(4,maxres/3),nhfrag,hfrag(2,maxres/3)
   8       COMMON /frag/ bvar_frag(mxio,6),hvar_frag(mxio,3),
   9      1              lvar_frag(mxio,3),svar_frag(mxio,3),
  10      2              avar_frag(mxio,5)
  11       COMMON /WAGI/ w(MAXRES22),d0(MAXRES22)
  12       integer nx,ny,mask
  13       COMMON /POCHODNE/ NX,NY,DRDG(MAXRES22,MAXRES),DD(MAXRES22),
  14      1 H(MAXRES,MAXRES),XX(MAXRES)
  15       COMMON /frozen/ mask(maxres)
  16       COMMON /store0/ nhpb0