Geant4 Cross Reference |
1 // 2 // ******************************************************************** 3 // * License and Disclaimer * 4 // * * 5 // * The Geant4 software is copyright of the Copyright Holders of * 6 // * the Geant4 Collaboration. It is provided under the terms and * 7 // * conditions of the Geant4 Software License, included in the file * 8 // * LICENSE and available at http://cern.ch/geant4/license . These * 9 // * include a list of copyright holders. * 10 // * * 11 // * Neither the authors of this software system, nor their employing * 12 // * institutes,nor the agencies providing financial support for this * 13 // * work make any representation or warranty, express or implied, * 14 // * regarding this software system or assume any liability for its * 15 // * use. Please see the license in the file LICENSE and URL above * 16 // * for the full disclaimer and the limitation of liability. * 17 // * * 18 // * This code implementation is the result of the scientific and * 19 // * technical work of the GEANT4 collaboration. * 20 // * By using, copying, modifying or distributing the software (or * 21 // * any work based on the software) you agree to acknowledge its * 22 // * use in resulting scientific publications, and indicate your * 23 // * acceptance of all terms of the Geant4 Software license. * 24 // ******************************************************************** 25 // 26 // G4CashKarpRKF45 27 // 28 // Class description: 29 // 30 // The Cash-Karp Runge-Kutta-Fehlberg 4/5 method is an embedded fourth 31 // order method (giving fifth-order accuracy) for the solution of an ODE. 32 // Two different fourth order estimates are calculated; their difference 33 // gives an error estimate. [ref. Numerical Recipes in C, 2nd Edition] 34 // It is used to integrate the equations of the motion of a particle 35 // in a magnetic field. 36 37 // Authors: J.Apostolakis, V.Grichine - 30.01.1997 38 // ------------------------------------------------------------------- 39 #ifndef G4CASHKARP_RKF45_HH 40 #define G4CASHKARP_RKF45_HH 41 42 #include "G4MagIntegratorStepper.hh" 43 44 class G4CashKarpRKF45 : public G4MagIntegratorStepper 45 { 46 public: 47 48 G4CashKarpRKF45( G4EquationOfMotion* EqRhs, 49 G4int numberOfVariables = 6, 50 G4bool primary = true ) ; 51 ~G4CashKarpRKF45() override ; 52 53 G4CashKarpRKF45(const G4CashKarpRKF45&) = delete; 54 G4CashKarpRKF45& operator=(const G4CashKarpRKF45&) = delete; 55 // Deleted copy constructor and assignment operator. 56 57 void Stepper( const G4double y[], 58 const G4double dydx[], 59 G4double h, 60 G4double yout[], 61 G4double yerr[] ) override ; 62 63 G4double DistChord() const override; 64 G4int IntegratorOrder() const override { return 4; } 65 66 private: 67 68 void StepWithEst( const G4double yIn[], 69 const G4double dydx[], 70 G4double Step, 71 G4double yOut[], 72 G4double& alpha2, 73 G4double& beta2, 74 const G4double B1[], 75 G4double B2[] ); 76 // No longer used. Obsolete. 77 78 private: 79 80 G4double *ak2, *ak3, *ak4, *ak5, *ak6, *yTemp, *yIn; // *ak7 81 // scratch space 82 83 G4double fLastStepLength = 0.0; 84 G4double *fLastInitialVector, *fLastFinalVector, 85 *fLastDyDx, *fMidVector, *fMidError; 86 // for DistChord calculations 87 88 G4CashKarpRKF45* fAuxStepper = nullptr; 89 }; 90 91 #endif 92