Project

General

Profile

Feature #1543 » Rogers_AlternativeLattice.dat

Blackmore, Victoria, 30 September 2014 11:18

 
1

    
2
Module StepPi
3
{
4
  PropertyString Material Galactic
5
  PropertyHep3Vector Dimensions 1000.0 1000.0 8200.0 mm 
6

    
7
  Substitution $FieldMapMode   Read
8
  Substitution $SolenoidOffset (600.0)
9
  Substitution $CellLength     (2000.0)
10
  Substitution $FCCurrent      (40.0)
11
  Substitution $Pol1           (+1)
12
  Substitution $Pol2           (+1)
13
  Substitution $Pol3           (-1)
14
  Substitution $Pol4           (-1)
15

    
16
  Substitution $FCLength 844.
17
  Substitution $FCRadius 210.
18

    
19
  Substitution $M1Current      (123.04)
20
  Substitution $M2Current      (113.12)
21

    
22
  Substitution $SSLength (2923.-259.) // this is not quite right
23
  Substitution $SSRadius (200.)
24

    
25
  Substitution $RF_Gradient (16.0)
26
  Substitution $AbsorberLength (65.)
27

    
28
  Module SSAperture
29
  {
30
    Volume Tube
31
    // upstream edge of SS is 124 mm upstream from centre of End2
32
    // centre of tube is upstream edge + $SSLength/2.
33
    Position 0. 0. -1*(+124.+3200+$SolenoidOffset+$CellLength/2.-$SSLength/2.) mm
34
    Dimensions $SSRadius 500. $SSLength mm
35
    PropertyString Material STEEL304
36
    PropertyDouble BlueColour 1.
37
  }
38
  Module SSAperture
39
  {
40
    Volume Tube
41
    // upstream edge of SS is 124 mm upstream from centre of End2
42
    // centre of tube is upstream edge - $SSLength/2.
43
    Position 0. 0. +124.+3200+$SolenoidOffset+$CellLength/2.-$SSLength/2. mm
44
    Dimensions $SSRadius 500. $SSLength mm
45
    PropertyString Material STEEL304
46
    PropertyDouble BlueColour 1.
47
  }
48
  Module FCAperture
49
  {
50
    Volume Tube
51
    Position 0. 0. -$CellLength/2. mm
52
    Dimensions $FCRadius 600. $FCLength mm
53
    PropertyString Material STEEL304
54
    PropertyDouble BlueColour 1.
55
  }
56
  Module FCAperture
57
  {
58
    Volume Tube
59
    Position 0. 0. +$CellLength/2. mm
60
    Dimensions $FCRadius 600. $FCLength mm
61
    PropertyString Material STEEL304
62
    PropertyDouble BlueColour 1.
63
  }
64
  Module EndCoil2
65
  {
66
    Volume None
67
    Position 0.0 0.0 -3200-$SolenoidOffset-$CellLength/2. mm
68
    Rotation 0.0 0.0 0.0 degree
69
    ScaleFactor $Pol1*135.18
70
    // Field
71
    PropertyString FieldType       Solenoid
72
    PropertyString FieldMapMode    $FieldMapMode
73
    PropertyString FileName        ${MAUS_ROOT_DIR}/tmp/end2.fld
74
    PropertyDouble CurrentDensity  1.
75
    PropertyDouble Length          110.6
76
    PropertyDouble Thickness       67.8
77
    PropertyDouble InnerRadius     258.
78
  }
79
  Module CenterCoil
80
  {
81
    Volume None
82
    Position 0.0 0.0 -2450.-$SolenoidOffset-$CellLength/2. mm
83
    Rotation 0.0 0.0 0.0 degree
84
    ScaleFactor $Pol1*152.44
85
    // Field
86
    PropertyString FieldType      Solenoid
87
    PropertyString FieldMapMode   $FieldMapMode
88
    PropertyString FileName       ${MAUS_ROOT_DIR}/tmp/center.fld
89
    PropertyDouble CurrentDensity 1.
90
    PropertyDouble Length         1314.3
91
    PropertyDouble Thickness      22.1
92
    PropertyDouble InnerRadius    258.
93
  }
94
  Module EndCoil1
95
  {
96
    Volume None
97
    Position 0.0 0.0 -1700.-$SolenoidOffset-$CellLength/2. mm
98
    Rotation 0.0 0.0 0.0 degree
99
    ScaleFactor $Pol1*127.37
100
    // Field
101
    PropertyString FieldType       Solenoid
102
    PropertyString FieldMapMode    $FieldMapMode
103
    PropertyString FileName        ${MAUS_ROOT_DIR}/tmp/end1.fld
104
    PropertyDouble CurrentDensity  1.
105
    PropertyDouble Length          110.6
106
    PropertyDouble Thickness       60.9
107
    PropertyDouble InnerRadius     258.
108
  }
109
  Module MatchCoil2
110
  {
111
    Volume None
112
    Position 0.0 0.0 -1300.-$SolenoidOffset-$CellLength/2. mm
113
    Rotation 0.0 0.0 0.0 degree
114
    ScaleFactor $Pol1*$M2Current
115
    // Field
116
    PropertyString FieldType         Solenoid
117
    PropertyString FieldMapMode      $FieldMapMode
118
    PropertyString FileName          ${MAUS_ROOT_DIR}/tmp/match2.fld
119
    PropertyDouble CurrentDensity    1.
120
    PropertyDouble Length            199.5
121
    PropertyDouble Thickness         30.9
122
    PropertyDouble InnerRadius       258.
123
  }
124
  Module MatchCoil1
125
  {
126
    Volume None
127
    Position 0.0 0.0 -861.0-$SolenoidOffset-$CellLength/2. mm
128
    Rotation 0.0 0.0 0.0 degree
129
    ScaleFactor $Pol1*$M1Current
130
    //Field
131
    PropertyString FieldType      Solenoid
132
    PropertyString FieldMapMode   $FieldMapMode
133
    PropertyString FileName       ${MAUS_ROOT_DIR}/tmp/match1.fld
134
    PropertyDouble CurrentDensity 1.
135
    PropertyDouble Length         201.3
136
    PropertyDouble Thickness      46.2
137
    PropertyDouble InnerRadius    258.
138
  }
139
  Module FocusCoil
140
  {
141
    Volume None
142
    Position 0.0 0.0 -202.75-$CellLength/2. mm
143
    Rotation 0.0 0.0 0.0 degree
144
    ScaleFactor $Pol1*$FCCurrent
145
    // Field
146
    PropertyString FieldType       Solenoid
147
    PropertyString FieldMapMode    $FieldMapMode
148
    PropertyString FileName        ${MAUS_ROOT_DIR}/tmp/focus.fld
149
    PropertyDouble CurrentDensity      1.
150
    PropertyDouble Length            213.3
151
    PropertyDouble Thickness          94.8
152
    PropertyDouble InnerRadius       267.
153
  }
154
  Module FocusCoil
155
  {
156
    Volume None
157
    Position 0.0 0.0 +202.75-$CellLength/2. mm
158
    Rotation 0.0 0.0 0.0 degree
159
    ScaleFactor $Pol2*$FCCurrent
160
    // Field
161
    PropertyString FieldType       Solenoid
162
    PropertyString FieldMapMode    $FieldMapMode
163
    PropertyString FileName        ${MAUS_ROOT_DIR}/tmp/focus.fld
164
    PropertyDouble CurrentDensity      1.
165
    PropertyDouble Length            213.3
166
    PropertyDouble Thickness          94.8
167
    PropertyDouble InnerRadius       267.
168
  }
169
  Module FocusCoil
170
  {
171
    Volume None
172
    Position 0.0 0.0 -202.75+$CellLength/2. mm
173
    Rotation 0.0 0.0 0.0 degree
174
    ScaleFactor $Pol3*$FCCurrent
175
    // Field
176
    PropertyString FieldType       Solenoid
177
    PropertyString FieldMapMode    $FieldMapMode
178
    PropertyString FileName        ${MAUS_ROOT_DIR}/tmp/focus.fld
179
    PropertyDouble CurrentDensity      1.
180
    PropertyDouble Length            213.3
181
    PropertyDouble Thickness          94.8
182
    PropertyDouble InnerRadius       267.
183
  }
184
  Module FocusCoil
185
  {
186
    Volume None
187
    Position 0.0 0.0 +202.75+$CellLength/2. mm
188
    Rotation 0.0 0.0 0.0 degree
189
    ScaleFactor $Pol4*$FCCurrent
190
    // Field
191
    PropertyString FieldType       Solenoid
192
    PropertyString FieldMapMode    $FieldMapMode
193
    PropertyString FileName        ${MAUS_ROOT_DIR}/tmp/focus.fld
194
    PropertyDouble CurrentDensity      1.
195
    PropertyDouble Length            213.3
196
    PropertyDouble Thickness          94.8
197
    PropertyDouble InnerRadius       267.
198
  }
199
  Module MatchCoil1
200
  {
201
    Volume None
202
    Position 0.0 0.0 861.0+$SolenoidOffset+$CellLength/2. mm
203
    Rotation 0.0 0.0 0.0 degree
204
    ScaleFactor $Pol4*$M1Current
205
    // Field
206
    PropertyString FieldType      Solenoid
207
    PropertyString FieldMapMode   $FieldMapMode
208
    PropertyString FileName       ${MAUS_ROOT_DIR}/tmp/match1.fld
209
    PropertyDouble CurrentDensity 1.
210
    PropertyDouble Length         201.3
211
    PropertyDouble Thickness      46.2
212
    PropertyDouble InnerRadius    258.
213
  }
214
  Module MatchCoil2
215
  {
216
    Volume None
217
    Position 0.0 0.0 1300.+$SolenoidOffset+$CellLength/2. mm
218
    Rotation 0.0 0.0 0.0 degree
219
    ScaleFactor $Pol4*$M2Current
220
    // Field
221
    PropertyString FieldType         Solenoid
222
    PropertyString FieldMapMode      $FieldMapMode
223
    PropertyString FileName          ${MAUS_ROOT_DIR}/tmp/match2.fld
224
    PropertyDouble CurrentDensity    1.
225
    PropertyDouble Length            199.5
226
    PropertyDouble Thickness         30.9
227
    PropertyDouble InnerRadius       258.
228
  }
229
  Module EndCoil1
230
  {
231
    Volume None
232
    Position 0.0 0.0 1700+$SolenoidOffset+$CellLength/2. mm
233
    Rotation 0.0 0.0 0.0 degree
234
    ScaleFactor $Pol4*127.37
235
    // Field
236
    PropertyString FieldType       Solenoid
237
    PropertyString FieldMapMode    $FieldMapMode
238
    PropertyString FileName        ${MAUS_ROOT_DIR}/tmp/end1.fld
239
    PropertyDouble CurrentDensity  1.
240
    PropertyDouble Length          110.6
241
    PropertyDouble Thickness       60.9
242
    PropertyDouble InnerRadius     258.
243
  }
244
  Module CenterCoil
245
  {
246
    Volume None
247
    Position 0.0 0.0 2450.+$SolenoidOffset+$CellLength/2. mm
248
    Rotation 0.0 0.0 0.0 degree
249
    ScaleFactor $Pol4*152.44
250
    // Field
251
    PropertyString FieldType      Solenoid
252
    PropertyString FieldMapMode   $FieldMapMode
253
    PropertyString FileName       ${MAUS_ROOT_DIR}/tmp/center.fld
254
    PropertyDouble CurrentDensity 1.
255
    PropertyDouble Length         1314.3
256
    PropertyDouble Thickness      22.1
257
    PropertyDouble InnerRadius    258.
258
  }
259
  Module EndCoil2
260
  {
261
    Volume None
262
    Position 0.0 0.0 3200+$SolenoidOffset+$CellLength/2. mm
263
    Rotation 0.0 0.0 0.0 degree
264
    ScaleFactor $Pol4*135.18
265
    // Field
266
    PropertyString FieldType       Solenoid
267
    PropertyString FieldMapMode    $FieldMapMode
268
    PropertyString FileName        ${MAUS_ROOT_DIR}/tmp/end2.fld
269
    PropertyDouble CurrentDensity  1.
270
    PropertyDouble Length          110.6
271
    PropertyDouble Thickness       67.8 
272
    PropertyDouble InnerRadius     258.
273
  }
274

    
275
  Module VirtualPlane
276
  {
277
    Volume None
278
    Position 0.0 0.0 -4050.0+@RepeatNumber*100 mm
279
    PropertyString SensitiveDetector Virtual
280
    PropertyBool   RepeatModule2 True
281
    PropertyInt    NumberOfRepeats 81
282
  }
283
  Module VirtualPlane // always instrument AFC centre
284
  {
285
    Volume None
286
    Position 0.0 0.0 -$CellLength/2. mm
287
    PropertyString SensitiveDetector Virtual
288
  }
289
  Module VirtualPlane // always instrument cell centre
290
  {
291
    Volume None
292
    Position 0.0 0.0 0.0 mm
293
    PropertyString SensitiveDetector Virtual
294
  }
295
  Module VirtualPlane // always instrument AFC centre
296
  {
297
    Volume None
298
    Position 0.0 0.0 $CellLength/2. mm
299
    PropertyString SensitiveDetector Virtual
300
  }
301

    
302
  Module RFCC/CavityWithFieldMap.dat // 10 mm stay clear
303
  {
304
    Position 0.0 0.0 234.5+$AbsorberLength/2. mm
305
    Rotation 0.0 180.0 0.0 degree
306
    ScaleFactor -1.*$RF_Gradient/9 // rotate through 180 degrees => field must be in opposite sense
307
  }
308
  Module RFCC/CavityWithFieldMap.dat // 10 mm stay clear
309
  {
310
    Position 0.0 0.0 -234.5-$AbsorberLength/2. mm
311
    Rotation 0.0 0.0 0.0 degree
312
    ScaleFactor $RF_Gradient/9.
313
  }
314
  Module Absorber
315
  {
316
    Volume Cylinder
317
    Position 0. 0. 0. mm
318
    Dimensions 600. $AbsorberLength mm
319
    PropertyString Material LITHIUM_HYDRIDE
320
    PropertyDouble GreenColour 1.
321
  }
322
}
323

    
(23-23/57)