Project

General

Profile

Bug #820 » erit_geometry.dat

Rogers, Chris, 14 December 2011 07:12

 
1
Configuration erit
2
{
3
  Substitution $NumberOfCells 8 #ring number of cells
4
  Substitution $Radius 2.35 #ring radius, metres 
5

    
6
  Substitution $F_Q 6.4 #F magnet opening angle, degrees
7

    
8
  Substitution $D_Q 5.1/360*2*pi #D magnet opening angle, degrees
9
  Substitution $D_B0 0.727 # D magnet dipole field, T
10
  Substitution $D_K 1.92 # D field index
11

    
12
  Substitution $Gap_Q 3.75 #F-D magnet gap
13

    
14
  Substitution $NumberOfVirtuals 20
15
  Substitution $Virt_Start -5.1/360*2*pi
16
  Substitution $Virt_End 5.1/360*2*pi
17

    
18
  Dimensions 10.0 2.0 10.0 m
19
  PropertyString Material Galactic
20
  MiceModule VirtualHits
21
  {
22
      PropertyHep3Vector Position $Radius*cos(@RepeatNumber*($Virt_End-$Virt_Start)/$NumberOfVirtuals+$Virt_Start) 0.0 $Radius*sin(@RepeatNumber*($Virt_End-$Virt_Start)/$NumberOfVirtuals+$Virt_Start) m
23
      PropertyHep3Vector Rotation 0.0 @RepeatNumber*($Virt_End-$Virt_Start)/$NumberOfVirtuals+$Virt_Start 0.0 radian
24
      PropertyString     Volume Cylinder
25
      PropertyHep3Vector Dimensions 1e-4 1.0 -1.0 m
26
      PropertyString     SensitiveDetector Virtual
27
      PropertyString     IndependentVariable u
28

    
29
      PropertyBool       RepeatModule2 True
30
      PropertyInt        NumberOfRepeats $NumberOfVirtuals
31
  }
32

    
33
  MiceModule D_Magnet
34
  {
35
      PropertyHep3Vector Position $Radius-2*$Radius*sin($D_Q/4)**2 0.0 -2*$Radius*sin($D_Q/4)*cos($D_Q/4) m
36
      PropertyHep3Vector Rotation 0.0 -$D_Q/2 0.0 radian
37

    
38
      PropertyString Volume Multipole
39
      PropertyString Material Fe 
40
      PropertyDouble ApertureCurvature  $Radius m
41
      PropertyDouble ApertureLength     $Radius*sin($D_Q) m
42
      PropertyDouble ApertureInnerWidth 0.52 m
43
      PropertyDouble ApertureOuterWidth 1.42 m
44
      PropertyDouble ApertureInnerHeight 0.15 m
45
      PropertyDouble ApertureOuterHeight 1.39 m
46

    
47
      PropertyString SensitiveDetector SpecialVirtual
48

    
49
      PropertyBool Invisible 0
50
      PropertyDouble RedColour 1
51

    
52
      MiceModule D_Dipole
53
      {
54
          PropertyString Volume None
55
          PropertyString FieldType Multipole
56
          PropertyInt Pole 1
57
          PropertyDouble FieldStrength $D_B0 T
58
          PropertyDouble Height 0.15 m
59
          PropertyDouble Width  1.0 m
60
          PropertyDouble Length $Radius*sin($D_Q) m
61
          PropertyDouble ReferenceCurvature $Radius m
62
          PropertyString CurvatureModel StraightEnds
63

    
64
          PropertyString EndFieldType Tanh
65
          PropertyDouble EndLength    0.03 m
66
          PropertyDouble CentreLength $Radius*sin($D_Q) m
67
          PropertyInt    MaxEndPole   3
68
      }
69
      MiceModule D_Dipole
70
      {
71
          PropertyString Volume None
72
          PropertyString FieldType Multipole
73
          PropertyInt Pole 2
74
          PropertyDouble FieldStrength -$D_B0*$Radius**(-1)*$D_K T/m
75
          PropertyDouble Height 0.15 m
76
          PropertyDouble Width  1.0 m
77
          PropertyDouble Length $Radius*sin($D_Q) m
78
          PropertyDouble ReferenceCurvature $Radius m
79
          PropertyString CurvatureModel StraightEnds
80

    
81
          PropertyString EndFieldType HardEdged
82
          PropertyDouble EndLength    0.01 m
83
          PropertyDouble CentreLength $Radius*sin($D_Q) m
84
          PropertyInt    MaxEndPole   3
85
      }
86

    
87
  }
88

    
89
}
(2-2/5)