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: G4BlockingList.icc,v 2.0 1998/07/02 17:05:28 gunter Exp $
+// GEANT4 tag $Name: geant4-00 $
+//
+//
+// class G4BlockingList  Inlined Implementation
+//
+
+inline G4int G4BlockingList::Length() const
+{
+	return fBlockingList.length();
+}
+
+inline void G4BlockingList::BlockVolume(const G4int v)
+{
+	fBlockingList(v)=fBlockTagNo;
+}
+
+inline G4bool G4BlockingList::IsBlocked(const G4int v) const
+{
+	return (fBlockingList(v)==fBlockTagNo) ? true:false;
+}
+
+
+inline void G4BlockingList::Reset()
+{
+	if (fBlockTagNo!=kBlockTagNoMax)
+		{
+			fBlockTagNo+=1;
+		}
+	else
+		{
+			FullyReset();
+		}		
+} 
+
+inline void G4BlockingList::Enlarge(const G4int nv)
+{
+	G4int len=fBlockingList.length();
+	if (len<nv)
+		{
+			G4int newlen=(nv/fStride+1)*fStride;
+			fBlockingList.reshape(newlen);
+			for (G4int i=len;i<newlen;i++)
+				{
+					fBlockingList(i)=0;
+				}
+		}
+}
+
+inline G4BlockingList::G4BlockingList(G4int maxDefault,G4int stride) :
+fBlockingList(maxDefault),fStride(stride)
+{
+	FullyReset();
+}
+
+// Do nothing destructor
+inline G4BlockingList::~G4BlockingList()
+{
+}
+