Changeset 1192 for trunk/source/processes/electromagnetic/lowenergy/src/G4SemiLogInterpolation.cc

Timestamp:

Nov 19, 2009, 2:53:25 PM (15 years ago)

Author:

garnier

Message:

update par rapport a CVS

File:

• trunk/source/processes/electromagnetic/lowenergy/src/G4SemiLogInterpolation.cc (modified) (3 diffs)

trunk/source/processes/electromagnetic/lowenergy/src/G4SemiLogInterpolation.cc

@@ -25 +25 @@
 //
 //
-// $Id: G4SemiLogInterpolation.cc,v 1.6 2006/06/29 19:41:18 gunter Exp $
-// GEANT4 tag $Name: geant4-09-02 $
+// $Id: G4SemiLogInterpolation.cc,v 1.8 2009/09/25 07:41:34 sincerti Exp $
+// GEANT4 tag $Name: emlowen-V09-02-64 $
 //
 // Author: Maria Grazia Pia (Maria.Grazia.Pia@cern.ch)
@@ -57 +57 @@
                                           const G4DataVector& data) const
 {
+  //G4cout << "G4SemiLogInterpolation is performed(2 arguments) " << G4endl;
   G4int nBins = data.size() - 1;
   G4double value = 0.;
@@ -77 +78 @@
   return value;
 }
+
+G4double G4SemiLogInterpolation::Calculate(G4double x, G4int bin, 
+                                           const G4DataVector& points,
+                                           const G4DataVector& data,
+                                           const G4DataVector& log_points, 
+                                           const G4DataVector& /*log_data*/) const
+{
+//A combination of logarithmic interpolation on energy set and 
+//linear Interpolation on data set
+  //G4cout << "G4SemiLogInterpolation is performed (4 arguments)" << G4endl;
+  G4int nBins = data.size() - 1;
+  G4double value = 0.;
+  G4double log_x = std::log10(x);
+  if (x < points[0])
+    {
+      value = 0.;
+    }
+  else if (bin < nBins)
+    {
+      G4double e1 = points[bin];
+      G4double e2 = points[bin+1];
+      G4double d1 = data[bin];
+      G4double d2 = data[bin+1];      
+      G4double log_e1 = log_points[bin];
+      G4double log_e2 = log_points[bin+1];
+      //G4double log_d1 = log_data[bin];
+      //G4double log_d2 = log_data[bin+1];
+      //G4cout << "x = " << x << " , log_x = " << log_x << " , bin = " << bin << G4endl;
+      //G4cout << "e1 = " << e1 << " , d1 = " << d1 << G4endl;
+      //G4cout << "e2 = " << e2 << " , d2 = " << d2 << G4endl;
+// Values log_e1 and log_e2 are the log values of the corresponding
+// original energy actual values. Original d1 and d2 values are used.
+// Simple linear interpolation performed on loagarithmic data 
+// should be equivalent to semi log-log interpolation
+      if (e1 == 0.0) log_e1 = -300;
+      if (e2 == 0.0) log_e2 = -300;
+      value = d1 + (d2 - d1)*(log_x - log_e1)/(log_e2 - log_e1);
+      //G4cout << "G4SemiLogInterpolation - Final Interpolated Value: " << value << G4endl << G4endl;
+   }
+ else
+   {
+     value = data[nBins];
+   }
+  return value;
+}
+