| Geant4 Cross Reference |
1 // 1 //
2 // ******************************************* 2 // ********************************************************************
3 // * License and Disclaimer 3 // * License and Disclaimer *
4 // * 4 // * *
5 // * The Geant4 software is copyright of th 5 // * The Geant4 software is copyright of the Copyright Holders of *
6 // * the Geant4 Collaboration. It is provided 6 // * the Geant4 Collaboration. It is provided under the terms and *
7 // * conditions of the Geant4 Software License 7 // * conditions of the Geant4 Software License, included in the file *
8 // * LICENSE and available at http://cern.ch/ 8 // * LICENSE and available at http://cern.ch/geant4/license . These *
9 // * include a list of copyright holders. 9 // * include a list of copyright holders. *
10 // * 10 // * *
11 // * Neither the authors of this software syst 11 // * Neither the authors of this software system, nor their employing *
12 // * institutes,nor the agencies providing fin 12 // * institutes,nor the agencies providing financial support for this *
13 // * work make any representation or warran 13 // * work make any representation or warranty, express or implied, *
14 // * regarding this software system or assum 14 // * regarding this software system or assume any liability for its *
15 // * use. Please see the license in the file 15 // * use. Please see the license in the file LICENSE and URL above *
16 // * for the full disclaimer and the limitatio 16 // * for the full disclaimer and the limitation of liability. *
17 // * 17 // * *
18 // * This code implementation is the result 18 // * This code implementation is the result of the scientific and *
19 // * technical work of the GEANT4 collaboratio 19 // * technical work of the GEANT4 collaboration. *
20 // * By using, copying, modifying or distri 20 // * By using, copying, modifying or distributing the software (or *
21 // * any work based on the software) you ag 21 // * any work based on the software) you agree to acknowledge its *
22 // * use in resulting scientific publicati 22 // * use in resulting scientific publications, and indicate your *
23 // * acceptance of all terms of the Geant4 Sof 23 // * acceptance of all terms of the Geant4 Software license. *
24 // ******************************************* 24 // ********************************************************************
25 // 25 //
26 /// \file hadronic/Hadr01/src/PhysicsListMesse << 26 //
27 /// \brief Implementation of the PhysicsListMe << 27 // $Id: PhysicsListMessenger.cc,v 1.4 2006/08/11 14:38:11 vnivanch Exp $
>> 28 // GEANT4 tag $Name: geant4-08-03-patch-01 $
28 // 29 //
29 // 30 //
30 ////////////////////////////////////////////// 31 /////////////////////////////////////////////////////////////////////////
31 // 32 //
32 // PhysicsListMessenger 33 // PhysicsListMessenger
33 // 34 //
34 // Created: 31.01.2006 V.Ivanchenko 35 // Created: 31.01.2006 V.Ivanchenko
35 // 36 //
36 // Modified: 37 // Modified:
37 // 04.06.2006 Adoptation of Hadr01 (V.Ivanchen << 38 // 04.06.2006 Adoptation of hadr01 (V.Ivanchenko)
38 // 39 //
39 ////////////////////////////////////////////// 40 ////////////////////////////////////////////////////////////////////////
40 // 41 //
41 // << 42 //
42 43
43 #include "PhysicsListMessenger.hh" 44 #include "PhysicsListMessenger.hh"
44 45
45 #include "PhysicsList.hh" 46 #include "PhysicsList.hh"
46 << 47 #include "G4UIcmdWithADoubleAndUnit.hh"
47 #include "G4UIcmdWithAString.hh" 48 #include "G4UIcmdWithAString.hh"
48 #include "G4UIcmdWithoutParameter.hh" 49 #include "G4UIcmdWithoutParameter.hh"
49 50
50 //....oooOO0OOooo........oooOO0OOooo........oo 51 //....oooOO0OOooo........oooOO0OOooo........oooOO0OOooo........oooOO0OOooo......
51 52
52 PhysicsListMessenger::PhysicsListMessenger(Phy 53 PhysicsListMessenger::PhysicsListMessenger(PhysicsList* pPhys)
53 : G4UImessenger(), fPhysicsList(pPhys) << 54 :pPhysicsList(pPhys)
54 { << 55 {
55 fPListCmd = new G4UIcmdWithAString("/testhad << 56 gammaCutCmd = new G4UIcmdWithADoubleAndUnit("/testhadr/CutGamma",this);
56 fPListCmd->SetGuidance("Add modular physics << 57 gammaCutCmd->SetGuidance("Set gamma cut.");
57 fPListCmd->SetParameterName("PList", false); << 58 gammaCutCmd->SetParameterName("Gcut",false);
58 fPListCmd->AvailableForStates(G4State_PreIni << 59 gammaCutCmd->SetUnitCategory("Length");
59 << 60 gammaCutCmd->SetRange("Gcut>0.0");
60 fListCmd = new G4UIcmdWithoutParameter("/tes << 61 gammaCutCmd->AvailableForStates(G4State_PreInit,G4State_Idle);
61 fListCmd->SetGuidance("Available Physics Lis << 62
62 fListCmd->AvailableForStates(G4State_PreInit << 63 electCutCmd = new G4UIcmdWithADoubleAndUnit("/testhadr/CutEl",this);
>> 64 electCutCmd->SetGuidance("Set electron cut.");
>> 65 electCutCmd->SetParameterName("Ecut",false);
>> 66 electCutCmd->SetUnitCategory("Length");
>> 67 electCutCmd->SetRange("Ecut>0.0");
>> 68 electCutCmd->AvailableForStates(G4State_PreInit,G4State_Idle);
>> 69
>> 70 posCutCmd = new G4UIcmdWithADoubleAndUnit("/testhadr/CutPos",this);
>> 71 posCutCmd->SetGuidance("Set positron cut.");
>> 72 posCutCmd->SetParameterName("Pcut",false);
>> 73 posCutCmd->SetUnitCategory("Length");
>> 74 posCutCmd->SetRange("Pcut>0.0");
>> 75 posCutCmd->AvailableForStates(G4State_PreInit,G4State_Idle);
>> 76
>> 77 allCutCmd = new G4UIcmdWithADoubleAndUnit("/testhadr/CutsAll",this);
>> 78 allCutCmd->SetGuidance("Set cut for all.");
>> 79 allCutCmd->SetParameterName("cut",false);
>> 80 allCutCmd->SetUnitCategory("Length");
>> 81 allCutCmd->SetRange("cut>0.0");
>> 82 allCutCmd->AvailableForStates(G4State_PreInit,G4State_Idle);
>> 83
>> 84 pListCmd = new G4UIcmdWithAString("/testhadr/Physics",this);
>> 85 pListCmd->SetGuidance("Add modula physics list.");
>> 86 pListCmd->SetParameterName("PList",false);
>> 87 pListCmd->AvailableForStates(G4State_PreInit);
>> 88
>> 89 listCmd = new G4UIcmdWithoutParameter("/testhadr/ListPhysics",this);
>> 90 listCmd->SetGuidance("Available Physics Lists");
>> 91 listCmd->AvailableForStates(G4State_PreInit,G4State_Idle);
>> 92
63 } 93 }
64 94
65 //....oooOO0OOooo........oooOO0OOooo........oo 95 //....oooOO0OOooo........oooOO0OOooo........oooOO0OOooo........oooOO0OOooo......
66 96
67 PhysicsListMessenger::~PhysicsListMessenger() 97 PhysicsListMessenger::~PhysicsListMessenger()
68 { 98 {
69 delete fPListCmd; << 99 delete gammaCutCmd;
70 delete fListCmd; << 100 delete electCutCmd;
>> 101 delete posCutCmd;
>> 102 delete allCutCmd;
>> 103 delete pListCmd;
>> 104 delete listCmd;
71 } 105 }
72 106
73 //....oooOO0OOooo........oooOO0OOooo........oo 107 //....oooOO0OOooo........oooOO0OOooo........oooOO0OOooo........oooOO0OOooo......
74 108
75 void PhysicsListMessenger::SetNewValue(G4UIcom << 109 void PhysicsListMessenger::SetNewValue(G4UIcommand* command,
>> 110 G4String newValue)
76 { 111 {
77 if (command == fPListCmd) { << 112 if( command == gammaCutCmd )
78 if (fPhysicsList) { << 113 pPhysicsList->SetCutForGamma(gammaCutCmd->GetNewDoubleValue(newValue));
79 G4String name = newValue; << 114
80 if (name == "PHYSLIST") { << 115 if( command == electCutCmd )
81 char* path = std::getenv(name); << 116 pPhysicsList->SetCutForElectron(electCutCmd->GetNewDoubleValue(newValue));
82 if (path) << 117
83 name = G4String(path); << 118 if( command == posCutCmd )
84 else { << 119 pPhysicsList->SetCutForPositron(posCutCmd->GetNewDoubleValue(newValue));
85 G4cout << "### PhysicsListMessenger << 120
86 << " environment variable PHY << 121 if( command == allCutCmd )
87 return; << 122 {
88 } << 123 G4double cut = allCutCmd->GetNewDoubleValue(newValue);
89 } << 124 pPhysicsList->SetCutForGamma(cut);
90 fPhysicsList->AddPhysicsList(name); << 125 pPhysicsList->SetCutForElectron(cut);
91 } << 126 pPhysicsList->SetCutForPositron(cut);
92 else { <<
93 G4cout << "### PhysicsListMessenger WARN <<
94 << " /testhadr/Physics UI command <<
95 << "for reference Physics List" < <<
96 } <<
97 } <<
98 else if (command == fListCmd) { <<
99 if (fPhysicsList) { <<
100 fPhysicsList->List(); <<
101 } 127 }
102 else { << 128
103 G4cout << "### PhysicsListMessenger WARN << 129 if( command == pListCmd ) {
104 << " /testhadr/ListPhysics UI com << 130 G4String name = newValue;
105 << "for reference Physics List" < << 131 if(name == "PHYSLIST") {
>> 132 char* path = getenv(name);
>> 133 if (path) name = G4String(path);
>> 134 else {
>> 135 G4cout << "### PhysicsListMessenger WARNING: "
>> 136 << " environment variable PHYSLIST is not defined"
>> 137 << G4endl;
>> 138 return;
>> 139 }
106 } 140 }
>> 141 pPhysicsList->AddPhysicsList(name);
107 } 142 }
>> 143
>> 144 if( command == listCmd )
>> 145 pPhysicsList->List();
>> 146
108 } 147 }
109 148
110 //....oooOO0OOooo........oooOO0OOooo........oo 149 //....oooOO0OOooo........oooOO0OOooo........oooOO0OOooo........oooOO0OOooo......
111 150