| Geant4 Cross Reference |
1 // 1 //
2 // ******************************************* 2 // ********************************************************************
3 // * License and Disclaimer 3 // * License and Disclaimer *
4 // * 4 // * *
5 // * The Geant4 software is copyright of th 5 // * The Geant4 software is copyright of the Copyright Holders of *
6 // * the Geant4 Collaboration. It is provided 6 // * the Geant4 Collaboration. It is provided under the terms and *
7 // * conditions of the Geant4 Software License 7 // * conditions of the Geant4 Software License, included in the file *
8 // * LICENSE and available at http://cern.ch/ 8 // * LICENSE and available at http://cern.ch/geant4/license . These *
9 // * include a list of copyright holders. 9 // * include a list of copyright holders. *
10 // * 10 // * *
11 // * Neither the authors of this software syst 11 // * Neither the authors of this software system, nor their employing *
12 // * institutes,nor the agencies providing fin 12 // * institutes,nor the agencies providing financial support for this *
13 // * work make any representation or warran 13 // * work make any representation or warranty, express or implied, *
14 // * regarding this software system or assum 14 // * regarding this software system or assume any liability for its *
15 // * use. Please see the license in the file 15 // * use. Please see the license in the file LICENSE and URL above *
16 // * for the full disclaimer and the limitatio 16 // * for the full disclaimer and the limitation of liability. *
17 // * 17 // * *
18 // * This code implementation is the result 18 // * This code implementation is the result of the scientific and *
19 // * technical work of the GEANT4 collaboratio 19 // * technical work of the GEANT4 collaboration. *
20 // * By using, copying, modifying or distri 20 // * By using, copying, modifying or distributing the software (or *
21 // * any work based on the software) you ag 21 // * any work based on the software) you agree to acknowledge its *
22 // * use in resulting scientific publicati 22 // * use in resulting scientific publications, and indicate your *
23 // * acceptance of all terms of the Geant4 Sof 23 // * acceptance of all terms of the Geant4 Software license. *
24 // ******************************************* 24 // ********************************************************************
25 // 25 //
26 // G4tgrEvaluator implementation <<
27 // 26 //
28 // Author: P.Arce, CIEMAT (November 2007) << 27 //
29 // ------------------------------------------- << 28 //
>> 29 // class G4tgrEvaluator
>> 30
>> 31 // History:
>> 32 // - Created. P.Arce, CIEMAT (November 2007)
>> 33 // -------------------------------------------------------------------------
30 34
31 #include "G4tgrEvaluator.hh" 35 #include "G4tgrEvaluator.hh"
32 36
33 #include <cmath> 37 #include <cmath>
34 38
35 // ------------------------------------------- << 39 // -------------------------------------------------------------------------
36 G4tgrEvaluator::G4tgrEvaluator() 40 G4tgrEvaluator::G4tgrEvaluator()
37 { 41 {
38 AddCommonFunctions(); 42 AddCommonFunctions();
39 } 43 }
40 44
41 // ------------------------------------------- << 45
>> 46 // -------------------------------------------------------------------------
42 G4tgrEvaluator::~G4tgrEvaluator() 47 G4tgrEvaluator::~G4tgrEvaluator()
43 { 48 {
44 } 49 }
45 50
46 // ------------------------------------------- << 51
47 void G4tgrEvaluator::print_error(G4int estatus << 52 // -------------------------------------------------------------------------
>> 53 void G4tgrEvaluator::print_error( G4int estatus ) const
48 { 54 {
49 switch(estatus) << 55 switch (estatus)
50 { 56 {
51 case ERROR_SYNTAX_ERROR: 57 case ERROR_SYNTAX_ERROR:
52 G4cerr << "G4tgrEvaluator: syntax error! 58 G4cerr << "G4tgrEvaluator: syntax error!" << G4endl;
53 return; 59 return;
54 default: 60 default:
55 G4Evaluator::print_error(); << 61 G4Evaluator::print_error();
56 return; << 62 return;
57 } 63 }
58 } << 64 }
>> 65
>> 66 G4double fsin( G4double arg ){ return std::sin(arg); }
>> 67 G4double fcos( G4double arg ){ return std::cos(arg); }
>> 68 G4double ftan( G4double arg ){ return std::tan(arg); }
>> 69 G4double fasin( G4double arg ){ return std::asin(arg); }
>> 70 G4double facos( G4double arg ){ return std::acos(arg); }
>> 71 G4double fatan( G4double arg ){ return std::atan(arg); }
>> 72 G4double fatan2( G4double arg1, G4double arg2 ){ return std::atan2(arg1,arg2); }
>> 73 G4double fsinh( G4double arg ){ return std::sinh(arg); }
>> 74 G4double fcosh( G4double arg ){ return std::cosh(arg); }
>> 75 G4double ftanh( G4double arg ){ return std::tanh(arg); }
>> 76 // G4double fasinh( G4double arg ){ return std::asinh(arg); }
>> 77 // G4double facosh( G4double arg ){ return std::acosh(arg); }
>> 78 // G4double fatanh( G4double arg ){ return std::atanh(arg); }
>> 79 G4double fsqrt( G4double arg ){ return std::sqrt(arg); }
>> 80 G4double fexp( G4double arg ){ return std::exp(arg); }
>> 81 G4double flog( G4double arg ){ return std::log(arg); }
>> 82 G4double flog10( G4double arg ){ return std::log10(arg); }
>> 83 G4double fpow( G4double arg1, G4double arg2 ){ return std::pow(arg1,arg2); }
59 84
60 G4double fltsin(G4double arg) { return std::si <<
61 G4double fltcos(G4double arg) { return std::co <<
62 G4double flttan(G4double arg) { return std::ta <<
63 G4double fltasin(G4double arg) { return std::a <<
64 G4double fltacos(G4double arg) { return std::a <<
65 G4double fltatan(G4double arg) { return std::a <<
66 G4double fltatan2(G4double arg1, G4double arg2 <<
67 G4double fltsinh(G4double arg) { return std::s <<
68 G4double fltcosh(G4double arg) { return std::c <<
69 G4double flttanh(G4double arg) { return std::t <<
70 // G4double fltasinh( G4double arg ){ return <<
71 // G4double fltacosh( G4double arg ){ return <<
72 // G4double fltatanh( G4double arg ){ return <<
73 G4double fltsqrt(G4double arg) { return std::s <<
74 G4double fltexp(G4double arg) { return std::ex <<
75 G4double fltlog(G4double arg) { return std::lo <<
76 G4double fltlog10(G4double arg) { return std:: <<
77 G4double fltpow(G4double arg1, G4double arg2) <<
78 85
79 // ------------------------------------------- << 86 //--------------------------------------------------------------------
80 void G4tgrEvaluator::AddCommonFunctions() 87 void G4tgrEvaluator::AddCommonFunctions()
81 { 88 {
82 setFunction("sin", (*fltsin)); << 89 setFunction("sin", (*fsin));
83 setFunction("cos", (*fltcos)); << 90 setFunction("cos", (*fcos));
84 setFunction("tan", (*flttan)); << 91 setFunction("tan", (*ftan));
85 setFunction("asin", (*fltasin)); << 92 setFunction("asin", (*fasin));
86 setFunction("acos", (*fltacos)); << 93 setFunction("acos", (*facos));
87 setFunction("atan", (*fltatan)); << 94 setFunction("atan", (*fatan));
88 setFunction("atan2", (*fltatan2)); << 95 setFunction("atan2", (*fatan2));
89 setFunction("sinh", (*fltsinh)); << 96 setFunction("sinh", (*fsinh));
90 setFunction("cosh", (*fltcosh)); << 97 setFunction("cosh", (*fcosh));
91 setFunction("tanh", (*flttanh)); << 98 setFunction("tanh", (*ftanh));
92 // setFunction("asinh", (*fltasinh)); << 99 // setFunction("asinh", (*fasinh));
93 // setFunction("acosh", (*fltacosh)); << 100 // setFunction("acosh", (*facosh));
94 // setFunction("atanh", (*fltatanh)); << 101 // setFunction("atanh", (*fatanh));
95 setFunction("sqrt", (*fltsqrt)); << 102 setFunction("sqrt", (*fsqrt));
96 setFunction("exp", (*fltexp)); << 103 setFunction("exp", (*fexp));
97 setFunction("log", (*fltlog)); << 104 setFunction("log", (*flog));
98 setFunction("log10", (*fltlog10)); << 105 setFunction("log10", (*flog10));
99 setFunction("pow", (*fltpow)); << 106 setFunction("pow", (*fpow));
100 } 107 }
101 108