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,121 @@
+//
+// ********************************************************************
+// * 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: G4MuMultipleScattering.cc,v 1.3 2007/11/09 19:48:10 vnivanch Exp $
+// GEANT4 tag $Name: geant4-09-01 $
+//
+// -----------------------------------------------------------------------------
+//
+// GEANT4 Class file
+//
+// File name:     G4MuMultipleScattering
+//
+// Author:        Laszlo Urban
+//
+// Creation date: 24.10.2006 cloned from G4MultipleScattering
+// 
+// Modified:
+// 12-02-07 skin can be changed via UI command (VI)
+// 20.03.07 Remove local parameter skin, set facgeom=0.1(V.Ivanchenko) 
+//
+// -----------------------------------------------------------------------------
+//
+//....oooOO0OOooo........oooOO0OOooo........oooOO0OOooo........oooOO0OOooo......
+//....oooOO0OOooo........oooOO0OOooo........oooOO0OOooo........oooOO0OOooo......
+
+#include "G4MuMultipleScattering.hh"
+#include "G4MuMscModel.hh"
+#include "G4MscStepLimitType.hh"
+
+//....oooOO0OOooo........oooOO0OOooo........oooOO0OOooo........oooOO0OOooo......
+
+using namespace std;
+
+G4MuMultipleScattering::G4MuMultipleScattering(G4double tet,
+					       const G4String& processName)
+  : G4VMultipleScattering(processName), thetaLimit(tet)
+{
+  dtrl              = 0.05;
+  samplez           = false ; 
+  isInitialized     = false;  
+  SetRangeFactor(0.04);
+  SetLateralDisplasmentFlag(true);
+}
+
+//....oooOO0OOooo........oooOO0OOooo........oooOO0OOooo........oooOO0OOooo......
+
+G4MuMultipleScattering::~G4MuMultipleScattering()
+{}
+
+//....oooOO0OOooo........oooOO0OOooo........oooOO0OOooo........oooOO0OOooo......
+
+G4bool G4MuMultipleScattering::IsApplicable (const G4ParticleDefinition& p)
+{
+  return (p.GetPDGCharge() != 0.0 && !p.IsShortLived());
+}
+
+//....oooOO0OOooo........oooOO0OOooo........oooOO0OOooo........oooOO0OOooo......
+
+void G4MuMultipleScattering::InitialiseProcess(const G4ParticleDefinition* p)
+{
+  // Modification of parameters between runs
+  if(isInitialized) {
+
+    if (p->GetParticleType() != "nucleus") {
+      mscModel->SetStepLimitType(StepLimitType());
+      mscModel->SetLateralDisplasmentFlag(LateralDisplasmentFlag());
+      //mscModel->SetThetaLimit(thetaLimit);
+      mscModel->SetRangeFactor(RangeFactor());
+    }
+    return;
+  }
+
+  if (p->GetParticleType() == "nucleus") {
+    SetLateralDisplasmentFlag(false);
+    SetBuildLambdaTable(false);
+    //    SetRangeFactor(0.2);
+  }
+
+  // initialisation of parameters
+  //  G4String part_name = p->GetParticleName();
+  mscModel = new G4MuMscModel(RangeFactor(),thetaLimit);
+  mscModel->SetLateralDisplasmentFlag(LateralDisplasmentFlag());
+
+  AddEmModel(1,mscModel);
+  isInitialized = true;
+}
+
+//....oooOO0OOooo........oooOO0OOooo........oooOO0OOooo........oooOO0OOooo......
+
+void G4MuMultipleScattering::PrintInfo()
+{
+  G4cout << "      Boundary/stepping algorithm is active with RangeFactor= "
+	 << RangeFactor()
+	 << "  Step limit type " << StepLimitType()
+	 << G4endl;
+}
+
+//....oooOO0OOooo........oooOO0OOooo........oooOO0OOooo........oooOO0OOooo......
+