| Geant4 Cross Reference |
1 // 1
2 // *******************************************
3 // * License and Disclaimer
4 // *
5 // * The Geant4 software is copyright of th
6 // * the Geant4 Collaboration. It is provided
7 // * conditions of the Geant4 Software License
8 // * LICENSE and available at http://cern.ch/
9 // * include a list of copyright holders.
10 // *
11 // * Neither the authors of this software syst
12 // * institutes,nor the agencies providing fin
13 // * work make any representation or warran
14 // * regarding this software system or assum
15 // * use. Please see the license in the file
16 // * for the full disclaimer and the limitatio
17 // *
18 // * This code implementation is the result
19 // * technical work of the GEANT4 collaboratio
20 // * By using, copying, modifying or distri
21 // * any work based on the software) you ag
22 // * use in resulting scientific publicati
23 // * acceptance of all terms of the Geant4 Sof
24 // *******************************************
25 //
26 //
27 //
28 // Author: Maria Grazia Pia (Maria.Grazia.Pia@
29 //
30 // History:
31 // -----------
32 // 31 Jul 2001 MGP Created
33 //
34 // -------------------------------------------
35
36 #include "G4RDLinInterpolation.hh"
37
38 // Constructor
39
40 G4RDLinInterpolation::G4RDLinInterpolation()
41 { }
42
43 // Destructor
44
45 G4RDLinInterpolation::~G4RDLinInterpolation()
46 { }
47
48
49 G4RDVDataSetAlgorithm* G4RDLinInterpolation::C
50 { return new G4RDLinInterpolation; }
51
52 G4double G4RDLinInterpolation::Calculate(G4dou
53 const G4DataVector& points,
54 const G4DataVector& data) const
55 {
56 G4int nBins = data.size() - 1;
57 G4double value = 0.;
58 if (x < points[0])
59 {
60 value = 0.;
61 }
62 else if (bin < nBins)
63 {
64 G4double e1 = points[bin];
65 G4double e2 = points[bin+1];
66 G4double d1 = data[bin];
67 G4double d2 = data[bin+1];
68 value = d1 + (d2 - d1)*(x - e1)/(e2 - e1
69 }
70 else
71 {
72 value = data[nBins];
73 }
74 return value;
75 }
76