DOUBLE PRECISION BATIME,TIMLIM,STIME,PREVTIM,SAFETY,RSTIME
      INTEGER WhatsUp,ndelta
      logical cutoffviol,cutoffeval,llocal
      COMMON/TIME1/STIME,TIMLIM,BATIME,PREVTIM,SAFETY,RSTIME
      COMMON/STOPTIM/WhatsUp,ndelta,cutoffviol,cutoffeval,llocal
      double precision t_func,t_grad,t_fhel,t_fbet,t_ghel,t_gbet,t_viol,
     & t_gviol,t_map,t_alamap,t_betamap
      integer n_func,n_grad,n_fhel,n_fbet,n_ghel,n_gbet,n_viol,n_gviol,
     & n_map,n_alamap,n_betamap
      common /timing/ t_func,t_grad,t_fhel,t_fbet,t_ghel,t_gbet,t_viol,
     & t_gviol,t_map,t_alamap,t_betamap,
     & n_func,n_grad,n_fhel,n_fbet,n_ghel,n_gbet,n_viol,n_gviol,
     & n_map,n_alamap,n_betamap