saxs/src/SAXSPhysicsListMessenger.cc

0001 //
0002 // ********************************************************************
0003 // * License and Disclaimer                                           *
0004 // *                                                                  *
0005 // * The  Geant4 software  is  copyright of the Copyright Holders  of *
0006 // * the Geant4 Collaboration.  It is provided  under  the terms  and *
0007 // * conditions of the Geant4 Software License,  included in the file *
0008 // * LICENSE and available at  http://cern.ch/geant4/license .  These *
0009 // * include a list of copyright holders.                             *
0010 // *                                                                  *
0011 // * Neither the authors of this software system, nor their employing *
0012 // * institutes,nor the agencies providing financial support for this *
0013 // * work  make  any representation or  warranty, express or implied, *
0014 // * regarding  this  software system or assume any liability for its *
0015 // * use.  Please see the license in the file  LICENSE  and URL above *
0016 // * for the full disclaimer and the limitation of liability.         *
0017 // *                                                                  *
0018 // * This  code  implementation is the result of  the  scientific and *
0019 // * technical work of the GEANT4 collaboration.                      *
0020 // * By using,  copying,  modifying or  distributing the software (or *
0021 // * any work based  on the software)  you  agree  to acknowledge its *
0022 // * use  in  resulting  scientific  publications,  and indicate your *
0023 // * acceptance of all terms of the Geant4 Software license.          *
0024 // ********************************************************************
0025 //
0026 /// \file SAXSPhysicsListMessenger.cc
0027 /// \brief Definition of the SAXSPhysicsListMessenger class
0028 //
0029 //....oooOO0OOooo........oooOO0OOooo........oooOO0OOooo........oooOO0OOooo......
0030
0031 #include "SAXSPhysicsListMessenger.hh"
0032
0033 #include "SAXSPhysicsList.hh"
0034
0035 #include "G4UIcmdWithABool.hh"
0036 #include "G4UIcmdWithADoubleAndUnit.hh"
0037 #include "G4UIcmdWithAString.hh"
0038 #include "G4UIcmdWithAnInteger.hh"
0039 #include "G4UIdirectory.hh"
0040
0041 //....oooOO0OOooo........oooOO0OOooo........oooOO0OOooo........oooOO0OOooo......
0042
0043 SAXSPhysicsListMessenger::SAXSPhysicsListMessenger(SAXSPhysicsList* pPhys)
0044   : G4UImessenger(), fPhysicsList(pPhys)
0045 {
0046   fPhysDir = new G4UIdirectory("/phys/");
0047   fPhysDir->SetGuidance("PhysicsList control");
0048
0049   fCutsCmd = new G4UIcmdWithADoubleAndUnit("/phys/setCuts", this);
0050   fCutsCmd->SetGuidance("set cuts");
0051   fCutsCmd->SetParameterName("cuts", false);
0052   fCutsCmd->SetUnitCategory("Length");
0053   fCutsCmd->SetRange("cuts>0.");
0054   fCutsCmd->AvailableForStates(G4State_PreInit, G4State_Idle);
0055
0056   fListCmd = new G4UIcmdWithAString("/phys/SelectPhysicsList", this);
0057   fListCmd->SetGuidance("Select the EM physics list");
0058   fListCmd->SetParameterName("PList", false);
0059   fListCmd->AvailableForStates(G4State_PreInit);
0060
0061   fUseMIFlagCmd = new G4UIcmdWithABool("/phys/useMIFlag", this);
0062   fUseMIFlagCmd->SetGuidance("Enable (default) or disable MI for the PenelopeMI physics list");
0063   fUseMIFlagCmd->SetParameterName("useMIFlag", true);
0064   fUseMIFlagCmd->AvailableForStates(G4State_PreInit);
0065 }
0066
0067 //....oooOO0OOooo........oooOO0OOooo........oooOO0OOooo........oooOO0OOooo......
0068
0069 SAXSPhysicsListMessenger::~SAXSPhysicsListMessenger()
0070 {
0071   delete fPhysDir;
0072   delete fCutsCmd;
0073   delete fListCmd;
0074   delete fUseMIFlagCmd;
0075 }
0076
0077 //....oooOO0OOooo........oooOO0OOooo........oooOO0OOooo........oooOO0OOooo......
0078
0079 void SAXSPhysicsListMessenger::SetNewValue(G4UIcommand* command, G4String newValue)
0080 {
0081   if (command == fCutsCmd) fPhysicsList->SetDefaultCutsValue(fCutsCmd->GetNewDoubleValue(newValue));
0082   if (command == fListCmd) fPhysicsList->SelectPhysicsList(newValue);
0083   if (command == fUseMIFlagCmd)
0084     fPhysicsList->SetUseMIFlag(fUseMIFlagCmd->GetNewBoolValue(newValue));
0085 }
0086
0087 //....oooOO0OOooo........oooOO0OOooo........oooOO0OOooo........oooOO0OOooo......