cluster unres
[unres.git] / source / cluster / unres / src / COMMON.CONTROL
index 1fa1444..a9bf4e7 100644 (file)
@@ -1,7 +1,7 @@
-      double precision betaT
-      integer iscode,indpdb,outpdb,outmol2,iopt
+      double precision betaT,ts,te
+      integer iscode,indpdb,outpdb,outmol2,iopt,is,ie,isampl
       logical refstr,pdbref,punch_dist,print_dist,caonly,lside,
-     & lprint_cart,lprint_int,from_cart,efree
-      common /cntrl/ betaT,iscode,indpdb,refstr,pdbref,outpdb,outmol2,
-     & punch_dist,print_dist,caonly,lside,lprint_cart,lprint_int,
-     & from_cart,efree,iopt
+     & lprint_cart,lprint_int,from_cart,from_cx,efree
+      common /cntrl/ betaT,ts,te,is,ie,isampl,iscode,indpdb,refstr,
+     & pdbref,outpdb,outmol2,punch_dist,print_dist,caonly,lside,
+     & lprint_cart,lprint_int,from_cart,from_cx,efree,iopt