====================================================
 
     Compute the linear acceptance
     it is the minimum KV emittance accepted in x-px
     and y-py checking in setps of 1 cm (!)
 
 ====================================================
 
subroutine acceptance_a(accx, accy)
 
COMMONS: 
common-initi.f
common-mml-lattice.f
 
SUBROUTINES USED:
  optic_ric_m
 
micromap-index
Mon Jul 17 08:57:33 CEST 2017