12 :fEMfieldSetup(pEMfieldSetup)
13{
14 F01detDir= new G4UIdirectory("/field/");
15 F01detDir->SetGuidance("Bes MagneticField tracking control.");
16
17 StepperCmd= new G4UIcmdWithAnInteger("/field/SetStepperType",this);
18 StepperCmd->SetGuidance("Select stepper type for magnetic field");
19 StepperCmd->SetParameterName("choice",true);
20 StepperCmd->SetDefaultValue(4);
21 StepperCmd->SetRange("choice>=0&&choice<=9");
22
23 MinStepCmd= new G4UIcmdWithADoubleAndUnit("/field/SetMinStep",this);
24 MinStepCmd->SetGuidance("Please change it carefully,it is better keep it const");
25 MinStepCmd->SetParameterName("MinStep",true);
26 MinStepCmd->SetDefaultUnit("mm");
27 MinStepCmd->SetDefaultValue(0.01);
28 MinStepCmd->SetRange("MinStep>=0&&MinStep<=1");
29
30 DeltaOneStepCmd= new G4UIcmdWithADoubleAndUnit("/field/SetDeltaOneStep",this);
31 DeltaOneStepCmd->SetGuidance("Set DeltaOneStep for tracking");
32 DeltaOneStepCmd->SetParameterName("DeltaOneStep",true);
33 DeltaOneStepCmd->SetDefaultUnit("mm");
34 DeltaOneStepCmd->SetDefaultValue(0.01);
35 DeltaOneStepCmd->SetRange("DeltaOneStep>=0");
36
37 DeltaIntersectionCmd=new G4UIcmdWithADoubleAndUnit("/field/SetDeltaIntersection",this);
38 DeltaIntersectionCmd->SetGuidance("Set DeltaIntersection for tracking");
39 DeltaIntersectionCmd->SetParameterName("DeltaIntersection",true);
40 DeltaIntersectionCmd->SetDefaultUnit("mm");
41 DeltaIntersectionCmd->SetDefaultValue(0.001);
42 DeltaIntersectionCmd->SetRange("DeltaIntersection>=0");
43
44 MinimumEpsilonStepCmd=new G4UIcmdWithADouble("/field/SetMinimumEpsilonStep",this);
45 MinimumEpsilonStepCmd->SetGuidance("Set Minimum Epsilon Step for tracking");
46 MinimumEpsilonStepCmd->SetParameterName("MinimumEpsilonStep",true);
47 MinimumEpsilonStepCmd->SetDefaultValue(5.0e-5);
48 MinimumEpsilonStepCmd->SetRange("MinimumEpsilonStep>=0");
49
50 MaximumEpsilonStepCmd=new G4UIcmdWithADouble("/field/SetMaximumEpsilonStep",this);
51 MaximumEpsilonStepCmd->SetGuidance("Set Maximum Epsilon Step for tracking");
52 MaximumEpsilonStepCmd->SetParameterName("MaximumEpsilonStep",true);
53 MaximumEpsilonStepCmd->SetDefaultValue(1.0e-3);
54 MaximumEpsilonStepCmd->SetRange("MaximumEpsilonStep>=0");
55}