X-Git-Url: http://mmka.chem.univ.gda.pl/gitweb/?a=blobdiff_plain;f=source%2Fwham%2Fsrc-M-SAXS-homology%2FCOMMON.VAR;h=5141f66c36ac6b479a32150f9d1a7e3e9681fab2;hb=34d3ad3987785642be58fb2f26557d3314215577;hp=326d6ec45b23ebb9e7364914982097e5c7d4d444;hpb=f690e8b70bab14132839afebf080d4a28363b226;p=unres.git diff --git a/source/wham/src-M-SAXS-homology/COMMON.VAR b/source/wham/src-M-SAXS-homology/COMMON.VAR index 326d6ec..5141f66 100644 --- a/source/wham/src-M-SAXS-homology/COMMON.VAR +++ b/source/wham/src-M-SAXS-homology/COMMON.VAR @@ -3,12 +3,13 @@ C Store the geometric variables in the following COMMON block. double precision theta,phi,alph,omeg,vbld,vbld_ref, & theta_ref,phi_ref,alph_ref,omeg_ref, & costtab,sinttab,cost2tab,sint2tab,tauangle,omicron, - & xxtab,yytab,zztab + & xxtab,yytab,zztab, + & thetaref,phiref,xxref,yyref,zzref common /var/ theta(maxres),phi(maxres),alph(maxres),omeg(maxres), - & vbld(2*maxres), + & vbld(2*maxres),thetaref(maxres),phiref(maxres), & costtab(maxres), sinttab(maxres), cost2tab(maxres), & sint2tab(maxres),xxtab(maxres),yytab(maxres), - & zztab(maxres), + & zztab(maxres),xxref(maxres),yyref(maxres),zzref(maxres), & ialph(maxres,2),ivar(4*maxres2),ntheta,nphi,nside,nvar, & omicron(2,maxres),tauangle(3,maxres) C Angles from experimental structure