Geant4 11.3.0
Toolkit for the simulation of the passage of particles through matter
All Classes Namespaces Files Functions Variables Typedefs Enumerations Enumerator Friends Macros Pages
G4gsdvx.cc
Go to the documentation of this file.
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//
27//
28// by I.Hrivnacova, V.Berejnoi, 27 Sep 99
29
30#include "globals.hh"
31#include "G3toG4.hh"
32
33void G4gsdvn2(G4String name, G4String moth, G4int ndiv, G4int iaxis,
34 G4double c0, G4int numed);
35
36void G4gsdvt2(G4String name, G4String moth, G4double Step, G4int iaxis,
37 G4double c0, G4int numed, G4int ndvmx);
38
39void PG4gsdvx(G4String *tokens)
40{
41 // fill the parameter containers
42 G3fillParams(tokens,PTgsdvx);
43
44 // interpret the parameters
45 G4String name = Spar[0];
46 G4String moth = Spar[1];
47 G4int ndiv = Ipar[0];
48 G4int iaxis = Ipar[1];
49 G4int numed = Ipar[2];
50 G4int ndvmx = Ipar[3];
51 G4double Step = Rpar[0];
52 G4double c0 = Rpar[1];
53
54 G4gsdvx(name,moth,ndiv,iaxis,Step,c0,numed,ndvmx);
55}
56
57void G4gsdvx(G4String name, G4String moth, G4int ndiv, G4int iaxis,
58 G4double Step, G4double c0, G4int numed, G4int ndvmx)
59{
60 // pass to gsdvn2 or gsdvt2
61 if (Step > 0.) {
62 G4gsdvt2(name,moth,Step,iaxis,c0,numed,ndvmx);
63 } else if (ndiv > 0) {
64 G4gsdvn2(name,moth,ndiv,iaxis,c0,numed);
65 }
66}
G3G4DLL_API G4int Ipar[1000]
Definition clparse.cc:65
void G3fillParams(G4String *tokens, const char *ptypes)
Definition clparse.cc:216
G3G4DLL_API G4double Rpar[1000]
Definition clparse.cc:66
G3G4DLL_API G4String Spar[1000]
Definition clparse.cc:67
#define PTgsdvx
Definition G3toG4.hh:58
double G4double
Definition G4Types.hh:83
int G4int
Definition G4Types.hh:85
void PG4gsdvx(G4String *tokens)
Definition G4gsdvx.cc:39
void G4gsdvn2(G4String name, G4String moth, G4int ndiv, G4int iaxis, G4double c0, G4int numed)
Definition G4gsdvn2.cc:55
void G4gsdvx(G4String name, G4String moth, G4int ndiv, G4int iaxis, G4double Step, G4double c0, G4int numed, G4int ndvmx)
Definition G4gsdvx.cc:57
void G4gsdvt2(G4String name, G4String moth, G4double Step, G4int iaxis, G4double c0, G4int numed, G4int ndvmx)
Definition G4gsdvt2.cc:57