Configuration QuadrupoleEnge

{

  Module QuadrupoleEngeEndField

  {

    Volume None

    PropertyHep3Vector Position 0. 0. 0.1 m

    PropertyString FieldType Multipole

    PropertyDouble Height 0.5 m

    PropertyDouble Width  0.5 m

    PropertyDouble Length 1.8 m

    PropertyDouble FieldStrength 1. T/m //1. T at x-max

    PropertyInt Pole 2

    PropertyInt MaxEndPole 4

    PropertyString EndFieldType Enge

    PropertyDouble EndLength 0.07 m

    PropertyDouble CentreLength 1.0 m

    PropertyDouble Enge1  10.6549

    PropertyDouble Enge2  1.11459

  }

  //definitions for substitution into input files

  Substitution $NPart 6 //Number of particles (steps) in each plane 

  Substitution $TransStep 0.1 //Step size (change in x or y position) per step

  Substitution $LongStep  0.1 //Increment in virtual plane position

  Substitution $NVirt     20 //Number of virtual planes

  PropertyHep3Vector Dimensions 0.5 0.5 10. m

  PropertyDouble G4StepMax 10.0 mm

  PropertyString Material Galactic

  Module Ref

  {

    Volume None

    PropertyHep3Vector Position 0. 0. 0. m

    PropertyString BeamType Pencil

    PropertyInt    Pid      2112

    PropertyDouble Time     0.

    PropertyString LongitudinalVariable Momentum

    PropertyDouble Momentum 100.

    PropertyInt    NumberOfEvents 1

    PropertyBool   UseAsReference 1

  }

  Module Beam

  {

    Volume None

    PropertyHep3Vector Position -0.298+$TransStep*(@RepeatNumber) 0. 0. m

    PropertyString BeamType Pencil

    PropertyInt    Pid      2112

    PropertyDouble Time     0.

    PropertyString LongitudinalVariable Momentum

    PropertyDouble Momentum 100. 

    PropertyInt    NumberOfEvents 1

    PropertyBool   RepeatModule2 true

    PropertyInt    NumberOfRepeats $NPart

  }

  Module Virtual

  {

    Volume None

    PropertyHep3Vector Position 0. 0. $LongStep*@RepeatNumber m

    PropertyString SensitiveDetector Virtual

    PropertyString IndependentVariable Z

    PropertyBool   RepeatModule2 True

    PropertyInt    NumberOfRepeats $NVirt

  }

}