Gabriele Cosmo
77 lines
2.6 KiB
C++
77 lines
2.6 KiB
C++
//
|
|
// ********************************************************************
|
|
// * DISCLAIMER *
|
|
// * *
|
|
// * The following disclaimer summarizes all the specific disclaimers *
|
|
// * of contributors to this software. The specific disclaimers,which *
|
|
// * govern, are listed with their locations in: *
|
|
// * http://cern.ch/geant4/license *
|
|
// * *
|
|
// * Neither the authors of this software system, nor their employing *
|
|
// * institutes,nor the agencies providing financial support for this *
|
|
// * work make any representation or warranty, express or implied, *
|
|
// * regarding this software system or assume any liability for its *
|
|
// * use. *
|
|
// * *
|
|
// * This code implementation is the intellectual property of the *
|
|
// * GEANT4 collaboration. *
|
|
// * By copying, distributing or modifying the Program (or any work *
|
|
// * based on the Program) you indicate your acceptance of this *
|
|
// * statement, and all its terms. *
|
|
// ********************************************************************
|
|
//
|
|
//
|
|
// $Id: G4LogLogInterpolation.cc,v 1.4 2002/05/28 09:20:19 pia Exp $
|
|
// GEANT4 tag $Name: geant4-05-01 $
|
|
//
|
|
// Author: Maria Grazia Pia (Maria.Grazia.Pia@cern.ch)
|
|
//
|
|
// History:
|
|
// -----------
|
|
// 31 Jul 2001 MGP Created
|
|
//
|
|
// -------------------------------------------------------------------
|
|
|
|
#include "G4LogLogInterpolation.hh"
|
|
|
|
// Constructor
|
|
|
|
G4LogLogInterpolation::G4LogLogInterpolation()
|
|
{ }
|
|
|
|
// Destructor
|
|
|
|
G4LogLogInterpolation::~G4LogLogInterpolation()
|
|
{ }
|
|
|
|
G4VDataSetAlgorithm* G4LogLogInterpolation::Clone() const
|
|
{ return new G4LogLogInterpolation; }
|
|
|
|
|
|
G4double G4LogLogInterpolation::Calculate(G4double x, G4int bin,
|
|
const G4DataVector& points,
|
|
const G4DataVector& data) const
|
|
{
|
|
G4int nBins = data.size() - 1;
|
|
G4double value = 0.;
|
|
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];
|
|
value = (log10(d1)*log10(e2/x) + log10(d2)*log10(x/e1)) / log10(e2/e1);
|
|
value = pow(10,value);
|
|
}
|
|
else
|
|
{
|
|
value = data[nBins];
|
|
}
|
|
|
|
return value;
|
|
}
|