PRINT, BEAM, ON;
SOLND: SOLENOID, L=0.0788, B=1.5;
VARY, SOLND[B] ;
D1:  DRIFT, L=1.5372;
FIT, S11=0.3, TOLER=0.01, UPPER;
BND1:  SBEND, RADIUS=0.7, ANGLE=60., E1=18.24, E2=18.24;
PRINT, TRANS;
D2:  DRIFT, L=1.2427;
SENTINEL
SENTINEL

D1:  DRIFT, L=1.;