lars/geant4
1
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

Import Geant4 10.3.1 source tree

Browse Source
This commit is contained in:
Gabriele Cosmo
2017-02-28 16:16:20 +01:00
parent a3452e42ac
commit 4597adb7c4
267 changed files with 14761 additions and 24650 deletions
Download Patch File Download Diff File Expand all files Collapse all files
examples/advanced/hadrontherapy/src/HadrontherapyElectricTabulatedField3D.cc
+72 -72
View File
@@ -32,30 +32,30 @@
namespace{ G4Mutex MyHadrontherapyLockEField=G4MUTEX_INITIALIZER; }
HadrontherapyElectricTabulatedField3D::HadrontherapyElectricTabulatedField3D( const char* filename, G4double exOffset, G4double eyOffset, G4double ezOffset)
HadrontherapyElectricTabulatedField3D::HadrontherapyElectricTabulatedField3D( const char* filename, G4double exOffset, G4double eyOffset, G4double ezOffset)
:feXoffset(exOffset),feYoffset(eyOffset),feZoffset(ezOffset),einvertX(false),einvertY(false),einvertZ(false)
{
{
//The format file is: X Y Z Ex Ey Ez
G4double ElenUnit= cm;
G4double EfieldUnit= volt/m;
G4double EfieldUnit= volt/m;
G4cout << "\n-----------------------------------------------------------"
<< "\n Electric field"
<< "\n-----------------------------------------------------------";
G4cout << "\n ---> " "Reading the field grid from " << filename << " ... " << endl;
G4AutoLock lock(&MyHadrontherapyLockEField);
ifstream file( filename ); // Open the file for reading.
// Ignore first blank line
char ebuffer[256];
file.getline(ebuffer,256);
// Read table dimensions
// Read table dimensions
file >> Enx >> Eny >> Enz; // Note dodgy order
G4cout << " [ Number of values x,y,z: "
G4cout << " [ Number of values x,y,z: "
<< Enx << " " << Eny << " " << Enz << " ] "
<< endl;
@@ -86,7 +86,7 @@ HadrontherapyElectricTabulatedField3D::HadrontherapyElectricTabulatedField3D( co
for (iy=0; iy<Eny; iy++) {
for (ix=0; ix<Enx; ix++) {
file >> Exval >> Eyval >> Ezval >> Ex >> Ey >> Ez;
if ( ix==0 && iy==0 && iz==0 ) {
Eminx = Exval * ElenUnit;
Eminy = Eyval * ElenUnit;
@@ -107,30 +107,30 @@ HadrontherapyElectricTabulatedField3D::HadrontherapyElectricTabulatedField3D( co
G4cout << "\n ---> ... done reading " << endl;
// G4cout << " Read values of field from file " << filename << endl;
// G4cout << " Read values of field from file " << filename << endl;
G4cout << " ---> assumed the order: x, y, z, Ex, Ey, Ez "
<< "\n ---> Min values x,y,z: "
<< "\n ---> Min values x,y,z: "
<< Eminx/cm << " " << Eminy/cm << " " << Eminz/cm << " cm "
<< "\n ---> Max values x,y,z: "
<< "\n ---> Max values x,y,z: "
<< Emaxx/cm << " " << Emaxy/cm << " " << Emaxz/cm << " cm "
<< "\n ---> The field will be offset in x by " << exOffset/cm << " cm "
<< "\n ---> The field will be offset in y by " << eyOffset/cm << " cm "
<< "\n ---> The field will be offset in x by " << exOffset/cm << " cm "
<< "\n ---> The field will be offset in y by " << eyOffset/cm << " cm "
<< "\n ---> The field will be offset in z by " << ezOffset/cm << " cm " << endl;
// Should really check that the limits are not the wrong way around.
if (Emaxx < Eminx) {swap(Emaxx,Eminx); einvertX = true;}
if (Emaxy < Eminy) {swap(Emaxy,Eminy); einvertY = true;}
if (Emaxz < Eminz) {swap(Emaxz,Eminz); einvertZ = true;}
G4cout << "\nAfter reordering if neccesary"
<< "\n ---> Min values x,y,z: "
if (Emaxx < Eminx) {swap(Emaxx,Eminx); einvertX = true;}
if (Emaxy < Eminy) {swap(Emaxy,Eminy); einvertY = true;}
if (Emaxz < Eminz) {swap(Emaxz,Eminz); einvertZ = true;}
G4cout << "\nAfter reordering if neccesary"
<< "\n ---> Min values x,y,z: "
<< Eminx/cm << " " << Eminy/cm << " " << Eminz/cm << " cm "
<< " \n ---> Max values x,y,z: "
<< " \n ---> Max values x,y,z: "
<< Emaxx/cm << " " << Emaxy/cm << " " << Emaxz/cm << " cm ";
dx1 = Emaxx - Eminx;
dy1 = Emaxy - Eminy;
dz1 = Emaxz - Eminz;
G4cout << "\n ---> Dif values x,y,z (range): "
G4cout << "\n ---> Dif values x,y,z (range): "
<< dx1/cm << " " << dy1/cm << " " << dz1/cm << " cm "
<< "\n-----------------------------------------------------------" << endl;
}
@@ -138,19 +138,14 @@ HadrontherapyElectricTabulatedField3D::HadrontherapyElectricTabulatedField3D( co
void HadrontherapyElectricTabulatedField3D::GetFieldValue(const G4double Epoint[4],
G4double *Efield ) const
{
G4double x1 = Epoint[0] + feXoffset;
G4double y1 = Epoint[1] + feYoffset;
G4double z1 = Epoint[2] + feZoffset;
G4double x1 = Epoint[0] + feXoffset;
G4double y1 = Epoint[1] + feYoffset;
G4double z1 = Epoint[2] + feZoffset;
// Check that the point is within the defined region
if ( x1>Eminx && x1<Emaxx &&
y1>Eminy && y1<Emaxy &&
z1>Eminz && z1<Emaxz ) {
// Position of given point within region, normalized to the range
// [0,1]
G4double Exfraction = (x1 - Eminx) / dx1;
G4double Eyfraction = (y1 - Eminy) / dy1;
G4double Eyfraction = (y1 - Eminy) / dy1;
G4double Ezfraction = (z1 - Eminz) / dz1;
if (einvertX) { Exfraction = 1 - Exfraction;}
@@ -160,19 +155,33 @@ void HadrontherapyElectricTabulatedField3D::GetFieldValue(const G4double Epoint[
// Need addresses of these to pass to modf below.
// modf uses its second argument as an OUTPUT argument.
G4double exdindex, eydindex, ezdindex;
// Position of the point within the cuboid defined by the
// nearest surrounding tabulated points
G4double exlocal = ( std::modf(Exfraction*(Enx-1), &exdindex));
G4double eylocal = ( std::modf(Eyfraction*(Eny-1), &eydindex));
G4double ezlocal = ( std::modf(Ezfraction*(Enz-1), &ezdindex));
// The indices of the nearest tabulated point whose coordinates
// are all less than those of the given point
G4int exindex = static_cast<G4int>(std::floor(exdindex));
G4int eyindex = static_cast<G4int>(std::floor(eydindex));
G4int ezindex = static_cast<G4int>(std::floor(ezdindex));
if ((exindex < 0) || (exindex >= Enx - 1) ||
(eyindex < 0) || (eyindex >= Eny - 1) ||
(ezindex < 0) || (ezindex >= Enz - 1))
{
Efield[0] = 0.0;
Efield[1] = 0.0;
Efield[2] = 0.0;
Efield[3] = 0.0;
Efield[4] = 0.0;
Efield[5] = 0.0;
}
else
{
/*
#ifdef DEBUG_G4intERPOLATING_FIELD
G4cout << "Local x,y,z: " << exlocal << " " << eylocal << " " << ezlocal << endl;
@@ -187,45 +196,37 @@ void HadrontherapyElectricTabulatedField3D::GetFieldValue(const G4double Epoint[
*/
// Full 3-dimensional version
Efield[0] = 0.0;
Efield[1] = 0.0;
Efield[2] = 0.0;
Efield[0] = 0.0;
Efield[1] = 0.0;
Efield[2] = 0.0;
Efield[3] =
xEField[exindex ][eyindex ][ezindex ] * (1-exlocal) * (1-eylocal) * (1-ezlocal) +
xEField[exindex ][eyindex ][ezindex+1] * (1-exlocal) * (1-eylocal) * ezlocal +
xEField[exindex ][eyindex+1][ezindex ] * (1-exlocal) * eylocal * (1-ezlocal) +
xEField[exindex ][eyindex+1][ezindex+1] * (1-exlocal) * eylocal * ezlocal +
xEField[exindex+1][eyindex ][ezindex ] * exlocal * (1-eylocal) * (1-ezlocal) +
xEField[exindex+1][eyindex ][ezindex+1] * exlocal * (1-eylocal) * ezlocal +
xEField[exindex+1][eyindex+1][ezindex ] * exlocal * eylocal * (1-ezlocal) +
xEField[exindex+1][eyindex+1][ezindex+1] * exlocal * eylocal * ezlocal ;
Efield[4] =
yEField[exindex ][eyindex ][ezindex ] * (1-exlocal) * (1-eylocal) * (1-ezlocal) +
yEField[exindex ][eyindex ][ezindex+1] * (1-exlocal) * (1-eylocal) * ezlocal +
yEField[exindex ][eyindex+1][ezindex ] * (1-exlocal) * eylocal * (1-ezlocal) +
yEField[exindex ][eyindex+1][ezindex+1] * (1-exlocal) * eylocal * ezlocal +
yEField[exindex+1][eyindex ][ezindex ] * exlocal * (1-eylocal) * (1-ezlocal) +
yEField[exindex+1][eyindex ][ezindex+1] * exlocal * (1-eylocal) * ezlocal +
yEField[exindex+1][eyindex+1][ezindex ] * exlocal * eylocal * (1-ezlocal) +
yEField[exindex+1][eyindex+1][ezindex+1] * exlocal * eylocal * ezlocal ;
Efield[5] =
zEField[exindex ][eyindex ][ezindex ] * (1-exlocal) * (1-eylocal) * (1-ezlocal) +
zEField[exindex ][eyindex ][ezindex+1] * (1-exlocal) * (1-eylocal) * ezlocal +
zEField[exindex ][eyindex+1][ezindex ] * (1-exlocal) * eylocal * (1-ezlocal) +
zEField[exindex ][eyindex+1][ezindex+1] * (1-exlocal) * eylocal * ezlocal +
zEField[exindex+1][eyindex ][ezindex ] * exlocal * (1-eylocal) * (1-ezlocal) +
zEField[exindex+1][eyindex ][ezindex+1] * exlocal * (1-eylocal) * ezlocal +
zEField[exindex+1][eyindex+1][ezindex ] * exlocal * eylocal * (1-ezlocal) +
zEField[exindex+1][eyindex+1][ezindex+1] * exlocal * eylocal * ezlocal ;
} else {
Efield[0] = 0.0;
Efield[1] = 0.0;
Efield[2] = 0.0;
Efield[3] = 0.0;
Efield[4] = 0.0;
Efield[5] = 0.0;
Efield[3] =
xEField[exindex ][eyindex ][ezindex ] * (1-exlocal) * (1-eylocal) * (1-ezlocal) +
xEField[exindex ][eyindex ][ezindex+1] * (1-exlocal) * (1-eylocal) * ezlocal +
xEField[exindex ][eyindex+1][ezindex ] * (1-exlocal) * eylocal * (1-ezlocal) +
xEField[exindex ][eyindex+1][ezindex+1] * (1-exlocal) * eylocal * ezlocal +
xEField[exindex+1][eyindex ][ezindex ] * exlocal * (1-eylocal) * (1-ezlocal) +
xEField[exindex+1][eyindex ][ezindex+1] * exlocal * (1-eylocal) * ezlocal +
xEField[exindex+1][eyindex+1][ezindex ] * exlocal * eylocal * (1-ezlocal) +
xEField[exindex+1][eyindex+1][ezindex+1] * exlocal * eylocal * ezlocal ;
Efield[4] =
yEField[exindex ][eyindex ][ezindex ] * (1-exlocal) * (1-eylocal) * (1-ezlocal) +
yEField[exindex ][eyindex ][ezindex+1] * (1-exlocal) * (1-eylocal) * ezlocal +
yEField[exindex ][eyindex+1][ezindex ] * (1-exlocal) * eylocal * (1-ezlocal) +
yEField[exindex ][eyindex+1][ezindex+1] * (1-exlocal) * eylocal * ezlocal +
yEField[exindex+1][eyindex ][ezindex ] * exlocal * (1-eylocal) * (1-ezlocal) +
yEField[exindex+1][eyindex ][ezindex+1] * exlocal * (1-eylocal) * ezlocal +
yEField[exindex+1][eyindex+1][ezindex ] * exlocal * eylocal * (1-ezlocal) +
yEField[exindex+1][eyindex+1][ezindex+1] * exlocal * eylocal * ezlocal ;
Efield[5] =
zEField[exindex ][eyindex ][ezindex ] * (1-exlocal) * (1-eylocal) * (1-ezlocal) +
zEField[exindex ][eyindex ][ezindex+1] * (1-exlocal) * (1-eylocal) * ezlocal +
zEField[exindex ][eyindex+1][ezindex ] * (1-exlocal) * eylocal * (1-ezlocal) +
zEField[exindex ][eyindex+1][ezindex+1] * (1-exlocal) * eylocal * ezlocal +
zEField[exindex+1][eyindex ][ezindex ] * exlocal * (1-eylocal) * (1-ezlocal) +
zEField[exindex+1][eyindex ][ezindex+1] * exlocal * (1-eylocal) * ezlocal +
zEField[exindex+1][eyindex+1][ezindex ] * exlocal * eylocal * (1-ezlocal) +
zEField[exindex+1][eyindex+1][ezindex+1] * exlocal * eylocal * ezlocal ;
}
//G4cout << "Getting electric field " << Efield[3]/(volt/m) << " " << Efield[4]/(volt/m) << " " << Efield[5]/(volt/m) << endl;
//G4cout << "For coordinates: " << Epoint[0] << " " << Epoint[1] << " " << Epoint[2] << G4endl;
@@ -239,4 +240,3 @@ void HadrontherapyElectricTabulatedField3D::GetFieldValue(const G4double Epoint[
<< Efield[5]/(volt/m) << '\t' << " "
<< G4endl; */
}