X-Git-Url: http://mmka.chem.univ.gda.pl/gitweb/?a=blobdiff_plain;f=source%2Funres%2Fsrc_MD%2FCOMMON.VAR;h=edc81d7d82865ac3025e93f7e4e6272fe08c29fe;hb=2acc9917f7452c3a59a242e6033bea16f846cbfe;hp=c2a0a254812854ea2c71deb5e3cc6502a32031f4;hpb=cc980c20ed89622e129591e212a044280de43b9f;p=unres.git diff --git a/source/unres/src_MD/COMMON.VAR b/source/unres/src_MD/COMMON.VAR index c2a0a25..edc81d7 100644 --- a/source/unres/src_MD/COMMON.VAR +++ b/source/unres/src_MD/COMMON.VAR @@ -3,9 +3,9 @@ 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, - & xxtab,yytab,zztab,xxref,yyref,zzref + & xxtab,yytab,zztab,xxref,yyref,zzref,tauangle,omicron common /var/ theta(maxres),phi(maxres),alph(maxres),omeg(maxres), - & omicron(2,maxres),tauangle(3,maxres) + & omicron(2,maxres),tauangle(3,maxres), & vbld(2*maxres),thetaref(maxres),phiref(maxres), & costtab(maxres), sinttab(maxres), cost2tab(maxres), & sint2tab(maxres),xxtab(maxres),yytab(maxres),