=========================================================
 
      Description:
      find if a particle is lost during the tracking
      lost = 0 ---> particle inside the acceptance
      lost = 1 ---> particle lost if outside acceptance
 
      Arguments:
      x = vector of the particle coorsdinates.
 
 =========================================================
 
function lost_bp_t(x)
 
COMMONS: 
common-initi.f
common-mml-lattice.f
common-2Dsc-beam.f
common-2Dsc-simulation.f
 
SUBROUTINES USED:
 
micromap-index
Mon Jul 17 08:57:31 CEST 2017