Gabriele Cosmo
288 lines
9.7 KiB
C++
288 lines
9.7 KiB
C++
//
|
|
// ********************************************************************
|
|
// * 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: G4MaterialPropertiesTable.cc,v 1.19 2007/04/25 15:46:55 gum Exp $
|
|
// GEANT4 tag $Name: geant4-09-01 $
|
|
//
|
|
//
|
|
////////////////////////////////////////////////////////////////////////
|
|
// G4MaterialPropertiesTable Implementation
|
|
////////////////////////////////////////////////////////////////////////
|
|
//
|
|
// File: G4MaterialPropertiesTable.cc
|
|
// Version: 1.0
|
|
// Created: 1996-02-08
|
|
// Author: Juliet Armstrong
|
|
// Updated: 2005-05-12 add SetGROUPVEL(), courtesy of
|
|
// Horton-Smith (bug report #741), by P. Gumplinger
|
|
// 2002-11-05 add named material constants by P. Gumplinger
|
|
// 1999-11-05 Migration from G4RWTPtrHashDictionary to STL
|
|
// by John Allison
|
|
// 1997-03-26 by Peter Gumplinger
|
|
// > cosmetics (only)
|
|
// mail: gum@triumf.ca
|
|
//
|
|
////////////////////////////////////////////////////////////////////////
|
|
|
|
#include "globals.hh"
|
|
#include "G4MaterialPropertiesTable.hh"
|
|
|
|
/////////////////
|
|
// Constructors
|
|
/////////////////
|
|
|
|
G4MaterialPropertiesTable::G4MaterialPropertiesTable() {}
|
|
|
|
////////////////
|
|
// Destructors
|
|
////////////////
|
|
|
|
G4MaterialPropertiesTable::~G4MaterialPropertiesTable()
|
|
{
|
|
MPTiterator i;
|
|
for (i = MPT.begin(); i != MPT.end(); ++i) {
|
|
delete (*i).second;
|
|
}
|
|
MPT.clear();
|
|
MPTC.clear();
|
|
}
|
|
|
|
////////////
|
|
// Methods
|
|
////////////
|
|
|
|
void G4MaterialPropertiesTable::AddConstProperty(const char *key,
|
|
G4double PropertyValue)
|
|
{
|
|
// Provides a way of adding a constant property to the Mataerial Properties
|
|
// Table given a key
|
|
|
|
MPTC [G4String(key)] = PropertyValue;
|
|
|
|
}
|
|
|
|
void G4MaterialPropertiesTable::AddProperty(const char *key,
|
|
G4double *PhotonMomenta,
|
|
G4double *PropertyValues,
|
|
G4int NumEntries)
|
|
{
|
|
// Privides a way of adding a property to the Material Properties
|
|
// Table given a pair of numbers and a key
|
|
|
|
G4MaterialPropertyVector *mpv =
|
|
new G4MaterialPropertyVector(PhotonMomenta,
|
|
PropertyValues,
|
|
NumEntries);
|
|
MPT [G4String(key)] = mpv;
|
|
}
|
|
|
|
void G4MaterialPropertiesTable::AddProperty(const char *key,
|
|
G4MaterialPropertyVector *mpv)
|
|
{
|
|
// Provides a way of adding a property to the Material Properties
|
|
// Table given an G4MaterialPropertyVector Reference and a key
|
|
|
|
MPT [G4String(key)] = mpv;
|
|
}
|
|
|
|
void G4MaterialPropertiesTable::RemoveConstProperty(const char *key)
|
|
{
|
|
MPTC.erase(G4String(key));
|
|
}
|
|
|
|
void G4MaterialPropertiesTable::RemoveProperty(const char *key)
|
|
{
|
|
MPT.erase(G4String(key));
|
|
}
|
|
|
|
G4double G4MaterialPropertiesTable::GetConstProperty(const char *key)
|
|
{
|
|
// Returns the constant material property corresponding to a key
|
|
|
|
MPTCiterator j;
|
|
j = MPTC.find(G4String(key));
|
|
if ( j != MPTC.end() ) {
|
|
return j->second;
|
|
}
|
|
else {
|
|
G4Exception("G4MaterialPropertiesTable::GetConstProperty ==> "
|
|
"Constant Material Property not found.");
|
|
return G4double(0.0);
|
|
}
|
|
}
|
|
|
|
G4bool G4MaterialPropertiesTable::ConstPropertyExists(const char *key)
|
|
{
|
|
// Return true if a const property 'key' exists
|
|
|
|
MPTCiterator j;
|
|
j = MPTC.find(G4String(key));
|
|
if ( j != MPTC.end() ) {
|
|
return true;
|
|
}
|
|
else {
|
|
return false;
|
|
}
|
|
}
|
|
|
|
G4MaterialPropertyVector* G4MaterialPropertiesTable::GetProperty(const char *key)
|
|
{
|
|
// Returns a Material Property Vector corresponding to a key
|
|
|
|
if(MPT[G4String(key)] != 0) {
|
|
return MPT[G4String(key)];
|
|
}else{
|
|
if(G4String(key) == "GROUPVEL") {
|
|
return SetGROUPVEL();
|
|
}else{
|
|
return MPT[G4String(key)];
|
|
}
|
|
}
|
|
}
|
|
|
|
void G4MaterialPropertiesTable::AddEntry(const char *key,
|
|
G4double aPhotonMomentum,
|
|
G4double aPropertyValue)
|
|
|
|
// Allows to add an entry pair directly to the Material Property Vector
|
|
// given a key
|
|
|
|
{
|
|
G4MaterialPropertyVector *targetVector=MPT [G4String(key)];
|
|
if (targetVector != 0) {
|
|
targetVector->AddElement(aPhotonMomentum, aPropertyValue);
|
|
}
|
|
else {
|
|
G4Exception("G4MaterialPropertiesTable::AddEntry ==> "
|
|
"Material Property Vector not found.");
|
|
}
|
|
}
|
|
|
|
void G4MaterialPropertiesTable::RemoveEntry(const char *key,
|
|
G4double aPhotonMomentum)
|
|
{
|
|
// Allows to remove an entry pair directly from the Material Property Vector
|
|
// given a key
|
|
|
|
G4MaterialPropertyVector *targetVector=MPT [G4String(key)];
|
|
if (targetVector) {
|
|
targetVector->RemoveElement(aPhotonMomentum);
|
|
}
|
|
else {
|
|
G4Exception("G4MaterialPropertiesTable::RemoveEntry ==> "
|
|
"Material Property Vector not found.");
|
|
}
|
|
}
|
|
void G4MaterialPropertiesTable::DumpTable()
|
|
{
|
|
MPTiterator i;
|
|
for (i = MPT.begin(); i != MPT.end(); ++i) {
|
|
G4cout << (*i).first << G4endl;
|
|
if ( (*i).second != 0 ) {
|
|
(*i).second->DumpVector();
|
|
}
|
|
else {
|
|
G4cout << "NULL Material Property Vector Pointer." << G4endl;
|
|
}
|
|
}
|
|
MPTCiterator j;
|
|
for (j = MPTC.begin(); j != MPTC.end(); ++j) {
|
|
G4cout << j->first << G4endl;
|
|
if ( j->second != 0 ) {
|
|
G4cout << j->second << G4endl;
|
|
}
|
|
else {
|
|
G4cout << "No Material Constant Property." << G4endl;
|
|
}
|
|
}
|
|
|
|
}
|
|
G4MaterialPropertyVector* G4MaterialPropertiesTable::SetGROUPVEL()
|
|
{
|
|
// fetch RINDEX data, give up if unavailable
|
|
G4MaterialPropertyVector *rindex = this->GetProperty("RINDEX");
|
|
if (rindex==0) return NULL;
|
|
|
|
rindex->ResetIterator();
|
|
// RINDEX exists but has no entries, give up
|
|
if ( (++*rindex) == false ) return NULL;
|
|
|
|
// add GROUPVEL vector
|
|
G4MaterialPropertyVector* groupvel = new G4MaterialPropertyVector();
|
|
|
|
this->AddProperty( "GROUPVEL", groupvel );
|
|
|
|
// fill GROUPVEL vector using RINDEX values
|
|
// rindex built-in "iterator" was advanced to first entry above
|
|
G4double E0 = rindex->GetPhotonMomentum();
|
|
G4double n0 = rindex->GetProperty();
|
|
|
|
if (E0 <= 0. ) G4Exception("G4MaterialPropertiesTable::SetGROUPVEL ==> "
|
|
"Optical Photon Energy <= 0");
|
|
|
|
if ( ++*rindex ) {
|
|
// good, we have at least two entries in RINDEX
|
|
// get next energy/value pair
|
|
G4double E1 = rindex->GetPhotonMomentum();
|
|
G4double n1 = rindex->GetProperty();
|
|
|
|
if (E1 <= 0. ) G4Exception("G4MaterialPropertiesTable::SetGROUPVEL ==> "
|
|
"Optical Photon Energy <= 0");
|
|
G4double vg;
|
|
// add entry at first photon energy
|
|
vg = c_light/(n0+(n1-n0)/std::log(E1/E0));
|
|
// allow only for 'normal dispersion' -> dn/d(logE) > 0
|
|
if(vg<0 || vg>c_light/n0)vg = c_light/n0;
|
|
groupvel->AddElement( E0, vg );
|
|
// add entries at midpoints between remaining photon energies
|
|
while(1) {
|
|
vg = c_light/( 0.5*(n0+n1)+(n1-n0)/std::log(E1/E0));
|
|
// allow only for 'normal dispersion' -> dn/d(logE) > 0
|
|
if(vg<0 || vg>c_light/(0.5*(n0+n1)))vg = c_light/(0.5*(n0+n1));
|
|
groupvel->AddElement( 0.5*(E0+E1), vg );
|
|
// get next energy/value pair, or exit loop
|
|
if (!(++*rindex)) break;
|
|
E0 = E1;
|
|
n0 = n1;
|
|
E1 = rindex->GetPhotonMomentum();
|
|
n1 = rindex->GetProperty();
|
|
|
|
if (E1 <= 0. ) G4Exception("G4MaterialPropertiesTable::SetGROUPVEL ==> "
|
|
"Optical Photon Energy <= 0");
|
|
}
|
|
// add entry at last photon energy
|
|
vg = c_light/(n1+(n1-n0)/std::log(E1/E0));
|
|
// allow only for 'normal dispersion' -> dn/d(logE) > 0
|
|
if(vg<0 || vg>c_light/n1)vg = c_light/n1;
|
|
groupvel->AddElement( E1, vg );
|
|
}else{
|
|
// only one entry in RINDEX -- weird!
|
|
groupvel->AddElement( E0, c_light/n0 );
|
|
}
|
|
|
|
return groupvel;
|
|
}
|