BesEmcDetectorMessenger Class Reference

#include <BesEmcDetectorMessenger.hh>

Inheritance diagram for BesEmcDetectorMessenger:

Public Member Functions
	BesEmcDetectorMessenger (BesEmcConstruction *, BesEmcGeometry *)
	~BesEmcDetectorMessenger ()
void	SetNewValue (G4UIcommand *, G4String)
G4String	GetCurrentValue (G4UIcommand *)

Detailed Description

Definition at line 27 of file BesEmcDetectorMessenger.hh.

Constructor & Destructor Documentation

BesEmcDetectorMessenger()

BesEmcDetectorMessenger::BesEmcDetectorMessenger	(	BesEmcConstruction *	BesDet,
		BesEmcGeometry *	besEMCGeometry
	)

Definition at line 24 of file BesEmcDetectorMessenger.cc.

:BesEmc(BesDet)
{ 
  fBesEmcGeometry=besEMCGeometry;
 
  BesdetDir = new G4UIdirectory("/calor/");
  BesdetDir->SetGuidance("Bes calorimeter detector control.");
 
  verboseCmd = new G4UIcmdWithAnInteger("/calor/verbose",this);
  verboseCmd->SetGuidance("Set Verbose level of calor management category.");
  verboseCmd->SetGuidance(" 0 : Important information");
  verboseCmd->SetGuidance(" 1 : Base information");
  verboseCmd->SetGuidance(" 2 : More...");
  verboseCmd->SetParameterName("level",true);
  verboseCmd->SetRange("level>=0");
  verboseCmd->SetDefaultValue(0);
      
  CryMaterCmd = new G4UIcmdWithAString("/calor/setCryMat",this);
  CryMaterCmd->SetGuidance("Select Material of the Crystal.");
  CryMaterCmd->SetParameterName("choice",true,true);
  //  CryMaterCmd->AvailableForStates(Idle);
  
  CasingMaterCmd = new G4UIcmdWithAString("/calor/setCasMat",this);
  CasingMaterCmd->SetGuidance("Select Material of the Casing.");
  CasingMaterCmd->SetParameterName("choice",true,true);
  //  CasingMaterCmd->AvailableForStates(Idle);
  
  CasingThickCmd = new G4UIcmdWith3VectorAndUnit("/calor/setCasThick",this);
  CasingThickCmd->SetGuidance("Set Thickness of the Casing");
  CasingThickCmd->SetParameterName("TyvekThk","AlThk","MylarThk",true);
  CasingThickCmd->SetRange("Size>=0.");
  CasingThickCmd->SetUnitCategory("Length"); 
  CasingThickCmd->SetDefaultValue(fBesEmcGeometry->GetCasingThickness()/mm);
  CasingThickCmd->SetDefaultUnit("mm");
  //  CasingThickCmd->AvailableForStates(Idle);
  
  SizeRminCmd = new G4UIcmdWithADoubleAndUnit("/calor/setSizeRmin",this);
  SizeRminCmd->SetGuidance("Set Rmin size of the barrel calorimeter");
  SizeRminCmd->SetParameterName("Size",true);
  SizeRminCmd->SetRange("Size>0.");
  SizeRminCmd->SetUnitCategory("Length");
  SizeRminCmd->SetDefaultValue(fBesEmcGeometry->GetBSCRmin()/cm);
  SizeRminCmd->SetDefaultUnit("cm");
  //  SizeRminCmd->AvailableForStates(Idle);
 
  NbPhiCmd = new G4UIcmdWithAnInteger("/calor/setNbPhi",this);
  NbPhiCmd->SetGuidance("Set number of crystals at phi direction.");
  NbPhiCmd->SetParameterName("NbCrystals",false);
  NbPhiCmd->SetRange("NbCrystals>0 && NbCrystals<=150");
  //  NbPhiCmd->AvailableForStates(Idle);
 
  NbThetaCmd = new G4UIcmdWithAnInteger("/calor/setNbTheta",this);
  NbThetaCmd->SetGuidance("Set number of crystals at theta direction.");
  NbThetaCmd->SetParameterName("NbCrystals",false);
  NbThetaCmd->SetRange("NbCrystals>0 && NbCrystals<=22");
  //  NbThetaCmd->AvailableForStates(Idle);
  
  StartIDThetaCmd = new G4UIcmdWithAnInteger("/calor/setStartTheta",this);
  StartIDThetaCmd->SetGuidance("Set ID of starting crystals at theta direction.");
  StartIDThetaCmd->SetParameterName("IDCrystal",false);
  StartIDThetaCmd->SetRange("IDCrystal>=0 && IDCrystal<22");
  //  StartIDThetaCmd->AvailableForStates(Idle);
 
  LengthCmd = new G4UIcmdWithADoubleAndUnit("/calor/setCryLength",this);
  LengthCmd->SetGuidance("Set Length of crystals of barrel calorimeter");
  LengthCmd->SetParameterName("Size",true);
  LengthCmd->SetRange("Size>0.");
  LengthCmd->SetUnitCategory("Length");
  LengthCmd->SetDefaultValue(fBesEmcGeometry->GetBSCCryLength()/cm);
  LengthCmd->SetDefaultUnit("cm");
  //  LengthCmd->AvailableForStates(Idle);
 
  UpdateCmd = new G4UIcmdWithoutParameter("/calor/update",this);
  UpdateCmd->SetGuidance("Update calorimeter geometry.");
  UpdateCmd->SetGuidance("This command MUST be applied before \"beamOn\" ");
  UpdateCmd->SetGuidance("if you changed geometrical value(s).");
  //  UpdateCmd->AvailableForStates(Idle);
      
  MagFieldCmd = new G4UIcmdWithADoubleAndUnit("/calor/setField",this);  
  MagFieldCmd->SetGuidance("Define magnetic field.");
  MagFieldCmd->SetGuidance("Magnetic field will be in Z direction.");
  MagFieldCmd->SetParameterName("Bz",true);
  MagFieldCmd->SetRange("Bz>=0.");
  MagFieldCmd->SetUnitCategory("Magnetic flux density");
  MagFieldCmd->SetDefaultValue(BesEmc->GetMagField()/tesla);
  MagFieldCmd->SetDefaultUnit("tesla");
  //  MagFieldCmd->AvailableForStates(Idle);  
}

~BesEmcDetectorMessenger()

BesEmcDetectorMessenger::~BesEmcDetectorMessenger

(

)

Definition at line 117 of file BesEmcDetectorMessenger.cc.

{
  delete verboseCmd;
  delete LengthCmd; 
  delete NbPhiCmd; delete NbThetaCmd;
  delete StartIDThetaCmd;
  delete CryMaterCmd; delete CasingMaterCmd;
  delete CasingThickCmd;
  delete SizeRminCmd;
  delete UpdateCmd;
  delete MagFieldCmd;
  delete BesdetDir;
}

Member Function Documentation

GetCurrentValue()

G4String BesEmcDetectorMessenger::GetCurrentValue

(

G4UIcommand *

command

)

Definition at line 173 of file BesEmcDetectorMessenger.cc.

{
  G4String cv;
 
  if( command == verboseCmd )
    { cv = verboseCmd->ConvertToString(BesEmc->GetVerboseLevel()); }
 
  if( command == CryMaterCmd )
    { cv = BesEmc->GetCrystalMaterial()->GetName(); }
 
  if( command == CasingMaterCmd )
    { cv = BesEmc->GetCasingMaterial()->GetName(); }
  
  return cv;
}

SetNewValue()

void BesEmcDetectorMessenger::SetNewValue	(	G4UIcommand *	command,
		G4String	newValue
	)

Definition at line 133 of file BesEmcDetectorMessenger.cc.

{ 
  if( command == verboseCmd )
    { 
      BesEmc->SetVerboseLevel(verboseCmd->GetNewIntValue(newValue));
    }
  
  if( command == CryMaterCmd )
    { BesEmc->SetCrystalMaterial(newValue);}
   
  if( command == CasingMaterCmd )
    { BesEmc->SetCasingMaterial(newValue);}
  
  if( command == CasingThickCmd )
    { BesEmc->SetCasingThickness(CasingThickCmd->GetNew3VectorValue(newValue));}
  
  if( command == SizeRminCmd )
    { BesEmc->SetBSCRmin(SizeRminCmd->GetNewDoubleValue(newValue));}
 
  if( command == NbPhiCmd )
    { BesEmc->SetBSCNbPhi(NbPhiCmd->GetNewIntValue(newValue));}
  
  if( command == NbThetaCmd )
    { BesEmc->SetBSCNbTheta(NbThetaCmd->GetNewIntValue(newValue));}
 
  if( command == StartIDThetaCmd )
    { BesEmc->SetStartIDTheta(StartIDThetaCmd->GetNewIntValue(newValue));}
 
  if( command == LengthCmd )
    { BesEmc->SetBSCCrystalLength(LengthCmd->GetNewDoubleValue(newValue));}
 
  if( command == UpdateCmd )
    { BesEmc->UpdateGeometry(); }
 
  if( command == MagFieldCmd )
    { BesEmc->SetMagField(MagFieldCmd->GetNewDoubleValue(newValue));}
}

---

The documentation for this class was generated from the following files:

• BesEmcDetectorMessenger.hh
• BesEmcDetectorMessenger.cc