Import Geant4 0.0.0 source tree

2016-06-01 15:25:35 +02:00
parent 54d6b71f95
commit b97f8d0df7
3237 changed files with 807095 additions and 0 deletions
@@ -0,0 +1,67 @@
+// This code implementation is the intellectual property of
+// the RD44 GEANT4 collaboration.
+//
+// By copying, distributing or modifying the Program (or any work
+// based on the Program) you indicate your acceptance of this statement,
+// and all its terms.
+//
+// $Id: G4LineSection.cc,v 2.1 1998/07/12 02:55:20 urbi Exp $
+// GEANT4 tag $Name: geant4-00 $
+//
+// typedef double    G4double;  
+#include "G4LineSection.hh" 
+
+G4LineSection::G4LineSection( const G4ThreeVector& PntA, 
+			      const G4ThreeVector& PntB ) 
+{ 
+  EndpointA= PntA; 
+  VecAtoB=PntB-PntA; 
+  
+  inverse_square_distAB=1.0 / VecAtoB.mag2();
+}
+
+G4double G4LineSection::Dist( G4ThreeVector OtherPnt ) const
+{
+  G4double       dist_sq;  
+  G4ThreeVector  VecAZ;
+  G4double sq_VecAZ, inner_prod, unit_projection ; 
+
+  VecAZ= OtherPnt - EndpointA;
+  sq_VecAZ = VecAZ.mag2();
+
+  inner_prod= VecAtoB.dot( VecAZ );
+   
+  //  Determine  Projection(AZ on AB) / Length(AB) 
+  //
+  unit_projection= inner_prod * InvsqDistAB();
+
+  if( (0. <= unit_projection ) && (unit_projection <= 1.0 ) )
+     dist_sq= sq_VecAZ -  unit_projection * inner_prod;
+  else{
+     //  The perpendicular from the point to the line AB meets the line
+     //   in a point outside the line segment!
+     //
+     if( unit_projection < 0. ) {
+        // A is the closest point
+        dist_sq= sq_VecAZ;  
+     }else{
+        // B is the closest point
+	G4ThreeVector   EndpointB = EndpointA + VecAtoB;
+        G4ThreeVector   VecBZ =     OtherPnt - EndpointB;
+        dist_sq =  VecBZ.mag2();
+     }
+  }
+
+  return sqrt(dist_sq);  
+}
+
+G4double G4LineSection::Distline( const G4ThreeVector& OtherPnt, 
+				  const G4ThreeVector& LinePntA, 
+				  const G4ThreeVector& LinePntB )
+{
+  G4LineSection LineAB( LinePntA, LinePntB );  // Line from A to B
+
+  return LineAB.Dist( OtherPnt );
+}
+
+