integer nres,nres0,nsup,nstart_sup,nend_sup,nstart_seq, & ishift_pdb,chain_length,chain_border,ichanres,tabpermchain, & nchain ,npermchain,ireschain,iz_sc double precision c,cref,crefjlee,dc,xloc,xrot,dc_norm,t,r,prod,rt, & rmssing,anatemp,chomo common /chain/ c(3,maxres2+2),dc(3,maxres2),xloc(3,maxres), & xrot(3,maxres),dc_norm(3,maxres2),nres,nres0 common /rotmat/ t(3,3,maxres),r(3,3,maxres),prod(3,3,maxres), & rt(3,3,maxres) common /refstruct/ cref(3,maxres2+2),crefjlee(3,maxres2+2), & rmssing,anatemp,iz_sc,nsup, & nstart_sup,nend_sup,chain_length(maxchain),npermchain, & ireschain(maxres),tabpermchain(maxchain,maxperm), & chain_border(2,maxchain),nchain,nstart_seq,ishift_pdb double precision boxxsize,boxysize,boxzsize,enecut,sscut,sss, & sssgrad, & buflipbot, bufliptop,bordlipbot,bordliptop,lipbufthick,lipthick common /box/ boxxsize,boxysize,boxzsize,enecut,sscut,sss,sssgrad, & buflipbot, bufliptop,bordlipbot,bordliptop,lipbufthick,lipthick common /chomo_models/ chomo(3,maxres2+2,max_template)