More tutorial ring_design devel.

bmad-doc/tutorial_ring_design/lattices/14_OrbitCorrection/a_corrector_bpm/ring.bmad

@@ -156,114 +156,116 @@ CV: vkicker, L = 0.2
 ! (2) Add corrector coils near quadrupoles using Find and Replace with regular expressions.
 ! Recipe:
 !1. In the forward arcs for drifts after focusing quadrupoles:
-! Replace (QF[^,\n]*,[^,\n]*)D1 with \1D1C1, CH, D1C2 for 
+! Replace (QF[^,\n]*,[^,\n]*)D1 
+! with \1D1C1, CH, D1C2 for 
 !2. In the forward arcs for drifts after defocusing quadrupoles:
-! Replace (QD[^,\n]*,[^,\n]*)D1 with \1D1C1, CV, D1C2
+! Replace (QD[^,\n]*,[^,\n]*)D1 
+! with \1D1C1, CV, D1C2
 !
 !3. In the reverse arcs for drifts before focusing quadrupoles:
-! Replace (D1C2, CH, D1C1)([^,\n]*,[^,\n]*QF)
+! Replace (D1)([^,\n]*,[^,\n]*QF)
 ! with D1C2, CH, D1C1\2 
 !4. In the reverse arcs for drifts before defocusing quadrupoles:
-! Replace (D1C2, CH, D1C1)([^,\n]*,[^,\n]*QD) 
+! Replace (D1)([^,\n]*,[^,\n]*QD) 
 ! with D1C2, CV, D1C1\2
 !5. In the reverse arcs for drifts at the end of a cell:
-! Replace D1C2, CH, D1C1) with D1C2, CH, D1C1) 
+! Replace D1) with D1C2, CH, D1C1) 
 
 ! (3) Define and add BPMs
 BPM: marker
 !-------------------------------------------------------
 
 
 ! Straight section forward FoDo:
-FODOSSF: line = ( \1D1C1, CH, D1C2, DB, BPM, D2S1, SDSS, D2S2, \1D1C1, CV, D1C2, DB, BPM, D2S1, SFSS, D2S2)
+FODOSSF: line = ( QFSS, D1C1, CH, D1C2, DB, D2S1, SDSS, D2S2, QDSS, D1C1, CV, D1C2, DB, D2S1, SFSS, D2S2)
 
 ! Straight section reverse FoDo:
-FODOSSR: line = ( QFSS, D2S2, SFSS, D2S1, DB, BPM, D1C2, CV, D1C1\2SS, D2S2, SFSS, D2S1, DB, BPM, D1C2, CH, D1C1)
+FODOSSR: line = ( QFSS, D2S2, SFSS, D2S1, DB, D1C2, CV, D1C1, QDSS, D2S2, SFSS, D2S1, DB, D1C2, CH, D1C1)
 
 ! 1 o'clock arc forward 2*FoDo:
-FODOAF_1: line = (\1D1C1, CH, D1C2, B, BPM, D2S1, SD1_1, D2S2, \1D1C1, CV, D1C2, B, BPM, D2S1, SF1_1, D2S2, \1D1C1, CH, D1C2, B, BPM, D2S1, SD2_1, D2S2, \1D1C1, CV, D1C2, B, BPM, D2S1, SF2_1, D2S2)
+FODOAF_1: line = (QF, D1C1, CH, D1C2, B, D2S1, SD1_1, D2S2, QD, D1C1, CV, D1C2, B, D2S1, SF1_1, D2S2, QF, D1C1, CH, D1C2, B, D2S1, SD2_1, D2S2, QD, D1C1, CV, D1C2, B, D2S1, SF2_1, D2S2)
 
 ! 5 o'clock arc forward 2*FoDo:
-FODOAF_5: line = (\1D1C1, CH, D1C2, B, BPM, D2S1, SD1_5, D2S2, \1D1C1, CV, D1C2, B, BPM, D2S1, SF1_5, D2S2, \1D1C1, CH, D1C2, B, BPM, D2S1, SD2_5, D2S2, \1D1C1, CV, D1C2, B, BPM, D2S1, SF2_5, D2S2)
+FODOAF_5: line = (QF, D1C1, CH, D1C2, B, D2S1, SD1_5, D2S2, QD, D1C1, CV, D1C2, B, D2S1, SF1_5, D2S2, QF, D1C1, CH, D1C2, B, D2S1, SD2_5, D2S2, QD, D1C1, CV, D1C2, B, D2S1, SF2_5, D2S2)
 
 ! 9 o'clock arc forward 2*FoDo:
-FODOAF_9: line = (\1D1C1, CH, D1C2, B, BPM, D2S1, SD1_9, D2S2, \1D1C1, CV, D1C2, B, BPM, D2S1, SF1_9, D2S2, \1D1C1, CH, D1C2, B, BPM, D2S1, SD2_9, D2S2, \1D1C1, CV, D1C2, B, BPM, D2S1, SF2_9, D2S2)
+FODOAF_9: line = (QF, D1C1, CH, D1C2, B, D2S1, SD1_9, D2S2, QD, D1C1, CV, D1C2, B, D2S1, SF1_9, D2S2, QF, D1C1, CH, D1C2, B, D2S1, SD2_9, D2S2, QD, D1C1, CV, D1C2, B, D2S1, SF2_9, D2S2)
 
 
 ! 3 o'clock arc reverse 2*FoDo:
-FODOAR_3: line = (QF, D2S2, SF1_3, D2S1, B, BPM, D1C2, CV, D1C1\2, D2S2, SD1_3, D2S1, B, BPM, D1C2, CH, D1C1\2, D2S2, SF2_3, D2S1, B, BPM, D1C2, CV, D1C1\2, D2S2, SD2_3, D2S1, B, BPM, D1C2, CH, D1C1)
+FODOAR_3: line = (QF, D2S2, SF1_3, D2S1, B, D1C2, CV, D1C1, QD, D2S2, SD1_3, D2S1, B, D1C2, CH, D1C1, QF, D2S2, SF2_3, D2S1, B, D1C2, CV, D1C1, QD, D2S2, SD2_3, D2S1, B, D1C2, CH, D1C1)
 
 ! 7 o'clock arc reverse 2*FoDo:
-FODOAR_7: line = (QF, D2S2, SF1_7, D2S1, B, BPM, D1C2, CV, D1C1\2, D2S2, SD1_7, D2S1, B, BPM, D1C2, CH, D1C1\2, D2S2, SF2_7, D2S1, B, BPM, D1C2, CV, D1C1\2, D2S2, SD2_7, D2S1, B, BPM, D1C2, CH, D1C1)
+FODOAR_7: line = (QF, D2S2, SF1_7, D2S1, B, D1C2, CV, D1C1, QD, D2S2, SD1_7, D2S1, B, D1C2, CH, D1C1, QF, D2S2, SF2_7, D2S1, B, D1C2, CV, D1C1, QD, D2S2, SD2_7, D2S1, B, D1C2, CH, D1C1)
 
 ! 11 o'clock arc reverse 2*FoDo:
-FODOAR_11: line = (QF, D2S2, SF1_11, D2S1, B, BPM, D1C2, CV, D1C1\2, D2S2, SD1_11, D2S1, B, BPM, D1C2, CH, D1C1\2, D2S2, SF2_11, D2S1, B, BPM, D1C2, CV, D1C1\2, D2S2, SD2_11, D2S1, B, BPM, D1C2, CH, D1C1)
+FODOAR_11: line = (QF, D2S2, SF1_11, D2S1, B, D1C2, CV, D1C1, QD, D2S2, SD1_11, D2S1, B, D1C2, CH, D1C1, QF, D2S2, SF2_11, D2S1, B, D1C2, CV, D1C1, QD, D2S2, SD2_11, D2S1, B, D1C2, CH, D1C1)
 
 !-------------------------------------------------------
 
 ! Forward dispersion suppressor:
-DISPSUPF: line = (\1D1C1, CH, D1C2, BH, BPM, D2, \1D1C1, CV, D1C2, BH, BPM, D2, \1D1C1, CH, D1C2, BH, BPM, D2, \1D1C1, CV, D1C2, BH, BPM, D2)
+DISPSUPF: line = (QF, D1C1, CH, D1C2, BH, D2, QD, D1C1, CV, D1C2, BH, D2, QFF1, D1C1, CH, D1C2, BH, D2, QDF1, D1C1, CV, D1C2, BH, D2)
 
 ! Match forward dispersion suppressor to SS:
-MSSF: line = ( \1D1C1, CH, D1C2, DB, BPM, D2, \1D1C1, CV, D1C2, DB, BPM, D2, \1D1C1, CH, D1C2, DB, BPM, D2, \1D1C1, CV, D1C2, DB, BPM, D2)
+MSSF: line = ( QFF2, D1C1, CH, D1C2, DB, D2, QDF2, D1C1, CV, D1C2, DB, D2, QFF3, D1C1, CH, D1C2, DB, D2, QDF3, D1C1, CV, D1C2, DB, D2)
 
 ARC_TO_SSF: line = (DISPSUPF, MSSF)
 
 ! Reverse dispersion suppressor:
-DISPSUPR: line = ( QF, D2, BH, BPM, D1C2, CV, D1C1\2, D2, BH, BPM, D1C2, CH, D1C1\2R1, D2, BH, BPM, D1C2, CV, D1C1\2R1, D2, BH, BPM, D1C2, CH, D1C1)
+DISPSUPR: line = ( QF, D2, BH, D1C2, CV, D1C1, QD, D2, BH, D1C2, CH, D1C1, QFR1, D2, BH, D1C2, CV, D1C1, QDR1, D2, BH, D1C2, CH, D1C1)
 
 ! Match reverse dispersion suppressor to SS:
-MSSR: line = ( QFR2, D2, DB, BPM, D1C2, CV, D1C1\2R2, D2, DB, BPM, D1C2, CH, D1C1\2R3, D2, DB, BPM, D1C2, CV, D1C1\2R3, D2, DB, BPM, D1C2, CH, D1C1)
+MSSR: line = ( QFR2, D2, DB, D1C2, CV, D1C1, QDR2, D2, DB, D1C2, CH, D1C1, QFR3, D2, DB, D1C2, CV, D1C1, QDR3, D2, DB, D1C2, CH, D1C1)
 
 ARC_TO_SSR: line = (DISPSUPR, MSSR)
 
 
 !-------------------------------------------------------
 
 ! Match forward straight section to dispersion "creator" (use QFR)
-MDCF: line = (\1D1C1, CH, D1C2, DB, BPM, D2, \1D1C1, CV, D1C2, DB, BPM, D2, \1D1C1, CH, D1C2, DB, BPM, D2, \1D1C1, CV, D1C2, DB, BPM, D2) 
+MDCF: line = (QFSS, D1C1, CH, D1C2, DB, D2, QDR3, D1C1, CV, D1C2, DB, D2, QFR3, D1C1, CH, D1C2, DB, D2, QDR2, D1C1, CV, D1C2, DB, D2) 
 
 ! Forward dispersion "creator" (use QFR)
-DISPCREF: line = (\1D1C1, CH, D1C2, BH, BPM, D2, \1D1C1, CV, D1C2, BH, BPM, D2, \1D1C1, CH, D1C2, BH, BPM, D2, \1D1C1, CV, D1C2, BH, BPM, D2)
+DISPCREF: line = (QFR2, D1C1, CH, D1C2, BH, D2, QDR1, D1C1, CV, D1C2, BH, D2, QFR1, D1C1, CH, D1C2, BH, D2, QD, D1C1, CV, D1C2, BH, D2)
 
 SS_TO_ARCF: line = (MDCF, DISPCREF)
 
 ! Match reverse straight section to dispersion "creator" (use QFF)
-MDCR: line = ( QFSS, D2, DB, BPM, D1C2, CV, D1C1\2F3, D2, DB, BPM, D1C2, CH, D1C1\2F3, D2, DB, BPM, D1C2, CV, D1C1\2F2, D2, DB, BPM, D1C2, CH, D1C1)
+MDCR: line = ( QFSS, D2, DB, D1C2, CV, D1C1, QDF3, D2, DB, D1C2, CH, D1C1, QFF3, D2, DB, D1C2, CV, D1C1, QDF2, D2, DB, D1C2, CH, D1C1)
 
 ! Reverse dispersion "creator" (use QFF)
-DISPCRER: line = ( QFF2, D2, BH, BPM, D1C2, CV, D1C1\2F1, D2, BH, BPM, D1C2, CH, D1C1\2F1, D2, BH, BPM, D1C2, CV, D1C1\2, D2, BH, BPM, D1C2, CH, D1C1)
+DISPCRER: line = ( QFF2, D2, BH, D1C2, CV, D1C1, QDF1, D2, BH, D1C2, CH, D1C1, QFF1, D2, BH, D1C2, CV, D1C1, QD, D2, BH, D1C2, CH, D1C1)
 
 SS_TO_ARCR: line = (MDCR, DISPCRER)
 
 !-------------------------------------------------------
 
-IPF: line = ( QEF1, D1, DB, BPM, D2, QEF2, D1, DB, BPM, D2, DEF1, QEF3, DEF2, QEF4, DEF3, IP6)
-IPR: line = (IP6, DER3, QER4, DER2, QER3, DER1, QER2, D2, DB, BPM, D1, QER1, D2, DB, BPM, D1C2, CH, D1C1)
+IPF: line = ( QEF1, D1, DB, D2, QEF2, D1, DB, D2, DEF1, QEF3, DEF2, QEF4, DEF3, IP6)
+IPR: line = (IP6, DER3, QER4, DER2, QER3, DER1, QER2, D2, DB, D1, QER1, D2, DB, D1C2, CH, D1C1)
 
 !-------------------------------------------------------
 
 ! Straight section forward FoDo:
-FODOSSF_2: line = ( \1D1C1, CH, D1C2, DB, BPM, D2, \1D1C1, CV, D1C2, DB, BPM, D2)
+FODOSSF_2: line = ( QFSS_2, D1C1, CH, D1C2, DB, D2, QDSS_2, D1C1, CV, D1C2, DB, D2)
 
 ! Straight section reverse FoDo:
-FODOSSR_2: line = ( QFSS_2, D2, DB, BPM, D1C2, CV, D1C1\2SS_2, D2, DB, BPM, D1C2, CH, D1C1)
+FODOSSR_2: line = ( QFSS_2, D2, DB, D1C2, CV, D1C1, QDSS_2, D2, DB, D1C2, CH, D1C1)
 
 ! Match forward dispersion suppressor to SS:
-MSSF_2: line = ( \1D1C1, CH, D1C2, DB, BPM, D2, \1D1C1, CV, D1C2, DB, BPM, D2, \1D1C1, CH, D1C2, DB, BPM, D2, \1D1C1, CV, D1C2, DB, BPM, D2)
+MSSF_2: line = ( QFF2_2, D1C1, CH, D1C2, DB, D2, QDF2_2, D1C1, CV, D1C2, DB, D2, QFF3_2, D1C1, CH, D1C2, DB, D2, QDF3_2, D1C1, CV, D1C2, DB, D2)
 
 ! Match forward dispersion suppressor to SS:
-MSSF_6: line = ( \1D1C1, CH, D1C2, DB, BPM, D2, \1D1C1, CV, D1C2, DB, BPM, D2, \1D1C1, CH, D1C2, DB, BPM, D2, \1D1C1, CV, D1C2, DB, BPM, D2)
+MSSF_6: line = ( QFF2_6, D1C1, CH, D1C2, DB, D2, QDF2_6, D1C1, CV, D1C2, DB, D2, QFF3_6, D1C1, CH, D1C2, DB, D2, QDF3_6, D1C1, CV, D1C2, DB, D2)
 
 ! Match reverse straight section to dispersion "creator" (use QFF)
-MDCR_2: line = ( QFSS_2, D2, DB, BPM, D1C2, CV, D1C1\2F3_2, D2, DB, BPM, D1C2, CH, D1C1\2F3_2, D2, DB, BPM, D1C2, CV, D1C1\2F2_2, D2, DB, BPM, D1C2, CH, D1C1)
+MDCR_2: line = ( QFSS_2, D2, DB, D1C2, CV, D1C1, QDF3_2, D2, DB, D1C2, CH, D1C1, QFF3_2, D2, DB, D1C2, CV, D1C1, QDF2_2, D2, DB, D1C2, CH, D1C1)
 
 ! Match reverse straight section to dispersion "creator" (use QFF)
-MDCR_6: line = ( QFSS, D2, DB, BPM, D1C2, CV, D1C1\2R3_6, D2, DB, BPM, D1C2, CH, D1C1\2R3_6, D2, DB, BPM, D1C2, CV, D1C1\2R2_6, D2, DB, BPM, D1C2, CH, D1C1)
+MDCR_6: line = ( QFSS, D2, DB, D1C2, CV, D1C1, QDR3_6, D2, DB, D1C2, CH, D1C1, QFR3_6, D2, DB, D1C2, CV, D1C1, QDR2_6, D2, DB, D1C2, CH, D1C1)
 
 
 ! Reverse dispersion "creator" to steal 1 quad from (use QFF)
-DISPCRER_2: line = ( QFF2_2, D2, BH, BPM, D1C2, CV, D1C1\2F1_2, D2, BH, BPM, D1C2, CH, D1C1\2F1_2, D2, BH, BPM, D1C2, CV, D1C1\2, D2, BH, BPM, D1C2, CH, D1C1)
+DISPCRER_2: line = ( QFF2_2, D2, BH, D1C2, CV, D1C1, QDF1_2, D2, BH, D1C2, CH, D1C1, QFF1_2, D2, BH, D1C2, CV, D1C1, QD, D2, BH, D1C2, CH, D1C1)
 
 
 ARC_TO_SSF_2: line = (DISPSUPF, MSSF_2)

bmad-doc/tutorial_ring_design/lattices/14_OrbitCorrection/a_corrector_bpm/ring0.bmad

@@ -156,18 +156,20 @@ CV: vkicker, L = 0.2
 ! (2) Add corrector coils near quadrupoles using Find and Replace with regular expressions.
 ! Recipe:
 !1. In the forward arcs for drifts after focusing quadrupoles:
-! Replace (QF[^,\n]*,[^,\n]*)D1 with \1D1C1, CH, D1C2 for 
+! Replace (QF[^,\n]*,[^,\n]*)D1 
+! with \1D1C1, CH, D1C2 for 
 !2. In the forward arcs for drifts after defocusing quadrupoles:
-! Replace (QD[^,\n]*,[^,\n]*)D1 with \1D1C1, CV, D1C2
+! Replace (QD[^,\n]*,[^,\n]*)D1 
+! with \1D1C1, CV, D1C2
 !
 !3. In the reverse arcs for drifts before focusing quadrupoles:
-! Replace (D1C2, CH, D1C1)([^,\n]*,[^,\n]*QF)
+! Replace (D1)([^,\n]*,[^,\n]*QF)
 ! with D1C2, CH, D1C1\2 
 !4. In the reverse arcs for drifts before defocusing quadrupoles:
-! Replace (D1C2, CH, D1C1)([^,\n]*,[^,\n]*QD) 
+! Replace (D1)([^,\n]*,[^,\n]*QD) 
 ! with D1C2, CV, D1C1\2
 !5. In the reverse arcs for drifts at the end of a cell:
-! Replace D1C2, CH, D1C1) with D1C2, CH, D1C1) 
+! Replace D1) with D1C2, CH, D1C1) 
 
 ! (3) Define and add BPMs
 BPM: marker