================================================
 
      DESCRIPTION:
      compute the minimum CS radius rmin_l over nturns.
      It computes also rmt (see at new_dy_rmin1).
 
      There is here a check if x is lost, which should not
      happen: in case it does, rmin_l is set to 0d0, and
      a warning is written in the log file. Also rmt is set
      to 0d0.
 
 ================================================
 
subroutine rmin_over_dyn1(rmin_l,x,rmt)
 
COMMONS: 
common-initi.f
common-2Dsc-simulation.f
 
SUBROUTINES USED:
  messages_n
 
micromap-index
Mon Jul 17 08:57:32 CEST 2017