source/maxlik/src_MD_T_maxlik-NEWCORR-PMF/COMMON.CONTACTS1

   1       integer ncont,ncont_ref,icont,icont_ref,num_cont,jcont,
   2      & nsccont_frag_ref,isccont_frag_ref
   3       common /contacts/ ncont,ncont_ref(maxprot),icont(2,maxcont),
   4      & icont_ref(2,maxcont,maxprot),
   5      & nsccont_frag_ref(mmaxfrag,maxclass1-1,maxprot),
   6      & isccont_frag_ref(2,maxcont,mmaxfrag,maxclass1-1,maxprot)