42 theHadronicParameters( inputHadParam )
46 theDirectory->SetGuidance(
"Control of general hadronic physics parameters and choices." );
53 theVerboseCmd->SetGuidance(
"Set verbose level: 0 (minimum), 1 (default), 2 (higher), ... (even higher)" );
54 theVerboseCmd->SetParameterName(
"VerboseLevel",
true );
55 theVerboseCmd->SetDefaultValue( 1 );
56 theVerboseCmd->SetRange(
"VerboseLevel>=0" );
61 theMaxEnergyCmd->SetGuidance(
"Max energy for hadronics (default: 100 TeV)" );
62 theMaxEnergyCmd->SetParameterName(
"MaxEnergy",
false );
63 theMaxEnergyCmd->SetUnitCategory(
"Energy" );
64 theMaxEnergyCmd->SetRange(
"MaxEnergy>0.0" );
68 theCRCoalescenceCmd =
new G4UIcmdWithABool(
"/process/had/enableCRCoalescence",
this );
69 theCRCoalescenceCmd->SetGuidance(
"Enable Cosmic Ray (CR) coalescence." );
70 theCRCoalescenceCmd->SetParameterName(
"EnableCRCoalescence",
false );
71 theCRCoalescenceCmd->SetDefaultValue(
false );
74 theDumpCmd =
new G4UIcommand(
"/process/had/printParameters",
this );
75 theDumpCmd->SetGuidance(
"Print all Hadronic parameters." );
77 theDumpCmd->SetToBeBroadcasted(
false );
91 if ( command == theVerboseCmd ) {
95 theHadronicParameters->SetVerboseLevel( theVerboseCmd->GetNewIntValue( newValues ) );
96 }
else if ( command == theMaxEnergyCmd ) {
97 theHadronicParameters->SetMaxEnergy( theMaxEnergyCmd->GetNewDoubleValue( newValues ) );
98 }
else if ( command == theCRCoalescenceCmd ) {
99 theHadronicParameters->SetEnableCRCoalescence( theCRCoalescenceCmd->GetNewBoolValue( newValues ) );
101 else if ( command == theDumpCmd ) {
102 theHadronicParameters->Dump();