Geant4.10
 All Data Structures Namespaces Files Functions Variables Typedefs Enumerations Enumerator Friends Macros Groups Pages
Public Member Functions
G4AblaDataFile Class Reference

#include <G4AblaDataFile.hh>

Inheritance diagram for G4AblaDataFile:
G4AblaVirtualData

Public Member Functions

 G4AblaDataFile ()
 
 ~G4AblaDataFile ()
 
bool readData ()
 
- Public Member Functions inherited from G4AblaVirtualData
G4bool setAlpha (G4int A, G4int Z, G4double value)
 
G4bool setEcnz (G4int A, G4int Z, G4double value)
 
G4bool setVgsld (G4int A, G4int Z, G4double value)
 
G4bool setPace2 (G4int A, G4int Z, G4double value)
 
G4double getAlpha (G4int A, G4int Z)
 
G4double getEcnz (G4int A, G4int Z)
 
G4double getVgsld (G4int A, G4int Z)
 
G4double getPace2 (G4int A, G4int Z)
 
G4int getAlphaRows ()
 
G4int getAlphaCols ()
 
G4int getPaceRows ()
 
G4int getPaceCols ()
 

Additional Inherited Members

- Protected Member Functions inherited from G4AblaVirtualData
 G4AblaVirtualData ()
 
virtual ~G4AblaVirtualData ()
 

Detailed Description

Read ABLA data from files.

Definition at line 44 of file G4AblaDataFile.hh.

Constructor & Destructor Documentation

G4AblaDataFile::G4AblaDataFile ( )

Definition at line 49 of file G4AblaDataFile.cc.

References G4AblaVirtualData::G4AblaVirtualData().

49  {
50 #else
52  : G4AblaVirtualData(config) {
53  theConfig = config;
54 #endif
55  verboseLevel = 0;
56 }
struct config_s config
G4AblaDataFile::~G4AblaDataFile ( )

Definition at line 58 of file G4AblaDataFile.cc.

59 {
60 }

Member Function Documentation

bool G4AblaDataFile::readData ( )
virtual

Read all data from files.

Implements G4AblaVirtualData.

Definition at line 65 of file G4AblaDataFile.cc.

References FatalException, G4endl, G4Exception(), G4AblaVirtualData::getPace2(), G4AblaVirtualData::getPaceCols(), G4AblaVirtualData::getPaceRows(), G4AblaVirtualData::setAlpha(), G4AblaVirtualData::setEcnz(), G4AblaVirtualData::setPace2(), and G4AblaVirtualData::setVgsld().

Referenced by G4Abla::initEvapora().

66 {
67 #ifdef ABLAXX_IN_GEANT4_MODE
68  if(!getenv("G4ABLADATA")) {
69  // throw G4HadronicException(__FILE__, __LINE__, "ERROR: Data
70  // missing. Set environment variable G4ABLA3.0 to point to the
71  // directory containing data files needed by INCL and ABLA
72  // models.");
73  // G4String errorMessage1 = "ERROR: Data missing. Set environment variable G4ABLADATA\n";
74  // G4String errorMessage2 = "\t to point to the directory containing data files needed\n";
75  // G4String errorMessage3 = "\t by INCL and ABLA models.\n";
76  // G4String errorMessage = errorMessage1 + errorMessage2 + errorMessage3;
77  // G4Exception(errorMessage);
79  ed << " Data missing: set environment variable G4ABLADATA\n"
80  << " to point to the directory containing data files needed\n"
81  << " by the ABLA model" << G4endl;
82  G4Exception("G4AblaDataFile::readData()","ABLA_001",
83  FatalException, ed);
84  }
85 
86  G4String dataPath(getenv("G4ABLADATA"));
87 #else
88  G4String dataPath(theConfig->getABLAv3pCxxDataFilePath().c_str());
89 #endif
90  G4String flAlphaFile(dataPath + "/flalpha.dat");
91  G4String frldmFile( dataPath + "/frldm.dat");
92  G4String vgsldFile( dataPath + "/vgsld.dat");
93  G4String pace2File( dataPath + "/pace2.dat");
94 
95  if(verboseLevel > 1) {
96  // G4cout <<"Data path = " << dataPath << G4endl;
97  // G4cout <<"FlAlphaFile = " << flAlphaFile << G4endl;
98  // G4cout <<"FrldmFile = " << frldmFile << G4endl;
99  // G4cout <<"VgsldFile = " << vgsldFile << G4endl;
100  // G4cout <<"Pace2File = " << pace2File << G4endl;
101  }
102 
103  std::ifstream flalphain(flAlphaFile.c_str());
104  std::ifstream frldmin(frldmFile.c_str());
105  std::ifstream vgsldin(vgsldFile.c_str());
106  std::ifstream pace2in(pace2File.c_str());
107 
108  std::filebuf *buf1 = flalphain.rdbuf();
109  std::filebuf *buf2 = frldmin.rdbuf();
110  std::filebuf *buf3 = vgsldin.rdbuf();
111  std::filebuf *buf4 = pace2in.rdbuf();
112  if (!((buf1->is_open()) && (buf2->is_open()) && (buf3->is_open()) && (buf4->is_open()))) {
113 #ifdef ABLAXX_IN_GEANT4_MODE
115  ed << " Data missing: could not find ABLA data file in " << dataPath
116  << "defined by environment variable G4ABLADATA" << G4endl;
117  G4Exception("G4AblaDataFile::readData()", "ABLA002", FatalException, ed);
118 #else
119  std::cerr << "Error opening file." << std::endl;
120 #endif
121  }
122 
123  G4double fflalpha, ffrldm, fvgsld, fpace2;
124  const G4int rows = 99;
125  const G4int cols = 154;
126  const G4int massnumbers = 263;
127  for(int i = 0; i < rows; i++) {
128  for(int j = 0; j < cols; j++) {
129  setAlpha(j, i, 0.0);
130  setEcnz( j, i, 0.0);
131  setVgsld(j, i, 0.0);
132  }
133  }
134 
135  for(int i = 0; i < rows; i++) {
136  for(int j = 0; j < cols; j++) {
137  flalphain >> fflalpha;
138  frldmin >> ffrldm;
139  vgsldin >> fvgsld;
140  setAlpha(j, i, fflalpha);
141  setEcnz( j, i, ffrldm);
142  setVgsld(j, i, fvgsld);
143  }
144  }
145  flalphain.close();
146  frldmin.close();
147  vgsldin.close();
148 
149  G4String str1, str2, str3;
150  for(int i = 0; i < 500; i++) {
151  for(int j = 0; j < 500; j++) {
152  setPace2(i, j, 0.0);
153  }
154  }
155 
156  int A = 0, Zbegin = 0, Zend = 0;
157  for(int i = 0; i < massnumbers; i++) {
158  pace2in >> str1 >> A >> str2 >> Zbegin >> str3 >> Zend;
159  if(Zbegin >= 0 && Zbegin < getPaceCols() &&
160  A >= 0 && A < getPaceRows()) {
161  for(int j = Zbegin; j <= Zend; j++) {
162  pace2in >> fpace2;
163  setPace2(A, j, fpace2);
164  }
165  }
166  }
167  pace2in.close();
168  if(std::abs(getPace2(A, Zend) - 114516.10) > 1e-6) {
169  std::cerr << "ERROR: Problem in parsing datafile " + pace2File << std::endl;
170  return false;
171  }
172 
173  return true;
174 }
G4bool setVgsld(G4int A, G4int Z, G4double value)
std::ostringstream G4ExceptionDescription
Definition: globals.hh:76
G4bool setPace2(G4int A, G4int Z, G4double value)
int G4int
Definition: G4Types.hh:78
G4bool setEcnz(G4int A, G4int Z, G4double value)
void G4Exception(const char *originOfException, const char *exceptionCode, G4ExceptionSeverity severity, const char *comments)
Definition: G4Exception.cc:41
G4bool setAlpha(G4int A, G4int Z, G4double value)
#define G4endl
Definition: G4ios.hh:61
double G4double
Definition: G4Types.hh:76
G4double getPace2(G4int A, G4int Z)

The documentation for this class was generated from the following files: