74 G4cout <<
" >>> G4CRMCModel default constructor" <<
G4endl;
79 G4int ranseed = 1234567;
82 const char* crmc_param =
"crmc.param";
84 fInterface =
new CRMCinterface;
85 fInterface->init( model );
90 ranseed, model, 0, 0, crmc_param,
"", 0 );
93 fIonTable = fParticleTable->GetIonTable();
127 G4int idTarg = ZT*10000 + AT*10;
155 gCRMC_data.fNParticles,
156 gCRMC_data.fImpactParameter,
157 gCRMC_data.fPartId[0],
158 gCRMC_data.fPartPx[0],
159 gCRMC_data.fPartPy[0],
160 gCRMC_data.fPartPz[0],
161 gCRMC_data.fPartEnergy[0],
162 gCRMC_data.fPartMass[0],
163 gCRMC_data.fPartStatus[0] );
166 for (
G4int i = 0; i < gCRMC_data.fNParticles; i++ ) {
169 if ( gCRMC_data.fPartStatus[i] != 1 )
continue;
173 gCRMC_data.fPartPy[i]*GeV,
174 gCRMC_data.fPartPz[i]*GeV ) );
184 for (
G4int j = 0; j < nSecondaries; j++ ) {
191 G4cout <<
"----------------------------------------" << G4endl
192 <<
"Total energy before collision = " << totalEbefore <<
" MeV" << G4endl
193 <<
"Total energy after collision = " << totalEafter <<
" MeV" << G4endl
194 <<
"Total momentum before collision = " << pBefore <<
" MeV/c" << G4endl
195 <<
"Total momentum after collision = " << totalPafter <<
" MeV/c" <<
G4endl;
197 G4cout <<
"Total charge before collision = " << (ZP + ZT)*
eplus << G4endl
198 <<
"Total charge after collision = " << charge <<G4endl
199 <<
"Total baryon number before collision = " << (AP + AT) << G4endl
200 <<
"Total baryon number after collision = "<< baryon <<
G4endl;
202 G4cout <<
"----------------------------------------" <<
G4endl;
211 <<
" *****************************************************************" <<
G4endl;
214 }
else if (
fModel == 1 ) {
216 }
else if (
fModel == 6 ) {
218 }
else if (
fModel == 12 ) {
221 G4cout <<
" *****************************************************************" << G4endl
229 const G4int crmc_ion_coef_0 = 1000000000;
230 const G4int crmc_ion_coef_z = 10000;
231 const G4int crmc_ion_coef_a = 10;
233 if ( ! pdef && particle_id > crmc_ion_coef_0 ) {
234 int Z = ( particle_id - crmc_ion_coef_0 ) / crmc_ion_coef_z;
235 int A = ( particle_id - crmc_ion_coef_0 - crmc_ion_coef_z*
Z ) / crmc_ion_coef_a;