source: trunk/source/processes/optical/src/G4OpAbsorption.cc@ 880

Last change on this file since 880 was 819, checked in by garnier, 17 years ago

import all except CVS

File size: 5.1 KB
RevLine 
[819]1//
2// ********************************************************************
3// * License and Disclaimer *
4// * *
5// * The Geant4 software is copyright of the Copyright Holders of *
6// * the Geant4 Collaboration. It is provided under the terms and *
7// * conditions of the Geant4 Software License, included in the file *
8// * LICENSE and available at http://cern.ch/geant4/license . These *
9// * include a list of copyright holders. *
10// * *
11// * Neither the authors of this software system, nor their employing *
12// * institutes,nor the agencies providing financial support for this *
13// * work make any representation or warranty, express or implied, *
14// * regarding this software system or assume any liability for its *
15// * use. Please see the license in the file LICENSE and URL above *
16// * for the full disclaimer and the limitation of liability. *
17// * *
18// * This code implementation is the result of the scientific and *
19// * technical work of the GEANT4 collaboration. *
20// * By using, copying, modifying or distributing the software (or *
21// * any work based on the software) you agree to acknowledge its *
22// * use in resulting scientific publications, and indicate your *
23// * acceptance of all terms of the Geant4 Software license. *
24// ********************************************************************
25//
26//
27// $Id: G4OpAbsorption.cc,v 1.7 2006/06/29 21:08:50 gunter Exp $
28// GEANT4 tag $Name: $
29//
30////////////////////////////////////////////////////////////////////////
31// Optical Photon Absorption Class Implementation
32////////////////////////////////////////////////////////////////////////
33//
34// File: G4OpAbsorption.cc
35// Description: Discrete Process -- Absorption of Optical Photons
36// Version: 1.0
37// Created: 1996-05-21
38// Author: Juliet Armstrong
39// Updated: 2005-07-28 - add G4ProcessType to constructor
40// 2000-09-18 by Peter Gumplinger
41// > comment out warning - "No Absorption length specified"
42// 1997-04-09 by Peter Gumplinger
43// > new physics/tracking scheme
44// 1998-08-25 by Stefano Magni
45// > Change process to use G4MaterialPropertiesTables
46// 1998-09-03 by Peter Gumplinger
47// > Protect G4MaterialPropertyVector* AttenuationLengthVector
48// mail: gum@triumf.ca
49// magni@mi.infn.it
50//
51////////////////////////////////////////////////////////////////////////
52
53#include "G4ios.hh"
54#include "G4OpAbsorption.hh"
55
56/////////////////////////
57// Class Implementation
58/////////////////////////
59
60 //////////////
61 // Operators
62 //////////////
63
64// G4OpAbsorption::operator=(const G4OpAbsorption &right)
65// {
66// }
67
68 /////////////////
69 // Constructors
70 /////////////////
71
72G4OpAbsorption::G4OpAbsorption(const G4String& processName, G4ProcessType type)
73 : G4VDiscreteProcess(processName, type)
74{
75 if (verboseLevel>0) {
76 G4cout << GetProcessName() << " is created " << G4endl;
77 }
78}
79
80// G4OpAbsorption::G4OpAbsorption(const G4OpAbsorpton &right)
81// {
82// }
83
84 ////////////////
85 // Destructors
86 ////////////////
87
88G4OpAbsorption::~G4OpAbsorption(){}
89
90 ////////////
91 // Methods
92 ////////////
93
94// PostStepDoIt
95// -------------
96//
97G4VParticleChange*
98G4OpAbsorption::PostStepDoIt(const G4Track& aTrack, const G4Step& aStep)
99{
100 aParticleChange.Initialize(aTrack);
101
102 aParticleChange.ProposeTrackStatus(fStopAndKill);
103
104 if (verboseLevel>0) {
105 G4cout << "\n** Photon absorbed! **" << G4endl;
106 }
107 return G4VDiscreteProcess::PostStepDoIt(aTrack, aStep);
108}
109
110
111// GetMeanFreePath
112// ---------------
113//
114G4double G4OpAbsorption::GetMeanFreePath(const G4Track& aTrack,
115 G4double ,
116 G4ForceCondition* )
117{
118 const G4DynamicParticle* aParticle = aTrack.GetDynamicParticle();
119 const G4Material* aMaterial = aTrack.GetMaterial();
120
121 G4double thePhotonMomentum = aParticle->GetTotalMomentum();
122
123 G4MaterialPropertiesTable* aMaterialPropertyTable;
124 G4MaterialPropertyVector* AttenuationLengthVector;
125
126 G4double AttenuationLength = DBL_MAX;
127
128 aMaterialPropertyTable = aMaterial->GetMaterialPropertiesTable();
129
130 if ( aMaterialPropertyTable ) {
131 AttenuationLengthVector = aMaterialPropertyTable->
132 GetProperty("ABSLENGTH");
133 if ( AttenuationLengthVector ){
134 AttenuationLength = AttenuationLengthVector->
135 GetProperty (thePhotonMomentum);
136 }
137 else {
138// G4cout << "No Absorption length specified" << G4endl;
139 }
140 }
141 else {
142// G4cout << "No Absorption length specified" << G4endl;
143 }
144
145 return AttenuationLength;
146}
Note: See TracBrowser for help on using the repository browser.