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

Import Geant4 9.3.0 source tree

Browse Source
This commit is contained in:
Gabriele Cosmo
2016-06-09 16:15:05 +02:00
parent b79225fb37
commit 74cad5e589
3877 changed files with 234205 additions and 167127 deletions
Download Patch File Download Diff File Expand all files Collapse all files
source/geometry/divisions/src/G4ParameterisationPolycone.cc
+216 -76
View File
@@ -24,8 +24,8 @@
// ********************************************************************
//
//
// $Id: G4ParameterisationPolycone.cc,v 1.15 2006/06/29 18:18:44 gunter Exp $
// GEANT4 tag $Name: geant4-09-02 $
// $Id: G4ParameterisationPolycone.cc,v 1.17 2009/05/18 19:30:29 ivana Exp $
// GEANT4 tag $Name: geant4-09-03 $
//
// class G4ParameterisationPolycone Implementation file
//
@@ -354,26 +354,25 @@ G4ParameterisationPolyconeZ::
G4ParameterisationPolyconeZ( EAxis axis, G4int nDiv,
G4double width, G4double offset,
G4VSolid* msolid, DivisionType divType)
: G4VParameterisationPolycone( axis, nDiv, width, offset, msolid, divType )
: G4VParameterisationPolycone( axis, nDiv, width, offset, msolid, divType ),
fNSegment(0),
fOrigParamMother(((G4Polycone*)fmotherSolid)->GetOriginalParameters())
{
CheckParametersValidity();
SetType( "DivisionPolyconeZ" );
G4Polycone* msol = (G4Polycone*)(fmotherSolid);
G4PolyconeHistorical* origparamMother = msol->GetOriginalParameters();
if( divType == DivWIDTH )
{
fnDiv =
CalculateNDiv( origparamMother->Z_values[origparamMother->Num_z_planes-1]
- origparamMother->Z_values[0] , width, offset );
CalculateNDiv( fOrigParamMother->Z_values[fOrigParamMother->Num_z_planes-1]
- fOrigParamMother->Z_values[0] , width, offset );
}
else if( divType == DivNDIV )
{
fwidth =
CalculateNDiv( origparamMother->Z_values[origparamMother->Num_z_planes-1]
- origparamMother->Z_values[0] , nDiv, offset );
CalculateNDiv( fOrigParamMother->Z_values[fOrigParamMother->Num_z_planes-1]
- fOrigParamMother->Z_values[0] , nDiv, offset );
}
#ifdef G4DIVDEBUG
@@ -392,61 +391,144 @@ G4ParameterisationPolyconeZ::~G4ParameterisationPolyconeZ()
{
}
//------------------------------------------------------------------------
G4double G4ParameterisationPolyconeZ::GetR(G4double z,
G4double z1, G4double r1,
G4double z2, G4double r2) const
{
// Linear parameterisation:
// r = az + b
// a = (r1 - r2)/(z1-z2)
// b = r1 - a*z1
return (r1-r2)/(z1-z2)*z + ( r1 - (r1-r2)/(z1-z2)*z1 ) ;
}
//------------------------------------------------------------------------
G4double G4ParameterisationPolyconeZ::GetRmin(G4double z, G4int nseg) const
{
// Get Rmin in the given z position for the given polycone segment
return GetR(z,
fOrigParamMother->Z_values[nseg],
fOrigParamMother->Rmin[nseg],
fOrigParamMother->Z_values[nseg+1],
fOrigParamMother->Rmin[nseg+1]);
}
//------------------------------------------------------------------------
G4double G4ParameterisationPolyconeZ::GetRmax(G4double z, G4int nseg) const
{
// Get Rmax in the given z position for the given polycone segment
return GetR(z,
fOrigParamMother->Z_values[nseg],
fOrigParamMother->Rmax[nseg],
fOrigParamMother->Z_values[nseg+1],
fOrigParamMother->Rmax[nseg+1]);
}
//------------------------------------------------------------------------
G4double G4ParameterisationPolyconeZ::GetMaxParameter() const
{
G4Polycone* msol = (G4Polycone*)(fmotherSolid);
G4PolyconeHistorical* origparamMother = msol->GetOriginalParameters();
return std::abs (origparamMother->Z_values[origparamMother->Num_z_planes-1]
-origparamMother->Z_values[0]);
return std::abs (fOrigParamMother->Z_values[fOrigParamMother->Num_z_planes-1]
-fOrigParamMother->Z_values[0]);
}
//---------------------------------------------------------------------
void G4ParameterisationPolyconeZ::CheckParametersValidity()
{
G4VDivisionParameterisation::CheckParametersValidity();
G4Polycone* msol = (G4Polycone*)(fmotherSolid);
if( fDivisionType == DivNDIVandWIDTH || fDivisionType == DivWIDTH )
{
G4cerr << "WARNING - "
<< "G4ParameterisationPolyconeZ::CheckParametersValidity()"
<< G4endl
<< " Solid " << msol->GetName() << G4endl
<< " Division along Z will be done splitting in the "
<< "defined z_planes." << G4endl
<< " WIDTH will not be used !" << G4endl;
}
if( foffset != 0. )
{
G4cerr << "WARNING - "
<< "G4ParameterisationPolyconeZ::CheckParametersValidity()"
<< G4endl
<< " Solid " << msol->GetName() << G4endl
<< " Division along Z will be done splitting in the "
<< "defined z_planes." << G4endl
<< " OFFSET will not be used !" << G4endl;
}
G4PolyconeHistorical* origparamMother = msol->GetOriginalParameters();
if( origparamMother->Num_z_planes-1 != fnDiv )
{
G4cerr << "ERROR - "
<< "G4ParameterisationPolyconeZ::CheckParametersValidity()"
<< G4endl
<< " Division along Z will be done splitting in the defined"
<< G4endl
<< " z_planes, i.e, the number of division would be :"
<< " " << origparamMother->Num_z_planes-1
<< " instead of " << fnDiv << " !"
<< G4endl;
G4Exception("G4ParameterisationPolyconeZ::CheckParametersValidity()",
// Division will be following the mother polycone segments
if( fDivisionType == DivNDIV ) {
if( fnDiv > fOrigParamMother->Num_z_planes-1 ) {
G4cerr << "ERROR - "
<< "G4ParameterisationPolyconeZ::CheckParametersValidity()"
<< G4endl
<< " Division along Z will be done splitting in the defined"
<< G4endl
<< " z_planes, i.e, the number of division would be :"
<< " " << fOrigParamMother->Num_z_planes-1
<< " instead of " << fnDiv << " !"
<< G4endl;
G4Exception("G4ParameterisationPolyconeZ::CheckParametersValidity()",
"IllegalConstruct", FatalException,
"Not supported configuration.");
}
}
}
// Division will be done within one polycone segment
// with applying given width and offset
if( fDivisionType == DivNDIVandWIDTH || fDivisionType == DivWIDTH ) {
// Check if divided region does not span over more
// than one z segment
G4int isegstart = -1; // number of the segment containing start position
G4int isegend = -1; // number of the segment containing end position
if ( ! fReflectedSolid ) {
// The start/end position of the divided region
G4double zstart
= fOrigParamMother->Z_values[0] + foffset;
G4double zend
= fOrigParamMother->Z_values[0] + foffset + fnDiv* fwidth;
G4int counter = 0;
while ( isegend < 0 && counter < fOrigParamMother->Num_z_planes-1 ) {
// first segment
if ( zstart >= fOrigParamMother->Z_values[counter] &&
zstart < fOrigParamMother->Z_values[counter+1] ) {
isegstart = counter;
}
// last segment
if ( zend > fOrigParamMother->Z_values[counter] &&
zend <= fOrigParamMother->Z_values[counter+1] ) {
isegend = counter;
}
++counter;
}
}
else {
// The start/end position of the divided region
G4double zstart
= fOrigParamMother->Z_values[0] - foffset;
G4double zend
= fOrigParamMother->Z_values[0] - ( foffset + fnDiv* fwidth);
G4int counter = 0;
while ( isegend < 0 && counter < fOrigParamMother->Num_z_planes-1 ) {
// first segment
if ( zstart <= fOrigParamMother->Z_values[counter] &&
zstart > fOrigParamMother->Z_values[counter+1] ) {
isegstart = counter;
}
// last segment
if ( zend < fOrigParamMother->Z_values[counter] &&
zend >= fOrigParamMother->Z_values[counter+1] ) {
isegend = counter;
}
++counter;
}
}
if ( isegstart != isegend ) {
G4cerr << "WARNING - "
<< "G4ParameterisationPolyconeZ::CheckParametersValidity()"
<< G4endl
<< " Division with user defined width." << G4endl
<< " Solid " << fmotherSolid->GetName() << G4endl
<< " Divided region is not between two z planes."
<< G4endl;
G4Exception("G4ParameterisationPolyconeZ::CheckParametersValidity()",
"IllegalConstruct", FatalException,
"Not supported configuration.");
}
fNSegment = isegstart;
}
}
//---------------------------------------------------------------------
@@ -454,14 +536,25 @@ void
G4ParameterisationPolyconeZ::
ComputeTransformation( const G4int copyNo, G4VPhysicalVolume* physVol) const
{
G4Polycone* msol = (G4Polycone*)(GetMotherSolid());
//----- set translation: along Z axis
G4PolyconeHistorical* origparamMother = msol->GetOriginalParameters();
G4double posi = (origparamMother->Z_values[copyNo]
+ origparamMother->Z_values[copyNo+1])/2;
G4ThreeVector origin(0.,0.,posi);
physVol->SetTranslation( origin );
if ( fDivisionType == DivNDIV ) {
// The position of the centre of copyNo-th mother polycone segment
G4double posi
= ( fOrigParamMother->Z_values[copyNo]
+ fOrigParamMother->Z_values[copyNo+1])/2;
physVol->SetTranslation( G4ThreeVector(0, 0, posi) );
}
if ( fDivisionType == DivNDIVandWIDTH || fDivisionType == DivWIDTH ) {
// The position of the centre of copyNo-th division
G4double posi = fOrigParamMother->Z_values[0];
if ( ! fReflectedSolid )
posi += foffset + (2*copyNo + 1) * fwidth/2.;
else
posi -= foffset + (2*copyNo + 1) * fwidth/2.;
physVol->SetTranslation( G4ThreeVector(0, 0, posi) );
}
//----- calculate rotation matrix: unit
@@ -493,23 +586,70 @@ G4ParameterisationPolyconeZ::
ComputeDimensions( G4Polycone& pcone, const G4int copyNo,
const G4VPhysicalVolume* ) const
{
// only for mother number of planes = 2!!
//
G4Polycone* msol = (G4Polycone*)(fmotherSolid);
G4PolyconeHistorical* origparamMother = msol->GetOriginalParameters();
G4PolyconeHistorical origparam( *origparamMother );
// Define division solid
G4PolyconeHistorical origparam;
G4int nz = 2;
origparam.Num_z_planes = nz;
origparam.Start_angle = fOrigParamMother->Start_angle;
origparam.Opening_angle = fOrigParamMother->Opening_angle;
G4double posi = (origparamMother->Z_values[copyNo]
+ origparamMother->Z_values[copyNo+1])/2;
// Define division solid z sections
origparam.Z_values = new G4double[nz];
origparam.Rmin = new G4double[nz];
origparam.Rmax = new G4double[nz];
origparam.Num_z_planes = 2;
origparam.Z_values[0] = origparamMother->Z_values[copyNo] - posi;
origparam.Z_values[1] = origparamMother->Z_values[copyNo+1] - posi;
origparam.Rmin[0] = origparamMother->Rmin[copyNo];
origparam.Rmin[1] = origparamMother->Rmin[copyNo+1];
origparam.Rmax[0] = origparamMother->Rmax[copyNo];
origparam.Rmax[1] = origparamMother->Rmax[copyNo+1];
if ( fDivisionType == DivNDIV ) {
// The position of the centre of copyNo-th mother polycone segment
G4double posi = (fOrigParamMother->Z_values[copyNo]
+ fOrigParamMother->Z_values[copyNo+1])/2;
origparam.Z_values[0] = fOrigParamMother->Z_values[copyNo] - posi;
origparam.Z_values[1] = fOrigParamMother->Z_values[copyNo+1] - posi;
origparam.Rmin[0] = fOrigParamMother->Rmin[copyNo];
origparam.Rmin[1] = fOrigParamMother->Rmin[copyNo+1];
origparam.Rmax[0] = fOrigParamMother->Rmax[copyNo];
origparam.Rmax[1] = fOrigParamMother->Rmax[copyNo+1];
}
if ( fDivisionType == DivNDIVandWIDTH || fDivisionType == DivWIDTH ) {
if ( ! fReflectedSolid ) {
origparam.Z_values[0] = - fwidth/2.;
origparam.Z_values[1] = fwidth/2.;
// The position of the centre of copyNo-th division
G4double posi
= fOrigParamMother->Z_values[0] + foffset + (2*copyNo + 1) * fwidth/2.;
// The first and last z sides z values
G4double zstart = posi - fwidth/2.;
G4double zend = posi + fwidth/2.;
origparam.Rmin[0] = GetRmin(zstart, fNSegment);
origparam.Rmax[0] = GetRmax(zstart, fNSegment);
origparam.Rmin[1] = GetRmin(zend, fNSegment);
origparam.Rmax[1] = GetRmax(zend, fNSegment);
}
else {
origparam.Z_values[0] = fwidth/2.;
origparam.Z_values[1] = - fwidth/2.;
// The position of the centre of copyNo-th division
G4double posi
= fOrigParamMother->Z_values[0] - ( foffset + (2*copyNo + 1) * fwidth/2.);
// The first and last z sides z values
G4double zstart = posi + fwidth/2.;
G4double zend = posi - fwidth/2.;
origparam.Rmin[0] = GetRmin(zstart, fNSegment);
origparam.Rmax[0] = GetRmax(zstart, fNSegment);
origparam.Rmin[1] = GetRmin(zend, fNSegment);
origparam.Rmax[1] = GetRmax(zend, fNSegment);
}
// It can happen due to rounding errors
if ( origparam.Rmin[0] < 0.0 ) origparam.Rmin[0] = 0.0;
if ( origparam.Rmin[nz-1] < 0.0 ) origparam.Rmin[1] = 0.0;
}
pcone.SetOriginalParameters(&origparam); // copy values & transfer pointers
pcone.Reset(); // reset to new solid parameters