X-Git-Url: http://mmka.chem.univ.gda.pl/gitweb/?a=blobdiff_plain;f=source%2Fwham%2Fsrc-M%2FCOMMON.CONTROL;h=ec8917fed8f009392e8eb35a2c9407ddb1944b47;hb=855057911aaa7d3d083c300f4a9b1e7323f5d7da;hp=d0a7a0748cb5a4e8acdc6ca339849c855fd0eedc;hpb=42c272d4dee3edd0c57633b384f4e3f0a174c468;p=unres.git diff --git a/source/wham/src-M/COMMON.CONTROL b/source/wham/src-M/COMMON.CONTROL index d0a7a07..ec8917f 100644 --- a/source/wham/src-M/COMMON.CONTROL +++ b/source/wham/src-M/COMMON.CONTROL @@ -10,7 +10,7 @@ logical refstr,pdbref,punch_dist,print_rms,caonly,verbose, & merge_helices,bxfile,cxfile,histfile,entfile,zscfile, & rmsrgymap,with_dihed_constr,check_conf,histout,out1file, - & read2sigma,l_homo,with_theta_constr,read_homol_frag + & read2sigma,l_homo,with_theta_constr,read_homol_frag,dist1cut common /cntrl/ iscode,indpdb,refstr,pdbref,outpdb,outmol2, & punch_dist,print_rms,caonly,verbose,icomparfunc,pdbint, & merge_helices,bxfile,cxfile,histfile,entfile,zscfile,rmsrgymap, @@ -18,7 +18,8 @@ & with_theta_constr, & symetr, & constr_dist, - & constr_homology,out1file,homol_nset,read2sigma,read_homol_frag + & constr_homology,out1file,homol_nset,read2sigma,read_homol_frag, + & dist1cut common /homol/ waga_homology(maxR), & waga_dist,waga_angle,waga_theta,waga_d,dist_cut,dist2_cut, & iset,ihset,l_homo(max_template,maxdim)