//
// Compact optics : CONSTANT
//
BRFC231:=BRFC;
BRFC232:=BRFC;
BRFC232.1:=BRFSC;
BRFC232.2:=BRFSC;
BRFC233:=BRFSC;
BRFC233.1:=BRFSC;
BRFC233.2:=BRFSC;
BRFC271:=BRFC;
BRFC272:=BRFC;
BRFC272.1:=BRFSC;
BRFC272.2:=BRFSC;
BRFC273:=BRFSCN;
BRFC273.1:=BRFSCN;
BRFC273.2:=BRFSCN;
BRFC431.1:=BRFSC;
BRFC431.2:=BRFSC;
BRFC432:=BRFSC;
BRFC432.1:=BRFSC;
BRFC432.2:=BRFSC;
BRFC433:=BRFSC;
BRFC433.1:=BRFSC;
BRFC433.2:=BRFSC;
BRFC471.1:=BRFSC;
BRFC471.2:=BRFSC;
BRFC472:=BRFSC;
BRFC472.1:=BRFSC;
BRFC472.2:=BRFSC;
BRFC473:=BRFSC;
BRFC473.1:=BRFSC;
BRFC473.2:=BRFSC;
BRFC631:=BRFC;
BRFC632:=BRFC;
BRFC632.1:=BRFSC;
BRFC632.2:=BRFSC;
BRFC633:=BRFSC;
BRFC633.1:=BRFSC;
BRFC633.2:=BRFSC;
BRFC671:=BRFC;
BRFC672:=BRFC;
BRFC672.1:=BRFSC;
BRFC672.2:=BRFSC;
BRFC673:=BRFSC;
BRFC673.1:=BRFSC;
BRFC673.2:=BRFSC;
BRFC831.1:=BRFSC;
BRFC831.2:=BRFSC;
BRFC832:=BRFSC;
BRFC832.1:=BRFSC;
BRFC832.2:=BRFSC;
BRFC833.1:=BRFSC;
BRFC833.2:=BRFSC;
BRFC871.1:=BRFSC;
BRFC871.2:=BRFSC;
BRFC872:=BRFSC;
BRFC872.1:=BRFSC;
BRFC872.2:=BRFSC;
BRFC873:=BRFSC;
BRFC873.1:=BRFSC;
BRFC873.2:=BRFSC;
LRFC231:=LRFC;
LRFC232:=LRFC;
LRFC232.1:=LRFSC;
LRFC232.2:=LRFSC;
LRFC233:=LRFSC;
LRFC233.1:=LRFSC;
LRFC233.2:=LRFSC;
LRFC271:=LRFC;
LRFC272:=LRFC;
LRFC272.1:=LRFSC;
LRFC272.2:=LRFSC;
LRFC273:=LRFSCN;
LRFC273.1:=LRFSCN;
LRFC273.2:=LRFSCN;
LRFC431.1:=LRFSC;
LRFC431.2:=LRFSC;
LRFC432:=LRFSC;
LRFC432.1:=LRFSC;
LRFC432.2:=LRFSC;
LRFC433:=LRFSC;
LRFC433.1:=LRFSC;
LRFC433.2:=LRFSC;
LRFC471.1:=LRFSC;
LRFC471.2:=LRFSC;
LRFC472:=LRFSC;
LRFC472.1:=LRFSC;
LRFC472.2:=LRFSC;
LRFC473:=LRFSC;
LRFC473.1:=LRFSC;
LRFC473.2:=LRFSC;
LRFC631:=LRFC;
LRFC632:=LRFC;
LRFC632.1:=LRFSC;
LRFC632.2:=LRFSC;
LRFC633:=LRFSC;
LRFC633.1:=LRFSC;
LRFC633.2:=LRFSC;
LRFC671:=LRFC;
LRFC672:=LRFC;
LRFC672.1:=LRFSC;
LRFC672.2:=LRFSC;
LRFC673:=LRFSC;
LRFC673.1:=LRFSC;
LRFC673.2:=LRFSC;
LRFC831.1:=LRFSC;
LRFC831.2:=LRFSC;
LRFC832:=LRFSC;
LRFC832.1:=LRFSC;
LRFC832.2:=LRFSC;
LRFC833:=LRFSC;
LRFC833.1:=LRFSC;
LRFC833.2:=LRFSC;
LRFC871.1:=LRFSC;
LRFC871.2:=LRFSC;
LRFC872:=LRFSC;
LRFC872.1:=LRFSC;
LRFC872.2:=LRFSC;
LRFC873:=LRFSC;
LRFC873.1:=LRFSC;
LRFC873.2:=LRFSC;
PRFC231:=PRFC;
PRFC232:=PRFC;
PRFC232.1:=PRFSC;
PRFC232.2:=PRFSC;
PRFC233:=PRFSC;
PRFC233.1:=PRFSC;
PRFC233.2:=PRFSC;
PRFC271:=PRFC;
PRFC272:=PRFC;
PRFC272.1:=PRFSC;
PRFC272.2:=PRFSC;
PRFC273:=PRFSCN;
PRFC273.1:=PRFSCN;
PRFC273.2:=PRFSCN;
PRFC431.1:=PRFSC;
PRFC431.2:=PRFSC;
PRFC432:=PRFSC;
PRFC432.1:=PRFSC;
PRFC432.2:=PRFSC;
PRFC433:=PRFSC;
PRFC433.1:=PRFSC;
PRFC433.2:=PRFSC;
PRFC471.1:=PRFSC;
PRFC471.2:=PRFSC;
PRFC472:=PRFSC;
PRFC472.1:=PRFSC;
PRFC472.2:=PRFSC;
PRFC473:=PRFSC;
PRFC473.1:=PRFSC;
PRFC473.2:=PRFSC;
PRFC631:=PRFC;
PRFC632:=PRFC;
PRFC632.1:=PRFSC;
PRFC632.2:=PRFSC;
PRFC633:=PRFSC;
PRFC633.1:=PRFSC;
PRFC633.2:=PRFSC;
PRFC671:=PRFC;
PRFC672:=PRFC;
PRFC672.1:=PRFSC;
PRFC672.2:=PRFSC;
PRFC673:=PRFSC;
PRFC673.1:=PRFSC;
PRFC673.2:=PRFSC;
PRFC831.1:=PRFSC;
PRFC831.2:=PRFSC;
PRFC832:=PRFSC;
PRFC832.1:=PRFSC;
PRFC832.2:=PRFSC;
PRFC833.1:=PRFSC;
PRFC833.2:=PRFSC;
PRFC871.1:=PRFSC;
PRFC871.2:=PRFSC;
PRFC872:=PRFSC;
PRFC872.1:=PRFSC;
PRFC872.2:=PRFSC;
PRFC873:=PRFSC;
PRFC873.1:=PRFSC;
PRFC873.2:=PRFSC;
SRFC231:=SRFC;
SRFC232:=SRFC;
SRFC232.1:=SRFSC;
SRFC232.2:=SRFSC;
SRFC233:=SRFSC;
SRFC233.1:=SRFSC;
SRFC233.2:=SRFSC;
SRFC271:=SRFC;
SRFC272:=SRFC;
SRFC272.1:=SRFSC;
SRFC272.2:=SRFSC;
SRFC273:=SRFSCN;
SRFC273.1:=SRFSCN;
SRFC273.2:=SRFSCN;
SRFC431.1:=SRFSC;
SRFC431.2:=SRFSC;
SRFC432:=SRFSC;
SRFC432.1:=SRFSC;
SRFC432.2:=SRFSC;
SRFC433:=SRFSC;
SRFC433.1:=SRFSC;
SRFC433.2:=SRFSC;
SRFC471.1:=SRFSC;
SRFC471.2:=SRFSC;
SRFC472:=SRFSC;
SRFC472.1:=SRFSC;
SRFC472.2:=SRFSC;
SRFC473:=SRFSC;
SRFC473.1:=SRFSC;
SRFC473.2:=SRFSC;
SRFC631:=SRFC;
SRFC632:=SRFC;
SRFC632.1:=SRFSC;
SRFC632.2:=SRFSC;
SRFC633:=SRFSC;
SRFC633.1:=SRFSC;
SRFC633.2:=SRFSC;
SRFC671:=SRFC;
SRFC672:=SRFC;
SRFC672.1:=SRFSC;
SRFC672.2:=SRFSC;
SRFC673:=SRFSC;
SRFC673.1:=SRFSC;
SRFC673.2:=SRFSC;
SRFC831.1:=SRFSC;
SRFC831.2:=SRFSC;
SRFC832:=SRFSC;
SRFC832.1:=SRFSC;
SRFC832.2:=SRFSC;
SRFC833.1:=SRFSC;
SRFC833.2:=SRFSC;
SRFC871.1:=SRFSC;
SRFC871.2:=SRFSC;
SRFC872:=SRFSC;
SRFC872.1:=SRFSC;
SRFC872.2:=SRFSC;
SRFC873:=SRFSC;
SRFC873.1:=SRFSC;
SRFC873.2:=SRFSC;
TRFC231:=TRFC;
TRFC232:=TRFC;
TRFC232.1:=TRFSC;
TRFC232.2:=TRFSC;
TRFC233:=TRFSC;
TRFC233.1:=TRFSC;
TRFC233.2:=TRFSC;
TRFC271:=TRFC;
TRFC272:=TRFC;
TRFC272.1:=TRFSC;
TRFC272.2:=TRFSC;
TRFC273:=TRFSCN;
TRFC273.1:=TRFSCN;
TRFC273.2:=TRFSCN;
TRFC431.1:=TRFSC;
TRFC431.2:=TRFSC;
TRFC432:=TRFSC;
TRFC432.1:=TRFSC;
TRFC432.2:=TRFSC;
TRFC433:=TRFSC;
TRFC433.1:=TRFSC;
TRFC433.2:=TRFSC;
TRFC471.1:=TRFSC;
TRFC471.2:=TRFSC;
TRFC472:=TRFSC;
TRFC472.1:=TRFSC;
TRFC472.2:=TRFSC;
TRFC473:=TRFSC;
TRFC473.1:=TRFSC;
TRFC473.2:=TRFSC;
TRFC631:=TRFC;
TRFC632:=TRFC;
TRFC632.1:=TRFSC;
TRFC632.2:=TRFSC;
TRFC633:=TRFSC;
TRFC633.1:=TRFSC;
TRFC633.2:=TRFSC;
TRFC671:=TRFC;
TRFC672:=TRFC;
TRFC672.1:=TRFSC;
TRFC672.2:=TRFSC;
TRFC673:=TRFSC;
TRFC673.1:=TRFSC;
TRFC673.2:=TRFSC;
TRFC831.1:=TRFSC;
TRFC831.2:=TRFSC;
TRFC832:=TRFSC;
TRFC832.1:=TRFSC;
TRFC832.2:=TRFSC;
TRFC833.1:=TRFSC;
TRFC833.2:=TRFSC;
TRFC871.1:=TRFSC;
TRFC871.2:=TRFSC;
TRFC872:=TRFSC;
TRFC872.1:=TRFSC;
TRFC872.2:=TRFSC;
TRFC873:=TRFSC;
TRFC873.1:=TRFSC;
TRFC873.2:=TRFSC;
VRFC231:=VRFC;
VRFC232:=VRFC;
VRFC232.1:=VRFSC;
VRFC232.2:=VRFSC;
VRFC233:=VRFSC;
VRFC233.1:=VRFSC;
VRFC233.2:=VRFSC;
VRFC271:=VRFC;
VRFC272:=VRFC;
VRFC272.1:=VRFSC;
VRFC272.2:=VRFSC;
VRFC273:=VRFSCN;
VRFC273.1:=VRFSCN;
VRFC273.2:=VRFSCN;
VRFC431.1:=VRFSC;
VRFC431.2:=VRFSC;
VRFC432:=VRFSC;
VRFC432.1:=VRFSC;
VRFC432.2:=VRFSC;
VRFC433:=VRFSC;
VRFC433.1:=VRFSC;
VRFC433.2:=VRFSC;
VRFC471.1:=VRFSC;
VRFC471.2:=VRFSC;
VRFC472:=VRFSC;
VRFC472.1:=VRFSC;
VRFC472.2:=VRFSC;
VRFC473:=VRFSC;
VRFC473.1:=VRFSC;
VRFC473.2:=VRFSC;
VRFC631:=VRFC;
VRFC632:=VRFC;
VRFC632.1:=VRFSC;
VRFC632.2:=VRFSC;
VRFC633:=VRFSC;
VRFC633.1:=VRFSC;
VRFC633.2:=VRFSC;
VRFC671:=VRFC;
VRFC672:=VRFC;
VRFC672.1:=VRFSC;
VRFC672.2:=VRFSC;
VRFC673:=VRFSC;
VRFC673.1:=VRFSC;
VRFC673.2:=VRFSC;
VRFC831:=VRFSC;
VRFC831.1:=VRFSC;
VRFC831.2:=VRFSC;
VRFC832:=VRFSC;
VRFC832.1:=VRFSC;
VRFC832.2:=VRFSC;
VRFC833:=VRFSC;
VRFC833.1:=VRFSC;
VRFC833.2:=VRFSC;
VRFC871:=VRFSC;
VRFC871.1:=VRFSC;
VRFC871.2:=VRFSC;
VRFC872:=VRFSC;
VRFC872.1:=VRFSC;
VRFC872.2:=VRFSC;
VRFC873:=VRFSC;
VRFC873.1:=VRFSC;
VRFC873.2:=VRFSC;
XC1QS11L4:=XBRCZ;
XC1QS1OL1:=XBRCZ;
XC1QS1OL4:=XBRCZ;
XC1QS1OR4:=XBRCZ;
XC1QS1OR8:=XBRCZ;
XCIP5:=XBOCS;
XCQD42L3:=XBOCV;
XCQF23L2:=XBBCA;
XCQF23L4:=XBBCA;
XCQF23L6:=XBBCA;
XCQF23L8:=XBBCA;
XCQF23R2:=XBBCA;
XCQF23R4:=XBBCA;
XCQF23R6:=XBBCA;
XCQF23R8:=XBBCA;
XCQL13L5:=XBOCS;
XCQL13R5:=XBOCS;
XCQL1IP3:=XBOCS;
XCQL1IP5:=XBOCS;
XCQL81R5:=XBOCV;
XCQL82R5:=XBOCV;
XCQL8L1:=XBRCZ;
XCQL8R1:=XBRCZ;
XCQL9L3:=XBOCS;
XCQL9L5:=XBOCS;
XCQL9R3:=XBOCS;
XCQL9R5:=XBOCV;
XCQS10L4:=XBRCZ;
XCQS10R4:=XBRCZ;
XCQS10R8:=XBRCZ;
XCQS11L2:=XBOCS;
XCQS11L4:=XBOCV;
XCQS17L2:=XBBCA;
XCQS17L4:=XBBCA;
XCQS17L6:=XBBCA;
XCQS17L8:=XBBCA;
XCQS17R2:=XBBCA;
XCQS17R4:=XBBCA;
XCQS17R6:=XBBCA;
XCQS17R8:=XBBCA;
XCQS2AL2:=XBBCZ;
XCQS2AL4:=XBBCZ;
XCQS2AL6:=XBBCZ;
XCQS2AL8:=XBBCZ;
XCQS2AR2:=XBBCZ;
XCQS2AR4:=XBBCZ;
XCQS2AR6:=XBBCZ;
XCQS2AR8:=XBBCZ;
XCQS2L2:=XBBCZ;
XCQS2L4:=XBBCZ;
XCQS2L6:=XBBCZ;
XCQS2L8:=XBBCZ;
XCQS2R2:=XBBCZ;
XCQS2R4:=XBBCZ;
XCQS2R6:=XBBCZ;
XCQS2R8:=XBBCZ;
XCQS3AL4:=XBBCZ;
XCQS3AL8:=XBBCZ;
XCQS3AR4:=XBBCZ;
XCQS3AR8:=XBBCZ;
XCQS3BL4:=XBBCHN;
XCQS3BL8:=XBBCHN;
XCQS3BR4:=XBBCHN;
XCQS3BR8:=XBBCHN;
XCQS3L2:=XBBCHN;
XCQS3L4:=XBBCHN;
XCQS3L6:=XBBCHN;
XCQS3L8:=XBBCHN;
XCQS3R2:=XBBCHN;
XCQS3R4:=XBBCHN;
XCQS3R6:=XBBCHN;
XCQS3R8:=XBBCHN;
XCQS4L2:=XBBCZ;
XCQS4L4:=XBBCZ;
XCQS4L6:=XBBCZ;
XCQS4L8:=XBBCZ;
XCQS4R2:=XBBCZ;
XCQS4R4:=XBBCZ;
XCQS4R6:=XBBCZ;
XCQS4R8:=XBBCZ;
XCQS5L2:=XBBCV;
XCQS5L4:=XBBCV;
XCQS5L6:=XBBCV;
XCQS5L8:=XBBCV;
XCQS5R2:=XBBCV;
XCQS5R4:=XBBCV;
XCQS5R6:=XBBCV;
XCQS5R8:=XBBCV;
YC1QS11L4:=YBRCZ;
YCIP5:=YBOCS;
YCQD42L3:=YBOCV;
YCQF23L2:=YBBCA;
YCQF23L4:=YBBCA;
YCQF23L6:=YBBCA;
YCQF23L8:=YBBCA;
YCQF23R2:=YBBCA;
YCQF23R4:=YBBCA;
YCQF23R6:=YBBCA;
YCQF23R8:=YBBCA;
YCQL13L5:=YBOCS;
YCQL13R5:=YBOCS;
YCQL1IP3:=YBOCS;
YCQL1IP5:=YBOCS;
YCQL81R5:=YBOCV;
YCQL82R5:=YBOCV;
YCQL8L1:=YBRCZ;
YCQL8R1:=YBRCZ;
YCQL9L3:=YBOCS;
YCQL9L5:=YBOCS;
YCQL9R3:=YBOCS;
YCQL9R5:=YBOCV;
YCQS10L4:=YBRCZ;
YCQS10R4:=YBRCZ;
YCQS10R8:=YBRCZ;
YCQS11L2:=YBOCS;
YCQS11L4:=YBOCV;
YCQS17L2:=YBBCA;
YCQS17L4:=YBBCA;
YCQS17L6:=YBBCA;
YCQS17L8:=YBBCA;
YCQS17R2:=YBBCA;
YCQS17R4:=YBBCA;
YCQS17R6:=YBBCA;
YCQS17R8:=YBBCA;
YCQS2AL2:=YBBCZ;
YCQS2AL4:=YBBCZ;
YCQS2AL6:=YBBCZ;
YCQS2AL8:=YBBCZ;
YCQS2AR2:=YBBCZ;
YCQS2AR4:=YBBCZ;
YCQS2AR6:=YBBCZ;
YCQS2AR8:=YBBCZ;
YCQS2L2:=YBBCZ;
YCQS2L4:=YBBCZ;
YCQS2L6:=YBBCZ;
YCQS2L8:=YBBCZ;
YCQS2R2:=YBBCZ;
YCQS2R4:=YBBCZ;
YCQS2R6:=YBBCZ;
YCQS2R8:=YBBCZ;
YCQS3AL4:=YBBCZ;
YCQS3AL8:=YBBCZ;
YCQS3AR4:=YBBCZ;
YCQS3AR8:=YBBCZ;
YCQS3BL4:=YBBCHN;
YCQS3BL8:=YBBCHN;
YCQS3BR4:=YBBCHN;
YCQS3BR8:=YBBCHN;
YCQS3L2:=YBBCHN;
YCQS3L4:=YBBCHN;
YCQS3L6:=YBBCHN;
YCQS3L8:=YBBCHN;
YCQS3R2:=YBBCHN;
YCQS3R4:=YBBCHN;
YCQS3R6:=YBBCHN;
YCQS3R8:=YBBCHN;
YCQS4L2:=YBBCZ;
YCQS4L4:=YBBCZ;
YCQS4L6:=YBBCZ;
YCQS4L8:=YBBCZ;
YCQS4R2:=YBBCZ;
YCQS4R4:=YBBCZ;
YCQS4R6:=YBBCZ;
YCQS4R8:=YBBCZ;
YCQS5L2:=YBBCV;
YCQS5L4:=YBBCV;
YCQS5L6:=YBBCV;
YCQS5L8:=YBBCV;
YCQS5R2:=YBBCV;
YCQS5R4:=YBBCV;
YCQS5R6:=YBBCV;
YCQS5R8:=YBBCV;
BRFC:=0.000000000000E+00;
BRFSC:=0.000000000000E+00;
BRFSC1:=0.000000000000E+00;
BRFSCA:=0.000000000000E+00;
BRFSCN:=0.000000000000E+00;
DVZL1A.1:=0.000000000000E+00;
DVZL1A.3:=0.000000000000E+00;
DVZL1A.5:=0.000000000000E+00;
DVZL1A.7:=0.000000000000E+00;
DVZL2.2:=0.000000000000E+00;
DVZL2.4:=0.000000000000E+00;
DVZL2.6:=0.000000000000E+00;
DVZL2.8:=0.000000000000E+00;
DVZL4.2:=0.000000000000E+00;
DVZL4.4:=0.000000000000E+00;
DVZL4.6:=0.000000000000E+00;
DVZL4.8:=0.000000000000E+00;
DVZL4A.1:=0.000000000000E+00;
DVZL4A.3:=0.000000000000E+00;
DVZL4A.5:=0.000000000000E+00;
DVZL4A.7:=0.000000000000E+00;
DVZL5.4:=0.000000000000E+00;
DVZL5.8:=0.000000000000E+00;
DVZL7.2:=0.000000000000E+00;
DVZL7.4:=0.000000000000E+00;
DVZL7.6:=0.000000000000E+00;
DVZL7.8:=0.000000000000E+00;
DVZL8.1:=0.000000000000E+00;
DVZL8.3:=0.000000000000E+00;
DVZL8.5:=0.000000000000E+00;
DVZL8.7:=0.000000000000E+00;
DVZL8.L1:=0.000000000000E+00;
DVZL8.L3:=0.000000000000E+00;
DVZL8.R1:=0.000000000000E+00;
DVZL8.R3:=0.000000000000E+00;
DVZL8P.3:=0.000000000000E+00;
DVZY2.L2:=0.000000000000E+00;
DVZY2.L4:=0.000000000000E+00;
DVZY2.L6:=0.000000000000E+00;
DVZY2.L8:=0.000000000000E+00;
DVZY2.R2:=0.000000000000E+00;
DVZY2.R4:=0.000000000000E+00;
DVZY2.R6:=0.000000000000E+00;
DVZY2.R8:=0.000000000000E+00;
GAPZL11.4:=6.000000000000E-02;
GAPZL11.L4:=6.000000000000E-02;
GAPZL11.R4:=6.000000000000E-02;
GAPZL1A.1:=1.000000000000E-01;
GAPZL1A.3:=1.000000000000E-01;
GAPZL1A.5:=1.000000000000E-01;
GAPZL1A.7:=1.000000000000E-01;
GAPZL1A.L1:=1.000000000000E-01;
GAPZL1A.L3:=1.000000000000E-01;
GAPZL1A.L5:=1.000000000000E-01;
GAPZL1A.L7:=1.000000000000E-01;
GAPZL1A.R1:=1.000000000000E-01;
GAPZL1A.R3:=1.000000000000E-01;
GAPZL1A.R5:=1.000000000000E-01;
GAPZL1A.R7:=1.000000000000E-01;
GAPZL2.2:=9.000000000000E-02;
GAPZL2.4:=9.000000000000E-02;
GAPZL2.6:=9.000000000000E-02;
GAPZL2.8:=9.000000000000E-02;
GAPZL2.L2:=9.000000000000E-02;
GAPZL2.L4:=9.000000000000E-02;
GAPZL2.L6:=9.000000000000E-02;
GAPZL2.L8:=9.000000000000E-02;
GAPZL2.R2:=9.000000000000E-02;
GAPZL2.R4:=9.000000000000E-02;
GAPZL2.R6:=9.000000000000E-02;
GAPZL2.R8:=9.000000000000E-02;
GAPZL2A.2:=9.000000000000E-02;
GAPZL2A.4:=9.000000000000E-02;
GAPZL2A.6:=9.000000000000E-02;
GAPZL2A.8:=9.000000000000E-02;
GAPZL2B.1:=1.000000000000E-01;
GAPZL2B.3:=1.000000000000E-01;
GAPZL2B.5:=1.000000000000E-01;
GAPZL2B.7:=1.000000000000E-01;
GAPZL4.2:=1.580000000000E-01;
GAPZL4.4:=1.580000000000E-01;
GAPZL4.6:=1.580000000000E-01;
GAPZL4.8:=1.580000000000E-01;
GAPZL4.L2:=1.580000000000E-01;
GAPZL4.L4:=1.580000000000E-01;
GAPZL4.L6:=1.580000000000E-01;
GAPZL4.L8:=1.580000000000E-01;
GAPZL4.R2:=1.580000000000E-01;
GAPZL4.R4:=1.580000000000E-01;
GAPZL4.R6:=1.580000000000E-01;
GAPZL4.R8:=1.580000000000E-01;
GAPZL4A.1:=1.000000000000E-01;
GAPZL4A.3:=1.000000000000E-01;
GAPZL4A.5:=1.000000000000E-01;
GAPZL4A.7:=1.000000000000E-01;
GAPZL4A.L1:=1.000000000000E-01;
GAPZL4A.L3:=1.000000000000E-01;
GAPZL4A.L5:=1.000000000000E-01;
GAPZL4A.L7:=1.000000000000E-01;
GAPZL4A.R1:=1.000000000000E-01;
GAPZL4A.R3:=1.000000000000E-01;
GAPZL4A.R5:=1.000000000000E-01;
GAPZL4A.R7:=1.000000000000E-01;
GAPZL5.L4:=1.580000000000E-01;
GAPZL5.L8:=1.580000000000E-01;
GAPZL5.R4:=1.580000000000E-01;
GAPZL5.R8:=1.580000000000E-01;
GAPZL7.L2:=9.000000000000E-02;
GAPZL7.L4:=9.000000000000E-02;
GAPZL7.L6:=9.000000000000E-02;
GAPZL7.L8:=9.000000000000E-02;
GAPZL7.R2:=9.000000000000E-02;
GAPZL7.R4:=9.000000000000E-02;
GAPZL7.R6:=9.000000000000E-02;
GAPZL7.R8:=9.000000000000E-02;
GAPZL8.1:=1.000000000000E-01;
GAPZL8.3:=1.000000000000E-01;
GAPZL8.5:=1.000000000000E-01;
GAPZL8.7:=1.000000000000E-01;
GAPZL8.L1:=1.000000000000E-01;
GAPZL8.L3:=7.800000000000E-02;
GAPZL8.L5:=1.000000000000E-01;
GAPZL8.L7:=1.000000000000E-01;
GAPZL8.R1:=1.000000000000E-01;
GAPZL8.R3:=7.800000000000E-02;
GAPZL8.R5:=1.000000000000E-01;
GAPZL8.R7:=1.000000000000E-01;
GAPZL8P.L3:=7.800000000000E-02;
GAPZL8P.R3:=7.800000000000E-02;
GAPZX.L1:=1.580000000000E-01;
GAPZX.L2:=1.200000000000E-01;
GAPZX.L4:=1.200000000000E-01;
GAPZX.L5:=1.580000000000E-01;
GAPZX.L6:=1.200000000000E-01;
GAPZX.L8:=1.200000000000E-01;
GAPZX.R2:=1.200000000000E-01;
GAPZX.R4:=1.200000000000E-01;
GAPZX.R6:=1.200000000000E-01;
GAPZX.R8:=1.200000000000E-01;
GAPZXT.L4:=1.200000000000E-01;
GAPZY2.L2:=9.000000000000E-02;
GAPZY2.L4:=9.000000000000E-02;
GAPZY2.L6:=9.000000000000E-02;
GAPZY2.L8:=9.000000000000E-02;
GAPZY2.R2:=9.000000000000E-02;
GAPZY2.R4:=9.000000000000E-02;
GAPZY2.R6:=9.000000000000E-02;
GAPZY2.R8:=9.000000000000E-02;
KMB2:=3.766001400000E-03;
KMB2TOT:=6.192730000000E+00;
KMBI:=3.768801000000E-03;
KMBI2:=3.768801000000E-03;
KMBI2TOT:=9.045120000000E-02;
KMBI3:=3.768801000000E-03;
KMBI3TOT:=9.045120000000E-02;
KMBITOT:=9.045120000000E-02;
KWL:=0.000000000000E+00;
KWLMID:=0.000000000000E+00;
KWR:=0.000000000000E+00;
KWRMID:=0.000000000000E+00;
LRFC:=5.000000000000E-01;
LRFSC:=5.000000000000E-01;
LRFSCN:=5.000000000000E-01;
PRFC:=0.000000000000E+00;
PRFSC:=0.000000000000E+00;
PRFSCN:=0.000000000000E+00;
SRFC:=0.000000000000E+00;
SRFSC:=0.000000000000E+00;
SRFSCN:=0.000000000000E+00;
TRFC:=0.000000000000E+00;
TRFSC:=0.000000000000E+00;
TRFSCN:=0.000000000000E+00;
VRFC:=0.000000000000E+00;
VRFSC:=0.000000000000E+00;
VRFSCN:=0.000000000000E+00;
XBBCA:=7.900000000000E-02;
XBBCHN:=7.900000000000E-02;
XBBCV:=7.900000000000E-02;
XBBCZ:=7.900000000000E-02;
XBOCS:=7.900000000000E-02;
XBOCV:=7.900000000000E-02;
XBRCZ:=7.900000000000E-02;
YBBCA:=3.300000000000E-02;
YBBCHN:=7.900000000000E-02;
YBBCV:=3.300000000000E-02;
YBBCZ:=7.900000000000E-02;
YBOCS:=3.300000000000E-02;
YBOCV:=3.300000000000E-02;
YBRCZ:=3.300000000000E-02;

Title"F1020B98v1.lep, 102/90 BT optics for 1998 to 97 GeV";
//
//revision history:
//  origin:E1020B98v1.lep
//*****************************************************************//
//
// 1995 values carried over from 1994 and 1993
// they will be updated in 1996 after the change to 100 GeV cycle.
//   for dipoles and quads...
DKQB:=-.074;
DKSB:=1.48;
IMPKQB:=-0.194E-5;
IMPKQBI2:=-3.7646E-6;
IMPKQBT:=0.0;
IMPKQBW:=-0.222E-5;
IMPKSB:=-0.2845E-4;
IMPKSBI2:=4.3583E-5;
IMPKSBT:=-0.309E-4;
IMPKSBW:=0.29E-4;

// ARCCELL
//
KQD:=-.0230235145;
KQF:=.024675755912;

// HIBL identical for all IPs : betay=69 betax=36
KQL6:=-3.108217E-02;
KQL5:=2.761852E-02;
KQL4:=-1.781627E-02;
KQL2:=1.506392E-02;
KQL1:=-1.293780E-02;

KQL1.1:=KQL1;KQL1.3:=KQL1;KQL1.5:=KQL1;KQL1.7:=KQL1;
KQL2A.1:=KQL2;KQL2A.3:=KQL2;KQL2A.5:=KQL2;KQL2A.7:=KQL2;
KQL4A.1:=KQL4;KQL4A.3:=KQL4;KQL4A.5:=KQL4;KQL4A.7:=KQL4;
KQL5.1:=KQL5;KQL5.3:=KQL5;KQL5.5:=KQL5;KQL5.7:=KQL5;
KQL6.1:=KQL6;KQL6.3:=KQL6;KQL6.5:=KQL6;KQL6.7:=KQL6;

// RFL

KDL:=-.024818992513;
KFL:=.021399183901;

KFL.1:=KFL;KDL.3:=KDL;KDL.5:=KDL;KDL.7:=KDL;
KDL.1:=KDL;KFL.3:=KFL;KFL.5:=KFL;KFL.7:=KFL;

// DISL
//
KQL18:=-.025821466169;
KQL17:=.020688475819;
KQL16:=-.026253316621;
KQL15:=.025942651932;
KQL14:=-.021007254903;
KQL13:=.026094743156;
KQL12:=-.022500090937;
KQL11:=.016693415699;
//
KQL11.3:=KQL11;KQL11.5:=KQL11;KQL11.7:=KQL11;
KQL12.3:=KQL12;KQL12.5:=KQL12;KQL12.7:=KQL12;
KQL13.3:=KQL13;KQL13.5:=KQL13;KQL13.7:=KQL13;
KQL14.3:=KQL14;KQL14.5:=KQL14;KQL14.7:=KQL14;
KQL15.3:=KQL15;KQL15.5:=KQL15;KQL15.7:=KQL15;
KQL16.3:=KQL16;KQL16.5:=KQL16;KQL16.7:=KQL16;
KQL17.3:=KQL17;KQL17.5:=KQL17;KQL17.7:=KQL17;
KQL18.3:=KQL18;KQL18.5:=KQL18;KQL18.7:=KQL18;
//
KQL11.1:=.016697697436;
KQL12.1:=-.022500442539;
KQL13.1:=.026088822529;
KQL14.1:=-.020978813111;
KQL15.1:=.025935727066;
KQL16.1:=-.026251628482;
KQL17.1:=.020695583315;
KQL18.1:=-.0258415152;
//
// DISS4/8
//
KQS11.4:=.022806875604;
KQS12.4:=-.031024724988;
KQS13.4:=.030092809014;
KQS14.4:=-.02474085395;
KQS15.4:=.026712504705;
KQS16.4:=-.017167704547;
KQS17.4:=.015467751476;
KQS18.4:=-.015295459953;

KQS11.8:=KQS11.4;
KQS12.8:=KQS12.4;
KQS13.8:=KQS13.4;
KQS14.8:=KQS14.4;
KQS15.8:=KQS15.4;
KQS16.8:=KQS16.4;
KQS17.8:=KQS17.4;
KQS18.8:=KQS18.4;

// DISS2/6
//
KQS11.2:=.031245459044;
KQS12.2:=-.024829224869;
KQS13.2:=.029828871903;
KQS14.2:=-.025264003578;
KQS15.2:=.026972375211;
KQS16.2:=-.021832153335;
KQS17.2:=.01783143171;
KQS18.2:=-.018383063098;
//
KQS11.6:=KQS11.2;
KQS12.6:=KQS12.2;
KQS13.6:=KQS13.2;
KQS14.6:=KQS14.2;
KQS15.6:=KQS15.2;
KQS16.6:=KQS16.2;
KQS17.6:=KQS17.2;
KQS18.6:=KQS18.2;

// LOBS + RFS (specific to each IP)
//
KQS0.R2:=-.163524907565;
KQS1.R2:=.031569679754;
KQS2.2:=.011172736119;
KQS3.2:=.939471248381E-2;
KQS4.2:=-.029312068208;
KQS5.R2:=.024576725565;
KQS6.2:=-.033967262496;
KQS0.L2:=KQS0.R2;
KQS1.L2:=KQS1.R2;
KQS5.L2:=KQS5.R2;
//
KQS7.2:=.026596304092;
KQS8.2:=-.031836036272;
KQS9.2:=.031037455491;
KQS10.2:=-.029516549269;
//
KQS0.R6:=-.158914586426;
KQS1.R6:=.031833164686;
KQS2.6:=.010118606519;
KQS3.6:=.95937206244E-2;
KQS4.6:=-.029578950106;
KQS5.R6:=.024497540379;
KQS6.6:=-.033581272196;
KQS0.L6:=KQS0.R6;
KQS1.L6:=KQS1.R6;
KQS5.L6:=KQS5.R6;
//
KQS7.6:=KQS7.2;
KQS8.6:=KQS8.2;
KQS9.6:=KQS9.2;
KQS10.6:=KQS10.2;
//
KQS0.R4:=-.162271959463;
KQS1.R4:=.023804991153;
KQS2.4:=.024965045334;
KQS3.R4:=-.013920929801;
KQS5.R4:=.025014038141;
KQS6.4:=-.02201342167;
KQS0.L4:=KQS0.R4;
KQS1.L4:=KQS1.R4;
KQS3.L4:=KQS3.R4;
KQS5.L4:=KQS5.R4;
//
KQS7.4:=.031374890304;
KQS8.4:=-.030376043908;
KQS9.4:=.029946060805;
KQS10.4:=-.030961604542;
//
KQS0.R8:=-.162253819059;
KQS1.R8:=.023700622922;
KQS2.8:=.025154385777;
KQS3.R8:=-.013920668212;
KQS5.R8:=.024998725115;
KQS6.8:=-.021962910473;
KQS0.L8:=-.162260306472;
KQS1.L8:=.023704530487;
KQS3.L8:=-.013920676402;
KQS5.L8:=.024998880874;
//
KQS7.8:=KQS7.4;
KQS8.8:=KQS8.4;
KQS9.8:=KQS9.4;
KQS10.8:=KQS10.4;
//
// SEXTUPOLES ( 3 SF (vrd3) + 2 SD families  with  KSRF  := 0.0 and KSF3 = KSF2)
// matching for Qx'=Qy'=1 and beta'y constraint
// SD balanced to improved vertical non-linear chromaticity correction
// d(Qx)/d(Ex)=5.516565E+03

KSRF:=0.0;
KSSF1:=.216809718934;
KSSF2:=.172396774588;
KSSF3:=KSSF2;

KSSD1:=-.239635717962;
KSSD2:=-.166687396098;

KSSD1.2:=KSSD1;KSSD1.4:=KSSD1;KSSD1.6:=KSSD1;KSSD1.8:=KSSD1;
KSSD2.2:=KSSD2;KSSD2.4:=KSSD2;KSSD2.6:=KSSD2;KSSD2.8:=KSSD2;

KSSF1.2:=KSSF1;KSSF1.4:=KSSF1;KSSF1.6:=KSSF1;KSSF1.8:=KSSF1;
KSSF2.2:=KSSF2;KSSF2.4:=KSSF2;KSSF2.6:=KSSF2;KSSF2.8:=KSSF2;
KSSF3.2:=KSSF3;KSSF3.4:=KSSF3;KSSF3.6:=KSSF3;KSSF3.8:=KSSF3;
KSSRF.2:=KSRF;KSSRF.4:=KSRF;KSSRF.6:=KSRF;KSSRF.8:=KSRF;

//
// SEXTUPOLES ( 1 + 2 families  KSRF  := 0.0)
// matching for Qx'=Qy'=1 and beta'y constraint
// SD balanced to improved vertical non-linear chromaticity correction
//
KSRF:=0.0;
KSSF3:=KSSF1;
KSSF2:=KSSF1;
KSSF1:=.190160649736;

KSSD1:=-.239636142961;
KSSD2:=-.166686938557;

KSSD1.2:=KSSD1;KSSD1.4:=KSSD1;KSSD1.6:=KSSD1;KSSD1.8:=KSSD1;
KSSD2.2:=KSSD2;KSSD2.4:=KSSD2;KSSD2.6:=KSSD2;KSSD2.8:=KSSD2;

KSSF1.2:=KSSF1;KSSF1.4:=KSSF1;KSSF1.6:=KSSF1;KSSF1.8:=KSSF1;
KSSF2.2:=KSSF1;KSSF2.4:=KSSF1;KSSF2.6:=KSSF1;KSSF2.8:=KSSF1;
KSSF3.2:=KSSF1;KSSF3.4:=KSSF1;KSSF3.6:=KSSF1;KSSF3.8:=KSSF1;
KSSRF.2:=KSRF;KSSRF.4:=KSRF;KSSRF.6:=KSRF;KSSRF.8:=KSRF;