source/cluster/unres/src/COMMON.CONTROL

   1       double precision betaT,ts,te
   2       integer iscode,indpdb,outpdb,outmol2,iopt,is,ie,isampl
   3       logical refstr,pdbref,punch_dist,print_dist,caonly,lside,
   4      & lprint_cart,lprint_int,from_cart,from_cx,efree
   5       common /cntrl/ betaT,ts,te,is,ie,isampl,iscode,indpdb,refstr,
   6      & pdbref,outpdb,outmol2,punch_dist,print_dist,caonly,lside,
   7      & lprint_cart,lprint_int,from_cart,from_cx,efree,iopt