brho := E20*(1.E10/CLIGHT) F1 := 1.02 !safety factor on Bmin F2 := 0.98 !safety factor on Bmax ! quadrupole strength limits ! (NOTE: 100 A limits for QFF2s ... was 85 A) BMINQ1EL := 7.0475 ; BMAXQ1EL := 442.3729 BMINQ2EL := -3.6221 ; BMAXQ2EL := -385.7321 BMINQ3EL1 := 4.5358 ; BMAXQ3EL1 := 328.2932 BMINQ3EL2 := 4.5687 ; BMAXQ3EL2 := 328.4073 BMINQ4EL1 := 4.5326 ; BMAXQ4EL1 := 328.7317 BMINQ4EL2 := 4.5358 ; BMAXQ4EL2 := 328.7918 BMINQ4EL3 := 4.4845 ; BMAXQ4EL3 := 329.8116 BMINQ5EL := -2.1326 ; BMAXQ5EL := -129.0669 BMINQ6E := -4.9972 ; BMAXQ6E := -301.6309 BMINQ5ER := -2.4809 ; BMAXQ5ER := -128.4194 BMINQ4ER1 := 4.4352 ; BMAXQ4ER1 := 332.1444 BMINQ4ER2 := 4.5891 ; BMAXQ4ER2 := 329.0482 BMINQ4ER3 := 4.2537 ; BMAXQ4ER3 := 328.3139 BMINQ3ER1 := 5.3934 ; BMAXQ3ER1 := 328.1315 BMINQ3ER2 := 4.6468 ; BMAXQ3ER2 := 328.8424 BMINQ2ER := -3.5400 ; BMAXQ2ER := -385.3889 BMINQ1ER := 6.9784 ; BMAXQ1ER := 437.6215 BMINQFF1 := 3.2663 ; BMAXQFF1 := 203.1012 BMINQFF21 := -3.2481 ; BMAXQFF21 := -213.7710 BMINQFF22 := -3.4052 ; BMAXQFF22 := -212.6466 BMINQFF23 := -3.2997 ; BMAXQFF23 := -212.1611 BMINQFF41 := 2.7618 ; BMAXQFF41 := 246.3301 BMINQFF42 := 2.5958 ; BMAXQFF42 := 247.1125 BMINQFF5 := -25.2215 ; BMAXQFF5 := -758.8763 BMINQFF6 := 19.9866 ; BMAXQFF6 := 441.1480 BMINQS0 := -3.0818 ; BMAXQS0 := -388.6024 BMINQS1 := 2.8218 ; BMAXQS1 := 386.8017 BMINQS2 := -2.7638 ; BMAXQS2 := -385.6861 BMINQ1E := 7.0475 ; BMAXQ1E := 437.6215 BMINQ2E := -3.6221 ; BMAXQ2E := -385.3889 BMINQ3E := 5.3934 ; BMAXQ3E := 328.1315 BMINQ4E := 4.5891 ; BMAXQ4E := 328.3139 BMINQ5E := -2.4809 ; BMAXQ5E := -128.4194 BMINQFF2 := -3.4052 ; BMAXQFF2 := -212.1611 BMINQFF4 := 2.7618 ; BMAXQFF4 := 246.3301 KMINQ1E := BMINQ1E /brho/0.5962 ; KMAXQ1E := BMAXQ1E /brho/0.5962 KMINQ2E := BMINQ2E /brho/1.0 ; KMAXQ2E := BMAXQ2E /brho/1.0 KMINQ3E := BMINQ3E /brho/0.7142 ; KMAXQ3E := BMAXQ3E /brho/0.7142 KMINQ4E := BMINQ4E /brho/0.7142 ; KMAXQ4E := BMAXQ4E /brho/0.7142 KMINQ5E := BMINQ5E /brho/0.4284 ; KMAXQ5E := BMAXQ5E /brho/0.4284 KMINQ6E := BMINQ6E /brho/0.31 ; KMAXQ6E := BMAXQ6E /brho/0.31 KMINQFF1 := BMINQFF1/brho/0.4609 ; KMAXQFF1 := BMAXQFF1/brho/0.4609 KMINQFF2 := BMINQFF2/brho/0.4609 ; KMAXQFF2 := BMAXQFF2/brho/0.4609 KMINQFF4 := BMINQFF4/brho/0.7142 ; KMAXQFF4 := BMAXQFF4/brho/0.7142 KMINQFF5 := BMINQFF5/brho/2.026 ; KMAXQFF5 := BMAXQFF5/brho/2.026 KMINQFF6 := BMINQFF6/brho/0.7142 ; KMAXQFF6 := BMAXQFF6/brho/0.7142 KMINQS0 := BMINQS0 /brho/0.46092 ; KMAXQS0 := BMAXQS0 /brho/0.46092 KMINQS1 := BMINQS1 /brho/1.0 ; KMAXQS1 := BMAXQS1 /brho/1.0 KMINQS2 := BMINQS2 /brho/1.0 ; KMAXQS2 := BMAXQS2 /brho/1.0 ! quadrupole strength variation limits KLOQ1E := F1*KMINQ1E ; KUPQ1E := F2*KMAXQ1E KLOQ2E := F2*KMAXQ2E ; KUPQ2E := F1*KMINQ2E KLOQ3E := F1*KMINQ3E ; KUPQ3E := F2*KMAXQ3E KLOQ4E := F1*KMINQ4E ; KUPQ4E := F2*KMAXQ4E KLOQ5E := F2*KMAXQ5E ; KUPQ5E := F1*KMINQ5E KLOQ6E := F2*KMAXQ6E ; KUPQ6E := F1*KMINQ6E KLOQFF1 := F1*KMINQFF1 ; KUPQFF1 := F2*KMAXQFF1 KLOQFF2 := F2*KMAXQFF2 ; KUPQFF2 := F1*KMINQFF2 KLOQFF4 := F1*KMINQFF4 ; KUPQFF4 := F2*KMAXQFF4 KLOQFF5 := F2*KMAXQFF5 ; KUPQFF5 := F1*KMINQFF5 KLOQFF6 := F1*KMINQFF6 ; KUPQFF6 := F2*KMAXQFF6 KLOQS0 := F2*KMAXQS0 ; KUPQS0 := F1*KMINQS0 KLOQS1 := F1*KMINQS1 ; KUPQS1 := F2*KMAXQS1 KLOQS2 := F2*KMAXQS2 ; KUPQS2 := F1*KMINQS2 !VALUE, KLOQ1E, KUPQ1E !VALUE, KLOQ2E, KUPQ2E !VALUE, KLOQ3E, KUPQ3E !VALUE, KLOQ4E, KUPQ4E !VALUE, KLOQ5E, KUPQ5E !VALUE, KLOQ6E, KUPQ6E !VALUE, KLOQFF1,KUPQFF1 !VALUE, KLOQFF2,KUPQFF2 !VALUE, KLOQFF4,KUPQFF4 !VALUE, KLOQFF5,KUPQFF5 !VALUE, KLOQFF6,KUPQFF6 !VALUE, KLOQS0, KUPQS0 !VALUE, KLOQS1, KUPQS1 !VALUE, KLOQS2, KUPQS2 !@20.35 GeV !KLOQ1E = 0.017762315259 KUPQ1E = 1.059714907399 !KLOQ2E = -0.556392884052 KUPQ2E = -0.54427313384E-2 !KLOQ3E = 0.0113474753 KUPQ3E = 0.663300680775 !KLOQ4E = 0.965526363676E-2 KUPQ4E = 0.663669392843 !KLOQ5E = -0.432776369524 KUPQ5E = -0.870194347785E-2 !KLOQ6E = -1.404741785549 KUPQ6E = -0.024222641334 !KLOQFF1 = 0.010648926363 KUPQFF1 = 0.636191916055 !KLOQFF2 = -0.664571044983 KUPQFF2 = -0.011101773888 !KLOQFF4 = 0.581070517357E-2 KUPQFF4 = 0.497943425198 !KLOQFF5 = -0.540771647863 KUPQFF5 = -0.01870630159 !KLOQFF6 = 0.042050923319 KUPQFF6 = 0.89175762986 !KLOQS0 = -1.21720097149 KUPQS0 = -0.010046975859 !KLOQS1 = 0.42401643496E-2 KUPQS1 = 0.558432568813 !KLOQS2 = -0.556821957036 KUPQS2 = -0.415301092545E-2 ! sextupole strength limits BMINS1EL := 137.8376 ; BMAXS1EL := 2589.199 BMINS2EL := -424.0320 ; BMAXS2EL := -21706.84 BMINS3EL1 := -142.8358 ; BMAXS3EL1 := -2625.489 BMINS3EL2 := -146.9672 ; BMAXS3EL2 := -2630.059 BMINS3ER1 := -143.6709 ; BMAXS3ER1 := -2603.032 BMINS3ER2 := -148.4979 ; BMAXS3ER2 := -2628.606 BMINS2ER := -166.5738 ; BMAXS2ER := -21638.27 BMINS1ER := 141.6299 ; BMAXS1ER := 2601.275 BMINS1E := 137.8376 ; BMAXS1E := 2589.199 BMINS2E := -424.0320 ; BMAXS2E := -21638.27 BMINS3E := -142.8358 ; BMAXS3E := -2603.032 KMINS1E := BMINS1E/brho/0.25 ; KMAXS1E := BMAXS1E/brho/0.25 KMINS2E := BMINS2E/brho/0.762 ; KMAXS2E := BMAXS2E/brho/0.762 KMINS3E := BMINS3E/brho/0.25 ; KMAXS3E := BMAXS3E/brho/0.25 ! sextupole strength variation limits KLOS1E := F1*KMINS1E ; KUPS1E := F2*KMAXS1E KLOS2E := F2*KMAXS2E ; KUPS2E := F1*KMINS2E KLOS3E := F2*KMAXS3E ; KUPS3E := F1*KMINS3E !VALUE, KLOS1E, KUPS1E !VALUE, KLOS2E, KUPS2E !VALUE, KLOS3E, KUPS3E !@20.35 GeV !KLOS1E = 0.828484056354 KUPS1E = 14.952292595812 !KLOS2E = -40.996797172605 KUPS2E = -0.836180666819 !KLOS3E = -15.032176399057 KUPS3E = -0.858526142189 RETURN