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

Last change on this file since 1244 was 1228, checked in by garnier, 14 years ago

update geant4.9.3 tag

File size: 5.1 KB
Line 
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.9 2008/10/24 19:52:28 gum Exp $
28// GEANT4 tag $Name: geant4-09-03 $
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 "G4OpProcessSubType.hh"
55
56#include "G4OpAbsorption.hh"
57
58/////////////////////////
59// Class Implementation
60/////////////////////////
61
62        //////////////
63        // Operators
64        //////////////
65
66// G4OpAbsorption::operator=(const G4OpAbsorption &right)
67// {
68// }
69
70        /////////////////
71        // Constructors
72        /////////////////
73
74G4OpAbsorption::G4OpAbsorption(const G4String& processName, G4ProcessType type)
75              : G4VDiscreteProcess(processName, type)
76{
77        if (verboseLevel>0) {
78           G4cout << GetProcessName() << " is created " << G4endl;
79        }
80
81        SetProcessSubType(fOpAbsorption);
82}
83
84// G4OpAbsorption::G4OpAbsorption(const G4OpAbsorpton &right)
85// {
86// }
87
88        ////////////////
89        // Destructors
90        ////////////////
91
92G4OpAbsorption::~G4OpAbsorption(){}
93
94        ////////////
95        // Methods
96        ////////////
97
98// PostStepDoIt
99// -------------
100//
101G4VParticleChange*
102G4OpAbsorption::PostStepDoIt(const G4Track& aTrack, const G4Step& aStep)
103{
104        aParticleChange.Initialize(aTrack);
105
106        aParticleChange.ProposeTrackStatus(fStopAndKill);
107
108        if (verboseLevel>0) {
109           G4cout << "\n** Photon absorbed! **" << G4endl;
110        }
111        return G4VDiscreteProcess::PostStepDoIt(aTrack, aStep);
112}
113
114
115// GetMeanFreePath
116// ---------------
117//
118G4double G4OpAbsorption::GetMeanFreePath(const G4Track& aTrack,
119                                         G4double ,
120                                         G4ForceCondition* )
121{
122        const G4DynamicParticle* aParticle = aTrack.GetDynamicParticle();
123        const G4Material* aMaterial = aTrack.GetMaterial();
124
125        G4double thePhotonMomentum = aParticle->GetTotalMomentum();
126
127        G4MaterialPropertiesTable* aMaterialPropertyTable;
128        G4MaterialPropertyVector* AttenuationLengthVector;
129       
130        G4double AttenuationLength = DBL_MAX;
131
132        aMaterialPropertyTable = aMaterial->GetMaterialPropertiesTable();
133
134        if ( aMaterialPropertyTable ) {
135           AttenuationLengthVector = aMaterialPropertyTable->
136                                                GetProperty("ABSLENGTH");
137           if ( AttenuationLengthVector ){
138             AttenuationLength = AttenuationLengthVector->
139                                         GetProperty (thePhotonMomentum);
140           }
141           else {
142//             G4cout << "No Absorption length specified" << G4endl;
143           }
144        } 
145        else {
146//           G4cout << "No Absorption length specified" << G4endl;
147        }
148
149        return AttenuationLength;
150}
Note: See TracBrowser for help on using the repository browser.