| 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 // $Id: G4tgrEvaluator.cc,v 1.1 2008/10/23 14:43:43 gcosmo Exp $
29 // ------------------------------------------- << 28 // GEANT4 tag $Name: geant4-09-02 $
>> 29 //
>> 30 //
>> 31 // class G4tgrEvaluator
>> 32
>> 33 // History:
>> 34 // - Created. P.Arce, CIEMAT (November 2007)
>> 35 // -------------------------------------------------------------------------
30 36
31 #include "G4tgrEvaluator.hh" 37 #include "G4tgrEvaluator.hh"
32 38
33 #include <cmath> 39 #include <cmath>
34 40
35 // ------------------------------------------- << 41 // -------------------------------------------------------------------------
36 G4tgrEvaluator::G4tgrEvaluator() 42 G4tgrEvaluator::G4tgrEvaluator()
37 { 43 {
38 AddCommonFunctions(); 44 AddCommonFunctions();
39 } 45 }
40 46
41 // ------------------------------------------- << 47
>> 48 // -------------------------------------------------------------------------
42 G4tgrEvaluator::~G4tgrEvaluator() 49 G4tgrEvaluator::~G4tgrEvaluator()
43 { 50 {
44 } 51 }
45 52
46 // ------------------------------------------- << 53
47 void G4tgrEvaluator::print_error(G4int estatus << 54 // -------------------------------------------------------------------------
>> 55 void G4tgrEvaluator::print_error( G4int status ) const
48 { 56 {
49 switch(estatus) << 57 switch (status)
50 { 58 {
51 case ERROR_SYNTAX_ERROR: 59 case ERROR_SYNTAX_ERROR:
52 G4cerr << "G4tgrEvaluator: syntax error! 60 G4cerr << "G4tgrEvaluator: syntax error!" << G4endl;
53 return; 61 return;
54 default: 62 default:
55 G4Evaluator::print_error(); << 63 HepTool::Evaluator::print_error();
56 return; << 64 return;
57 } 65 }
58 } << 66 }
>> 67
>> 68 G4double fsin( G4double arg ){ return std::sin(arg); }
>> 69 G4double fcos( G4double arg ){ return std::cos(arg); }
>> 70 G4double ftan( G4double arg ){ return std::tan(arg); }
>> 71 G4double fasin( G4double arg ){ return std::asin(arg); }
>> 72 G4double facos( G4double arg ){ return std::acos(arg); }
>> 73 G4double fatan( G4double arg ){ return std::atan(arg); }
>> 74 G4double fatan2( G4double arg1, G4double arg2 ){ return std::atan2(arg1,arg2); }
>> 75 G4double fsinh( G4double arg ){ return std::sinh(arg); }
>> 76 G4double fcosh( G4double arg ){ return std::cosh(arg); }
>> 77 G4double ftanh( G4double arg ){ return std::tanh(arg); }
>> 78 // G4double fasinh( G4double arg ){ return std::asinh(arg); }
>> 79 // G4double facosh( G4double arg ){ return std::acosh(arg); }
>> 80 // G4double fatanh( G4double arg ){ return std::atanh(arg); }
>> 81 G4double fsqrt( G4double arg ){ return std::sqrt(arg); }
>> 82 G4double fexp( G4double arg ){ return std::exp(arg); }
>> 83 G4double flog( G4double arg ){ return std::log(arg); }
>> 84 G4double flog10( G4double arg ){ return std::log10(arg); }
>> 85 G4double fpow( G4double arg1, G4double arg2 ){ return std::pow(arg1,arg2); }
59 86
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 87
79 // ------------------------------------------- << 88 //--------------------------------------------------------------------
80 void G4tgrEvaluator::AddCommonFunctions() 89 void G4tgrEvaluator::AddCommonFunctions()
81 { 90 {
82 setFunction("sin", (*fltsin)); << 91 setFunction("sin", (*fsin));
83 setFunction("cos", (*fltcos)); << 92 setFunction("cos", (*fcos));
84 setFunction("tan", (*flttan)); << 93 setFunction("tan", (*ftan));
85 setFunction("asin", (*fltasin)); << 94 setFunction("asin", (*fasin));
86 setFunction("acos", (*fltacos)); << 95 setFunction("acos", (*facos));
87 setFunction("atan", (*fltatan)); << 96 setFunction("atan", (*fatan));
88 setFunction("atan2", (*fltatan2)); << 97 setFunction("atan2", (*fatan2));
89 setFunction("sinh", (*fltsinh)); << 98 setFunction("sinh", (*fsinh));
90 setFunction("cosh", (*fltcosh)); << 99 setFunction("cosh", (*fcosh));
91 setFunction("tanh", (*flttanh)); << 100 setFunction("tanh", (*ftanh));
92 // setFunction("asinh", (*fltasinh)); << 101 // setFunction("asinh", (*fasinh));
93 // setFunction("acosh", (*fltacosh)); << 102 // setFunction("acosh", (*facosh));
94 // setFunction("atanh", (*fltatanh)); << 103 // setFunction("atanh", (*fatanh));
95 setFunction("sqrt", (*fltsqrt)); << 104 setFunction("sqrt", (*fsqrt));
96 setFunction("exp", (*fltexp)); << 105 setFunction("exp", (*fexp));
97 setFunction("log", (*fltlog)); << 106 setFunction("log", (*flog));
98 setFunction("log10", (*fltlog10)); << 107 setFunction("log10", (*flog10));
99 setFunction("pow", (*fltpow)); << 108 setFunction("pow", (*fpow));
100 } 109 }
101 110