X-Git-Url: http://mmka.chem.univ.gda.pl/gitweb/?a=blobdiff_plain;f=source%2Funres%2Fsrc_CSA%2FCOMMON.VAR;h=1ab0a1690a8f38936c857b076f5050091a644573;hb=7a3350f7afbf70b7a90c51580f5327860d877d98;hp=71158b8698418b411f2ca26384572410bd65a903;hpb=a70be6e9e57486949af48628f1bc8810bcbe7ce6;p=unres.git

diff --git a/source/unres/src_CSA/COMMON.VAR b/source/unres/src_CSA/COMMON.VAR
index 71158b8..1ab0a16 100644
--- a/source/unres/src_CSA/COMMON.VAR
+++ b/source/unres/src_CSA/COMMON.VAR
@@ -3,10 +3,12 @@ C Store the geometric variables in the following COMMON block.
      &        mask_theta,mask_phi,mask_side
       double precision theta,phi,alph,omeg,varsave,esave,varall,vbld,
      &          thetaref,phiref,costtab,sinttab,cost2tab,sint2tab,
+     &          tauangle,omicron,
      &          xxtab,yytab,zztab,xxref,yyref,zzref
       common /var/ theta(maxres),phi(maxres),alph(maxres),omeg(maxres),
      &          vbld(2*maxres),thetaref(maxres),phiref(maxres),
      &          costtab(maxres), sinttab(maxres), cost2tab(maxres),
+     &          omicron(2,maxres),tauangle(3,maxres),
      &          sint2tab(maxres),xxtab(maxres),yytab(maxres),
      &          zztab(maxres),xxref(maxres),yyref(maxres),zzref(maxres),
      &          ialph(maxres,2),ivar(4*maxres2),ntheta,nphi,nside,nvar