integer ncont_pept_ref,icont_pept_ref,ncont_frag_ref,
     & icont_frag_ref,isec_ref,ncont_pept_near,icont_pept_near
      double precision sig_ref
      common /peptcont/ sig_ref(2,maxres,maxclass1-1,maxprot),
     & ncont_pept_ref(maxprot),
     & icont_pept_ref(2,maxcont,maxprot),
     & ncont_pept_near(maxres,maxclass1-1,maxprot),
     & icont_pept_near(2,maxres,maxclass1-1,maxprot),
     & ncont_frag_ref(mmaxfrag,maxclass1-1,maxprot),
     & icont_frag_ref(2,maxcont,mmaxfrag,maxclass1-1,maxprot),
     & isec_ref(maxres,maxprot)