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,44 @@
+// 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: G4OsloMatrix.cc,v 2.1 1998/10/20 16:33:53 broglia Exp $
+// GEANT4 tag $Name: geant4-00 $
+//
+
+#include "G4OsloMatrix.hh"
+
+
+Matrix::Matrix()
+{
+  nr=nc=0;
+  data=0;
+}
+
+
+Matrix::Matrix(int rows, int columns)
+{
+  nr=rows; 
+  nc=columns; 
+  data = new G4double[nr*nc];
+  
+  for(int a =0; a<nr*nc;a++) 
+    data[a]=0;
+}
+
+
+Matrix::Matrix(G4double vec[])
+{
+  nr = 4;
+  nc = 4; 
+  data = new G4double[nr*nc];
+  
+  for(int a=0;a<nr*nc;a++)
+    data[a]=vec[a];
+}
+
+Matrix::~Matrix(){;}
+