Import Geant4 9.1.0 source tree

2016-06-09 15:37:50 +02:00
parent a8e9364cea
commit 96c8bcd0af
6923 changed files with 198390 additions and 41849 deletions
@@ -0,0 +1,161 @@
+//
+// ********************************************************************
+// * License and Disclaimer                                           *
+// *                                                                  *
+// * The  Geant4 software  is  copyright of the Copyright Holders  of *
+// * the Geant4 Collaboration.  It is provided  under  the terms  and *
+// * conditions of the Geant4 Software License,  included in the file *
+// * LICENSE and available at  http://cern.ch/geant4/license .  These *
+// * include a list of copyright holders.                             *
+// *                                                                  *
+// * Neither the authors of this software system, nor their employing *
+// * institutes,nor the agencies providing financial support for this *
+// * work  make  any representation or  warranty, express or implied, *
+// * regarding  this  software system or assume any liability for its *
+// * use.  Please see the license in the file  LICENSE  and URL above *
+// * for the full disclaimer and the limitation of liability.         *
+// *                                                                  *
+// * This  code  implementation is the result of  the  scientific and *
+// * technical work of the GEANT4 collaboration.                      *
+// * By using,  copying,  modifying or  distributing the software (or *
+// * any work based  on the software)  you  agree  to acknowledge its *
+// * use  in  resulting  scientific  publications,  and indicate your *
+// * acceptance of all terms of the Geant4 Software license.          *
+// ********************************************************************
+//
+//
+// $Id: G4PSCylinderSurfaceCurrent.cc,v 1.1 2007/08/14 21:23:51 taso Exp $
+// GEANT4 tag $Name: geant4-09-01 $
+//
+// G4PSCylinderSurfaceCurrent
+#include "G4PSCylinderSurfaceCurrent.hh"
+#include "G4StepStatus.hh"
+#include "G4Track.hh"
+#include "G4UnitsTable.hh"
+#include "G4GeometryTolerance.hh"
+////////////////////////////////////////////////////////////////////////////////
+// (Description)
+//   This is a primitive scorer class for scoring only Surface Current.
+//  Current version assumes only for G4Tubs shape. 
+//
+// Surface is defined at the inner surface of the tube.
+// Direction                   R    R+dR
+//   0  IN || OUT            ->|<-  |
+//   1  IN                   ->|    |
+//   2  OUT                    |<-  |
+//
+// Created: 2007-03-21  Tsukasa ASO
+// 
+///////////////////////////////////////////////////////////////////////////////
+
+
+G4PSCylinderSurfaceCurrent::G4PSCylinderSurfaceCurrent(G4String name, 
+					 G4int direction, G4int depth)
+  :G4VPrimitiveScorer(name,depth),HCID(-1),fDirection(direction),
+   weighted(true),divideByArea(true)
+{;}
+
+G4PSCylinderSurfaceCurrent::~G4PSCylinderSurfaceCurrent()
+{;}
+
+G4bool G4PSCylinderSurfaceCurrent::ProcessHits(G4Step* aStep,G4TouchableHistory*)
+{
+  G4StepPoint* preStep = aStep->GetPreStepPoint();
+  G4VSolid * solid = 
+    preStep->GetPhysicalVolume()->GetLogicalVolume()->GetSolid();
+  if( solid->GetEntityType() != "G4Tubs" ){
+    G4Exception("G4PSCylinderSurfaceCurrentScorer. - Solid type is not supported.");
+    return FALSE;
+  }
+  G4Tubs* tubsSolid = (G4Tubs*)(solid);
+
+  G4int dirFlag =IsSelectedSurface(aStep,tubsSolid);
+  if ( dirFlag > 0 ) {
+    if ( fDirection == fCurrent_InOut || fDirection == dirFlag ){
+      G4TouchableHandle theTouchable = preStep->GetTouchableHandle();
+      //
+      G4double current = 1.0;
+      if ( weighted ) current = preStep->GetWeight(); // Current (Particle Weight)
+      //
+      if ( divideByArea ){
+	G4double square = 2.*tubsSolid->GetZHalfLength()
+	  *tubsSolid->GetInnerRadius()* tubsSolid->GetDeltaPhiAngle()/radian;
+	current = current/square;  // Current normalized by Area
+      }
+
+      G4int index = GetIndex(aStep);
+      EvtMap->add(index,current);
+    }
+
+  }
+
+  return TRUE;
+}
+
+G4int G4PSCylinderSurfaceCurrent::IsSelectedSurface(G4Step* aStep, G4Tubs* tubsSolid){
+
+  G4TouchableHandle theTouchable = 
+    aStep->GetPreStepPoint()->GetTouchableHandle();
+  G4double kCarTolerance = G4GeometryTolerance::GetInstance()->GetSurfaceTolerance();  
+
+  if (aStep->GetPreStepPoint()->GetStepStatus() == fGeomBoundary ){
+    // Entering Geometry
+    G4ThreeVector stppos1= aStep->GetPreStepPoint()->GetPosition();
+    G4ThreeVector localpos1 = 
+      theTouchable->GetHistory()->GetTopTransform().TransformPoint(stppos1);
+    if ( std::fabs(localpos1.z()) > tubsSolid->GetZHalfLength() ) return -1;
+    if(std::fabs( (localpos1.x()*localpos1.x()+localpos1.y()*localpos1.y())
+		  -(tubsSolid->GetInnerRadius()*tubsSolid->GetInnerRadius()) )
+       < kCarTolerance ){
+      return fCurrent_In;
+    }
+  }
+
+  if (aStep->GetPostStepPoint()->GetStepStatus() == fGeomBoundary ){
+    // Exiting Geometry
+    G4ThreeVector stppos2= aStep->GetPostStepPoint()->GetPosition();
+    G4ThreeVector localpos2 = 
+      theTouchable->GetHistory()->GetTopTransform().TransformPoint(stppos2);
+    if ( std::fabs(localpos2.z()) > tubsSolid->GetZHalfLength() ) return -1;
+    if(std::fabs( (localpos2.x()*localpos2.x()+localpos2.y()*localpos2.y()) 
+		  - (tubsSolid->GetInnerRadius()*tubsSolid->GetInnerRadius()) )
+       <kCarTolerance ){
+      return fCurrent_Out;
+    }
+  }
+
+  return -1;
+}
+
+void G4PSCylinderSurfaceCurrent::Initialize(G4HCofThisEvent* HCE)
+{
+  EvtMap = new G4THitsMap<G4double>(detector->GetName(), GetName());
+  if ( HCID < 0 ) HCID = GetCollectionID(0);
+  HCE->AddHitsCollection(HCID, (G4VHitsCollection*)EvtMap);
+}
+
+void G4PSCylinderSurfaceCurrent::EndOfEvent(G4HCofThisEvent*)
+{;}
+
+void G4PSCylinderSurfaceCurrent::clear(){
+  EvtMap->clear();
+}
+
+void G4PSCylinderSurfaceCurrent::DrawAll()
+{;}
+
+void G4PSCylinderSurfaceCurrent::PrintAll()
+{
+  G4cout << " MultiFunctionalDet  " << detector->GetName() << G4endl;
+  G4cout << " PrimitiveScorer " << GetName() <<G4endl; 
+  G4cout << " Number of entries " << EvtMap->entries() << G4endl;
+  std::map<G4int,G4double*>::iterator itr = EvtMap->GetMap()->begin();
+  for(; itr != EvtMap->GetMap()->end(); itr++) {
+    G4cout << "  copy no.: " << itr->first
+	   << "  current  : " ;
+    if ( divideByArea ) G4cout << *(itr->second)*cm*cm << " [/cm2]";
+    else G4cout << *(itr->second) << " [track]";
+    G4cout << G4endl;
+  }
+}
+