48 G4cout <<
"G4RPGAntiKZeroInelastic::ApplyYourself called" <<
G4endl;
50 G4cout <<
"target material = " << targetMaterial->
GetName() <<
", ";
61 modifiedOriginal = *originalIncident;
67 G4double p = std::sqrt( std::abs((et-amas)*(et+amas)) );
81 p = std::sqrt( std::abs((et-amas)*(et+amas)) );
90 targetParticle = *originalTarget;
93 G4bool incidentHasChanged =
false;
94 G4bool targetHasChanged =
false;
95 G4bool quasiElastic =
false;
102 Cascade( vec, vecLen,
103 originalIncident, currentParticle, targetParticle,
104 incidentHasChanged, targetHasChanged, quasiElastic );
109 originalIncident, originalTarget, modifiedOriginal,
110 targetNucleus, currentParticle, targetParticle,
111 incidentHasChanged, targetHasChanged, quasiElastic );
119 currentParticle, targetParticle,
120 incidentHasChanged );
122 delete originalTarget;
126 void G4RPGAntiKZeroInelastic::Cascade(
132 G4bool &incidentHasChanged,
150 G4double centerofmassEnergy = std::sqrt( mOriginal*mOriginal +
151 targetMass*targetMass +
152 2.0*targetMass*etOriginal );
153 G4double availableEnergy = centerofmassEnergy-(targetMass+mOriginal);
155 static G4bool first =
true;
156 const G4int numMul = 1200;
157 const G4int numSec = 60;
158 static G4double protmul[numMul], protnorm[numSec];
159 static G4double neutmul[numMul], neutnorm[numSec];
163 G4int counter,
nt=0, np=0, nneg=0, nz=0;
170 for( i=0; i<numMul; ++i )protmul[i] = 0.0;
171 for( i=0; i<numSec; ++i )protnorm[i] = 0.0;
173 for( np=0; np<numSec/3; ++np )
175 for( nneg=std::max(0,np-2); nneg<=np; ++nneg )
177 for( nz=0; nz<numSec/3; ++nz )
179 if( ++counter < numMul )
182 if( nt>0 && nt<=numSec )
184 protmul[counter] =
Pmltpc(np,nneg,nz,nt,b[0],c);
185 protnorm[nt-1] += protmul[counter];
191 for( i=0; i<numMul; ++i )neutmul[i] = 0.0;
192 for( i=0; i<numSec; ++i )neutnorm[i] = 0.0;
194 for( np=0; np<(numSec/3); ++np )
196 for( nneg=std::max(0,np-1); nneg<=(np+1); ++nneg )
198 for( nz=0; nz<numSec/3; ++nz )
200 if( ++counter < numMul )
203 if( nt>0 && nt<=numSec )
205 neutmul[counter] =
Pmltpc(np,nneg,nz,nt,b[1],c);
206 neutnorm[nt-1] += neutmul[counter];
212 for( i=0; i<numSec; ++i )
214 if( protnorm[i] > 0.0 )protnorm[i] = 1.0/protnorm[i];
215 if( neutnorm[i] > 0.0 )neutnorm[i] = 1.0/neutnorm[i];
233 const G4double cech[] = {1.,1.,1.,0.70,0.60,0.55,0.35,0.25,0.18,0.15};
237 np = nneg = nz = nt = 0;
238 iplab =
G4int(std::min( 19.0, pOriginal*
MeV/
GeV*10.0 ));
239 const G4double cnk0[] = {0.17,0.18,0.17,0.24,0.26,0.20,0.22,0.21,0.34,0.45,
240 0.58,0.55,0.36,0.29,0.29,0.32,0.32,0.33,0.33,0.33};
247 incidentHasChanged =
true;
248 targetHasChanged =
true;
250 }
else if( ran < 0.50 ) {
256 incidentHasChanged =
true;
257 targetHasChanged =
true;
258 }
else if( ran < 0.75 ) {
263 incidentHasChanged =
true;
264 targetHasChanged =
true;
272 incidentHasChanged =
true;
273 targetHasChanged =
true;
280 incidentHasChanged =
true;
281 targetHasChanged =
true;
285 if (availableEnergy < aPiPlus->GetPDGMass()/
MeV) {
295 for( np=0; (np<numSec/3) && (ran>=excs); ++np )
297 for( nneg=std::max(0,np-2); nneg<=np && ran>=excs; ++nneg )
299 for( nz=0; nz<numSec/3 && ran>=excs; ++nz )
301 if( ++counter < numMul )
304 if( nt>0 && nt<=numSec )
306 test = std::exp( std::min( expxu, std::max( expxl, -(
pi/4.0)*(nt*nt)/(n*n) ) ) );
307 dum = (
pi/anpn)*nt*protmul[counter]*protnorm[nt-1]/(2.0*n*n);
308 if( std::fabs(dum) < 1.0 )
310 if( test >= 1.0
e-10 )excs += dum*
test;
331 incidentHasChanged =
true;
336 targetHasChanged =
true;
343 incidentHasChanged =
true;
344 targetHasChanged =
true;
351 for( np=0; np<numSec/3 && ran>=excs; ++np )
353 for( nneg=std::max(0,np-1); nneg<=(np+1) && ran>=excs; ++nneg )
355 for( nz=0; nz<numSec/3 && ran>=excs; ++nz )
357 if( ++counter < numMul )
360 if( nt>0 && nt<=numSec )
362 test = std::exp( std::min( expxu, std::max( expxl, -(
pi/4.0)*(nt*nt)/(n*n) ) ) );
363 dum = (
pi/anpn)*nt*neutmul[counter]*neutnorm[nt-1]/(2.0*n*n);
364 if( std::fabs(dum) < 1.0 )
366 if( test >= 1.0
e-10 )excs += dum*
test;
386 incidentHasChanged =
true;
387 targetHasChanged =
true;
391 incidentHasChanged =
true;
395 targetHasChanged =
true;
410 else if( ran < 0.84 )
431 else if( ran < 0.84 )
450 else if( ran < 0.78 )
455 else if( ran < 0.89 )
466 incidentHasChanged =
true;
467 targetHasChanged =
true;
475 incidentHasChanged =
true;
483 targetHasChanged =
true;