==========================================================
 
      courant-snyder ---->  physics coordinate
 
 ==========================================================
 
subroutine cs_phys(xs,x)
 
COMMONS: 
 
SUBROUTINES USED:
  betanew
 
micromap-index
Mon Jul 17 08:57:34 CEST 2017