Wprowadzenie SCCOR do WHAMa i CLUSTROWNIA
[unres.git] / source / wham / src / COMMON.VAR
index ad412d0..2b11894 100644 (file)
@@ -3,8 +3,9 @@ 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,
-     &          xxtab,yytab,zztab
+     &          xxtab,yytab,zztab,tauangle,omicron
       common /var/ theta(maxres),phi(maxres),alph(maxres),omeg(maxres),
+     &          omicron(2,maxres),tauangle(3,maxres),
      &          vbld(2*maxres),
      &          costtab(maxres), sinttab(maxres), cost2tab(maxres),
      &          sint2tab(maxres),xxtab(maxres),yytab(maxres),