X-Git-Url: http://mmka.chem.univ.gda.pl/gitweb/?a=blobdiff_plain;f=source%2Fcluster%2Fwham%2Fsrc-M%2FCOMMON.CONTROL;h=bc4444ee1b47bbafc5036f36da48cf9ad3d3b3c2;hb=d24fd92f8762d3b48a94c699ef90e0ab37d3c204;hp=9a2bd18d59ad7037e510f6de8f50ac7328550f17;hpb=478a9d9a1c99eb3f4bc4ca676ff3162bdd01d633;p=unres.git diff --git a/source/cluster/wham/src-M/COMMON.CONTROL b/source/cluster/wham/src-M/COMMON.CONTROL index 9a2bd18..bc4444e 100644 --- a/source/cluster/wham/src-M/COMMON.CONTROL +++ b/source/cluster/wham/src-M/COMMON.CONTROL @@ -1,7 +1,27 @@ double precision betaT - integer iscode,indpdb,outpdb,outmol2,iopt,nstart,nend,symetr + integer iscode,indpdb,outpdb,outmol2,iopt,nstart,nend,symetr, + & constr_dist,shield_mode,tor_mode, + & constr_homology,homol_nset, + & iset,ihset,nsaxs,saxs_mode + real*8 waga_homology + real*8 waga_dist, waga_angle, waga_theta, waga_d, dist_cut, + & dist2_cut + real*8 Psaxs(maxsaxs),distsaxs(maxsaxs),CSAXS(3,maxsaxs) logical refstr,pdbref,punch_dist,print_dist,caonly,lside, - & lprint_cart,lprint_int,from_cart,efree,from_bx,from_cx + & lprint_cart,lprint_int,from_cart,efree,from_bx,from_cx, + & with_dihed_constr,with_theta_constr,out1file, + & print_homology_restraints, + & print_contact_map,print_homology_models, + & read2sigma,l_homo common /cntrl/ betaT,iscode,indpdb,refstr,pdbref,outpdb,outmol2, & punch_dist,print_dist,caonly,lside,lprint_cart,lprint_int, - & from_cart,from_bx,from_cx,efree,iopt,nstart,nend,symetr + & from_cart,from_bx,from_cx, with_dihed_constr,with_theta_constr, + & efree,iopt,nstart,nend,symetr, + & tor_mode,shield_mode, + & constr_dist,out1file, + & constr_homology,homol_nset,read2sigma + common /homol/ waga_homology(10), + & waga_dist,waga_angle,waga_theta,waga_d,dist_cut,dist2_cut, + & iset,ihset,l_homo(max_template,maxdim), + & print_homology_restraints,print_homology_models + common /saxsretr/ Psaxs,distsaxs,csaxs,nsaxs,saxs_mode