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