Geant4  10.03.p01
 All Classes Namespaces Files Functions Variables Typedefs Enumerations Enumerator Friends Macros Pages
G4ChipsKaonMinusElasticXS Class Reference

#include <G4ChipsKaonMinusElasticXS.hh>

Inheritance diagram for G4ChipsKaonMinusElasticXS:
Collaboration diagram for G4ChipsKaonMinusElasticXS:

Public Member Functions

 G4ChipsKaonMinusElasticXS ()
 
 ~G4ChipsKaonMinusElasticXS ()
 
virtual void CrossSectionDescription (std::ostream &) const
 
virtual G4bool IsIsoApplicable (const G4DynamicParticle *Pt, G4int Z, G4int A, const G4Element *elm, const G4Material *mat)
 
virtual G4double GetIsoCrossSection (const G4DynamicParticle *, G4int tgZ, G4int A, const G4Isotope *iso=0, const G4Element *elm=0, const G4Material *mat=0)
 
virtual G4double GetChipsCrossSection (G4double momentum, G4int Z, G4int N, G4int pdg)
 
G4double GetExchangeT (G4int tZ, G4int tN, G4int pPDG)
 
- Public Member Functions inherited from G4VCrossSectionDataSet
 G4VCrossSectionDataSet (const G4String &nam="")
 
virtual ~G4VCrossSectionDataSet ()
 
virtual G4bool IsElementApplicable (const G4DynamicParticle *, G4int Z, const G4Material *mat=0)
 
G4double GetCrossSection (const G4DynamicParticle *, const G4Element *, const G4Material *mat=0)
 
G4double ComputeCrossSection (const G4DynamicParticle *, const G4Element *, const G4Material *mat=0)
 
virtual G4double GetElementCrossSection (const G4DynamicParticle *, G4int Z, const G4Material *mat=0)
 
virtual G4Isotope * SelectIsotope (const G4Element *, G4double kinEnergy)
 
virtual void BuildPhysicsTable (const G4ParticleDefinition &)
 
virtual void DumpPhysicsTable (const G4ParticleDefinition &)
 
virtual G4int GetVerboseLevel () const
 
virtual void SetVerboseLevel (G4int value)
 
G4double GetMinKinEnergy () const
 
void SetMinKinEnergy (G4double value)
 
G4double GetMaxKinEnergy () const
 
void SetMaxKinEnergy (G4double value)
 
const G4String & GetName () const
 

Static Public Member Functions

static const char * Default_Name ()
 

Additional Inherited Members

- Protected Member Functions inherited from G4VCrossSectionDataSet
void SetName (const G4String &)
 
- Protected Attributes inherited from G4VCrossSectionDataSet
G4int verboseLevel
 

Detailed Description

Definition at line 46 of file G4ChipsKaonMinusElasticXS.hh.

Constructor & Destructor Documentation

G4ChipsKaonMinusElasticXS::G4ChipsKaonMinusElasticXS ( )

Definition at line 76 of file G4ChipsKaonMinusElasticXS.cc.

76  :G4VCrossSectionDataSet(Default_Name()), nPoints(128), nLast(nPoints-1)
77 {
78  G4AutoLock l(&initM);
79  mK = G4KaonMinus::KaonMinus()->GetPDGMass()*.001;
80  mK2 = mK*mK;
81  l.unlock();
82  lPMin=-8.; //Min tabulatedLogarithmMomentum/D
83  lPMax= 8.; //Max tabulatedLogarithmMomentum/D
84  dlnP=(lPMax-lPMin)/nLast;// LogStep inTable /D
85  onlyCS=true;//Flag toCalculOnlyCS(not Si/Bi)/L
86  lastSIG=0.; //Last calculated cross section /L
87  lastLP=-10.;//LastLog(mom_of IncidentHadron)/L
88  lastTM=0.; //Last t_maximum /L
89  theSS=0.; //TheLastSqSlope of 1st difr.Max/L
90  theS1=0.; //TheLastMantissa of 1st difrMax/L
91  theB1=0.; //TheLastSlope of 1st difructMax/L
92  theS2=0.; //TheLastMantissa of 2nd difrMax/L
93  theB2=0.; //TheLastSlope of 2nd difructMax/L
94  theS3=0.; //TheLastMantissa of 3d difr.Max/L
95  theB3=0.; //TheLastSlope of 3d difruct.Max/L
96  theS4=0.; //TheLastMantissa of 4th difrMax/L
97  theB4=0.; //TheLastSlope of 4th difructMax/L
98  lastTZ=0; // Last atomic number of theTarget
99  lastTN=0; // Last # of neutrons in theTarget
100  lastPIN=0.;// Last initialized max momentum
101  lastCST=0; // Elastic cross-section table
102  lastPAR=0; // ParametersForFunctionCalculation
103  lastSST=0; // E-dep ofSqardSlope of 1st difMax
104  lastS1T=0; // E-dep of mantissa of 1st dif.Max
105  lastB1T=0; // E-dep of the slope of 1st difMax
106  lastS2T=0; // E-dep of mantissa of 2nd difrMax
107  lastB2T=0; // E-dep of the slope of 2nd difMax
108  lastS3T=0; // E-dep of mantissa of 3d difr.Max
109  lastB3T=0; // E-dep of the slope of 3d difrMax
110  lastS4T=0; // E-dep of mantissa of 4th difrMax
111  lastB4T=0; // E-dep of the slope of 4th difMax
112  lastN=0; // The last N of calculated nucleus
113  lastZ=0; // The last Z of calculated nucleus
114  lastP=0.; // LastUsed inCrossSection Momentum
115  lastTH=0.; // Last threshold momentum
116  lastCS=0.; // Last value of the Cross Section
117  lastI=0; // The last position in the DAMDB
118 }
G4VCrossSectionDataSet(const G4String &nam="")
static G4KaonMinus * KaonMinus()
Definition: G4KaonMinus.cc:113
G4double GetPDGMass() const

Here is the call graph for this function:

G4ChipsKaonMinusElasticXS::~G4ChipsKaonMinusElasticXS ( )

Definition at line 120 of file G4ChipsKaonMinusElasticXS.cc.

121 {
122  std::vector<G4double*>::iterator pos;
123  for (pos=CST.begin(); pos<CST.end(); pos++)
124  { delete [] *pos; }
125  CST.clear();
126  for (pos=PAR.begin(); pos<PAR.end(); pos++)
127  { delete [] *pos; }
128  PAR.clear();
129  for (pos=SST.begin(); pos<SST.end(); pos++)
130  { delete [] *pos; }
131  SST.clear();
132  for (pos=S1T.begin(); pos<S1T.end(); pos++)
133  { delete [] *pos; }
134  S1T.clear();
135  for (pos=B1T.begin(); pos<B1T.end(); pos++)
136  { delete [] *pos; }
137  B1T.clear();
138  for (pos=S2T.begin(); pos<S2T.end(); pos++)
139  { delete [] *pos; }
140  S2T.clear();
141  for (pos=B2T.begin(); pos<B2T.end(); pos++)
142  { delete [] *pos; }
143  B2T.clear();
144  for (pos=S3T.begin(); pos<S3T.end(); pos++)
145  { delete [] *pos; }
146  S3T.clear();
147  for (pos=B3T.begin(); pos<B3T.end(); pos++)
148  { delete [] *pos; }
149  B3T.clear();
150  for (pos=S4T.begin(); pos<S4T.end(); pos++)
151  { delete [] *pos; }
152  S4T.clear();
153  for (pos=B4T.begin(); pos<B4T.end(); pos++)
154  { delete [] *pos; }
155  B4T.clear();
156 }
static const G4double pos

Member Function Documentation

void G4ChipsKaonMinusElasticXS::CrossSectionDescription ( std::ostream &  outFile) const
virtual

Reimplemented from G4VCrossSectionDataSet.

Definition at line 159 of file G4ChipsKaonMinusElasticXS.cc.

160 {
161  outFile << "G4ChipsKaonMinusElasticXS provides the elastic cross\n"
162  << "section for K- nucleus scattering as a function of incident\n"
163  << "momentum. The cross section is calculated using M. Kossov's\n"
164  << "CHIPS parameterization of cross section data.\n";
165 }
static const char* G4ChipsKaonMinusElasticXS::Default_Name ( )
inlinestatic

Definition at line 55 of file G4ChipsKaonMinusElasticXS.hh.

55 {return "ChipsKaonMinusElasticXS";}

Here is the caller graph for this function:

G4double G4ChipsKaonMinusElasticXS::GetChipsCrossSection ( G4double  momentum,
G4int  Z,
G4int  N,
G4int  pdg 
)
virtual

!The slave functions must provide cross-sections in millibarns (mb) !! (not in IU)

Definition at line 187 of file G4ChipsKaonMinusElasticXS.cc.

188 {
189 
190  G4bool fCS = false;
191 
192  G4double pEn=pMom;
193  onlyCS=fCS;
194 
195  G4bool in=false; // By default the isotope must be found in the AMDB
196  lastP = 0.; // New momentum history (nothing to compare with)
197  lastN = tgN; // The last N of the calculated nucleus
198  lastZ = tgZ; // The last Z of the calculated nucleus
199  lastI = colN.size(); // Size of the Associative Memory DB in the heap
200  if(lastI) for(G4int i=0; i<lastI; i++) // Loop over proj/tgZ/tgN lines of DB
201  { // The nucleus with projPDG is found in AMDB
202  if(colN[i]==tgN && colZ[i]==tgZ) // Isotope is foind in AMDB
203  {
204  lastI=i;
205  lastTH =colTH[i]; // Last THreshold (A-dependent)
206  if(pEn<=lastTH)
207  {
208  return 0.; // Energy is below the Threshold value
209  }
210  lastP =colP [i]; // Last Momentum (A-dependent)
211  lastCS =colCS[i]; // Last CrossSect (A-dependent)
212  // if(std::fabs(lastP/pMom-1.)<tolerance) //VI (do not use tolerance)
213  if(lastP == pMom) // Do not recalculate
214  {
215  CalculateCrossSection(fCS,-1,i,-321,lastZ,lastN,pMom); // Update param's only
216  return lastCS*millibarn; // Use theLastCS
217  }
218  in = true; // This is the case when the isotop is found in DB
219  // Momentum pMom is in IU ! @@ Units
220  lastCS=CalculateCrossSection(fCS,-1,i,-321,lastZ,lastN,pMom); // read & update
221  if(lastCS<=0. && pEn>lastTH) // Correct the threshold
222  {
223  lastTH=pEn;
224  }
225  break; // Go out of the LOOP with found lastI
226  }
227  } // End of attampt to find the nucleus in DB
228  if(!in) // This nucleus has not been calculated previously
229  {
231  lastCS=CalculateCrossSection(fCS,0,lastI,-321,lastZ,lastN,pMom);//calculate&create
232  if(lastCS<=0.)
233  {
234  lastTH = 0; //ThresholdEnergy(tgZ, tgN); // The Threshold Energy which is now the last
235  if(pEn>lastTH)
236  {
237  lastTH=pEn;
238  }
239  }
240  colN.push_back(tgN);
241  colZ.push_back(tgZ);
242  colP.push_back(pMom);
243  colTH.push_back(lastTH);
244  colCS.push_back(lastCS);
245  return lastCS*millibarn;
246  } // End of creation of the new set of parameters
247  else
248  {
249  colP[lastI]=pMom;
250  colCS[lastI]=lastCS;
251  }
252  return lastCS*millibarn;
253 }
int G4int
Definition: G4Types.hh:78
bool G4bool
Definition: G4Types.hh:79
double G4double
Definition: G4Types.hh:76
static constexpr double millibarn
Definition: G4SIunits.hh:106

Here is the caller graph for this function:

G4double G4ChipsKaonMinusElasticXS::GetExchangeT ( G4int  tZ,
G4int  tN,
G4int  pPDG 
)

Definition at line 617 of file G4ChipsKaonMinusElasticXS.cc.

618 {
619  if(PDG==310 || PDG==130) PDG=-321;
620  if(PDG!=-321)G4cout<<"*Warning*G4ChipsKaonMinusElasticXS::GetET:PDG="<<PDG<<G4endl;
621  if(onlyCS) G4cout<<"*Warning*G4ChipsKaonMinusElasticXS::GetExT: onlyCS=1"<<G4endl;
622  if(lastLP<-4.3) return lastTM*GeVSQ*G4UniformRand();// S-wave for p<14 MeV/c (kinE<.1MeV)
623  G4double q2=0.;
624  if(tgZ==1 && tgN==0) // ===> p+p=p+p
625  {
626  G4double E1=lastTM*theB1;
627  G4double R1=(1.-std::exp(-E1));
628  G4double E2=lastTM*theB2;
629  G4double R2=(1.-std::exp(-E2*E2*E2));
630  G4double E3=lastTM*theB3;
631  G4double R3=(1.-std::exp(-E3));
632  G4double I1=R1*theS1/theB1;
633  G4double I2=R2*theS2;
634  G4double I3=R3*theS3;
635  G4double I12=I1+I2;
636  G4double rand=(I12+I3)*G4UniformRand();
637  if (rand<I1 )
638  {
639  G4double ran=R1*G4UniformRand();
640  if(ran>1.) ran=1.;
641  q2=-std::log(1.-ran)/theB1;
642  }
643  else if(rand<I12)
644  {
645  G4double ran=R2*G4UniformRand();
646  if(ran>1.) ran=1.;
647  q2=-std::log(1.-ran);
648  if(q2<0.) q2=0.;
649  q2=std::pow(q2,third)/theB2;
650  }
651  else
652  {
653  G4double ran=R3*G4UniformRand();
654  if(ran>1.) ran=1.;
655  q2=-std::log(1.-ran)/theB3;
656  }
657  }
658  else
659  {
660  G4double a=tgZ+tgN;
661  G4double E1=lastTM*(theB1+lastTM*theSS);
662  G4double R1=(1.-std::exp(-E1));
663  G4double tss=theSS+theSS; // for future solution of quadratic equation (imediate check)
664  G4double tm2=lastTM*lastTM;
665  G4double E2=lastTM*tm2*theB2; // power 3 for lowA, 5 for HighA (1st)
666  if(a>6.5)E2*=tm2; // for heavy nuclei
667  G4double R2=(1.-std::exp(-E2));
668  G4double E3=lastTM*theB3;
669  if(a>6.5)E3*=tm2*tm2*tm2; // power 1 for lowA, 7 (2nd) for HighA
670  G4double R3=(1.-std::exp(-E3));
671  G4double E4=lastTM*theB4;
672  G4double R4=(1.-std::exp(-E4));
673  G4double I1=R1*theS1;
674  G4double I2=R2*theS2;
675  G4double I3=R3*theS3;
676  G4double I4=R4*theS4;
677  G4double I12=I1+I2;
678  G4double I13=I12+I3;
679  G4double rand=(I13+I4)*G4UniformRand();
680  if(rand<I1)
681  {
682  G4double ran=R1*G4UniformRand();
683  if(ran>1.) ran=1.;
684  q2=-std::log(1.-ran)/theB1;
685  if(std::fabs(tss)>1.e-7) q2=(std::sqrt(theB1*(theB1+(tss+tss)*q2))-theB1)/tss;
686  }
687  else if(rand<I12)
688  {
689  G4double ran=R2*G4UniformRand();
690  if(ran>1.) ran=1.;
691  q2=-std::log(1.-ran)/theB2;
692  if(q2<0.) q2=0.;
693  if(a<6.5) q2=std::pow(q2,third);
694  else q2=std::pow(q2,fifth);
695  }
696  else if(rand<I13)
697  {
698  G4double ran=R3*G4UniformRand();
699  if(ran>1.) ran=1.;
700  q2=-std::log(1.-ran)/theB3;
701  if(q2<0.) q2=0.;
702  if(a>6.5) q2=std::pow(q2,sevth);
703  }
704  else
705  {
706  G4double ran=R4*G4UniformRand();
707  if(ran>1.) ran=1.;
708  q2=-std::log(1.-ran)/theB4;
709  if(a<6.5) q2=lastTM-q2; // u reduced for lightA (starts from 0)
710  }
711  }
712  if(q2<0.) q2=0.;
713  if(!(q2>=-1.||q2<=1.)) G4cout<<"*NAN*G4QKaonMinusElasticCS::GetExchT: -t="<<q2<<G4endl;
714  if(q2>lastTM)
715  {
716  q2=lastTM;
717  }
718  return q2*GeVSQ;
719 }
#define G4UniformRand()
Definition: Randomize.hh:97
G4GLOB_DLL std::ostream G4cout
#define G4endl
Definition: G4ios.hh:61
double G4double
Definition: G4Types.hh:76

Here is the caller graph for this function:

G4double G4ChipsKaonMinusElasticXS::GetIsoCrossSection ( const G4DynamicParticle *  Pt,
G4int  tgZ,
G4int  A,
const G4Isotope *  iso = 0,
const G4Element *  elm = 0,
const G4Material *  mat = 0 
)
virtual

Reimplemented from G4VCrossSectionDataSet.

Definition at line 176 of file G4ChipsKaonMinusElasticXS.cc.

180 {
181  G4double pMom=Pt->GetTotalMomentum();
182  G4int tgN = A - tgZ;
183 
184  return GetChipsCrossSection(pMom, tgZ, tgN, -321);
185 }
int G4int
Definition: G4Types.hh:78
G4double GetTotalMomentum() const
double A(double temperature)
virtual G4double GetChipsCrossSection(G4double momentum, G4int Z, G4int N, G4int pdg)
double G4double
Definition: G4Types.hh:76

Here is the call graph for this function:

G4bool G4ChipsKaonMinusElasticXS::IsIsoApplicable ( const G4DynamicParticle *  Pt,
G4int  Z,
G4int  A,
const G4Element *  elm,
const G4Material *  mat 
)
virtual

Reimplemented from G4VCrossSectionDataSet.

Definition at line 167 of file G4ChipsKaonMinusElasticXS.cc.

170 {
171  return true;
172 }

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