| Geant4 Cross Reference |
1 // 1 //
2 // ******************************************* 2 // ********************************************************************
3 // * License and Disclaimer 3 // * License and Disclaimer *
4 // * 4 // * *
5 // * The Geant4 software is copyright of th 5 // * The Geant4 software is copyright of the Copyright Holders of *
6 // * the Geant4 Collaboration. It is provided 6 // * the Geant4 Collaboration. It is provided under the terms and *
7 // * conditions of the Geant4 Software License 7 // * conditions of the Geant4 Software License, included in the file *
8 // * LICENSE and available at http://cern.ch/ 8 // * LICENSE and available at http://cern.ch/geant4/license . These *
9 // * include a list of copyright holders. 9 // * include a list of copyright holders. *
10 // * 10 // * *
11 // * Neither the authors of this software syst 11 // * Neither the authors of this software system, nor their employing *
12 // * institutes,nor the agencies providing fin 12 // * institutes,nor the agencies providing financial support for this *
13 // * work make any representation or warran 13 // * work make any representation or warranty, express or implied, *
14 // * regarding this software system or assum 14 // * regarding this software system or assume any liability for its *
15 // * use. Please see the license in the file 15 // * use. Please see the license in the file LICENSE and URL above *
16 // * for the full disclaimer and the limitatio 16 // * for the full disclaimer and the limitation of liability. *
17 // * 17 // * *
18 // * This code implementation is the result 18 // * This code implementation is the result of the scientific and *
19 // * technical work of the GEANT4 collaboratio 19 // * technical work of the GEANT4 collaboration. *
20 // * By using, copying, modifying or distri 20 // * By using, copying, modifying or distributing the software (or *
21 // * any work based on the software) you ag 21 // * any work based on the software) you agree to acknowledge its *
22 // * use in resulting scientific publicati 22 // * use in resulting scientific publications, and indicate your *
23 // * acceptance of all terms of the Geant4 Sof 23 // * acceptance of all terms of the Geant4 Software license. *
24 // ******************************************* 24 // ********************************************************************
25 // 25 //
26 // G4tgbMaterialMixtureByVolume implementation <<
27 // 26 //
28 // Author: P.Arce, CIEMAT (November 2007) << 27 // $Id: G4tgbMaterialMixtureByVolume.cc,v 1.9 2010-10-13 07:56:55 gcosmo Exp $
29 // ------------------------------------------- << 28 // GEANT4 tag $Name: geant4-09-04-patch-02 $
>> 29 //
>> 30 //
>> 31 // class G4tgbMaterialMixtureByVolume
30 32
31 #include "G4tgbMaterialMixtureByVolume.hh" << 33 // History:
>> 34 // - Created. P.Arce, CIEMAT (November 2007)
>> 35 // -------------------------------------------------------------------------
32 36
33 #include "G4SystemOfUnits.hh" << 37 #include "G4tgbMaterialMixtureByVolume.hh"
34 #include "G4tgbMaterial.hh" 38 #include "G4tgbMaterial.hh"
35 #include "G4tgbMaterialMgr.hh" 39 #include "G4tgbMaterialMgr.hh"
36 #include "G4tgrMessenger.hh" 40 #include "G4tgrMessenger.hh"
37 41
38 // ------------------------------------------- << 42 // -------------------------------------------------------------------------
39 G4tgbMaterialMixtureByVolume::G4tgbMaterialMix 43 G4tgbMaterialMixtureByVolume::G4tgbMaterialMixtureByVolume()
40 { 44 {
41 } 45 }
42 46
43 // ------------------------------------------- << 47
>> 48 // -------------------------------------------------------------------------
44 G4tgbMaterialMixtureByVolume::~G4tgbMaterialMi 49 G4tgbMaterialMixtureByVolume::~G4tgbMaterialMixtureByVolume()
45 { 50 {
46 } 51 }
47 52
48 // ------------------------------------------- << 53
49 G4tgbMaterialMixtureByVolume::G4tgbMaterialMix << 54 // -------------------------------------------------------------------------
>> 55 G4tgbMaterialMixtureByVolume::G4tgbMaterialMixtureByVolume( G4tgrMaterial* hg )
50 { 56 {
51 theTgrMate = hg; 57 theTgrMate = hg;
52 } 58 }
53 59
54 // ------------------------------------------- << 60
>> 61 // -------------------------------------------------------------------------
55 G4Material* G4tgbMaterialMixtureByVolume::Buil 62 G4Material* G4tgbMaterialMixtureByVolume::BuildG4Material()
56 { 63 {
>> 64
57 //----- construct new G4Material with compon 65 //----- construct new G4Material with components materials (a mixture)
58 G4Material* mate = << 66 G4Material* mate = new G4Material( theTgrMate->GetName(),
59 new G4Material(theTgrMate->GetName(), theT << 67 theTgrMate->GetDensity(),
60 theTgrMate->GetNumberOfComp << 68 theTgrMate->GetNumberOfComponents(),
61 theTgrMate->GetTemperature( << 69 theTgrMate->GetState(),
>> 70 theTgrMate->GetTemperature(),
>> 71 theTgrMate->GetPressure() );
62 #ifdef G4VERBOSE 72 #ifdef G4VERBOSE
63 if(G4tgrMessenger::GetVerboseLevel() >= 2) << 73 if( G4tgrMessenger::GetVerboseLevel() >= 2 )
64 { 74 {
65 G4cout << " G4tgbMaterialMixtureByVolume:: 75 G4cout << " G4tgbMaterialMixtureByVolume::buildG4Material() -"
66 << " Constructing new G4Material:" 76 << " Constructing new G4Material:"
67 << " " << theTgrMate->GetName() << << 77 << " " << theTgrMate->GetName()
68 << theTgrMate->GetDensity() / g * c << 78 << " " << theTgrMate->GetDensity()/g*cm3
69 << theTgrMate->GetNumberOfComponent << 79 << " " << theTgrMate->GetNumberOfComponents()
70 << theTgrMate->GetState() << " " << << 80 << " " << theTgrMate->GetState()
>> 81 << " " << theTgrMate->GetTemperature()
71 << " " << theTgrMate->GetPressure() 82 << " " << theTgrMate->GetPressure() << G4endl;
72 } 83 }
73 #endif 84 #endif
74 << 85
75 //----- Transform fractions by volume to fra 86 //----- Transform fractions by volume to fractions by weight
76 TransformToFractionsByWeight(); 87 TransformToFractionsByWeight();
77 88
78 //----- Add components 89 //----- Add components
79 G4Material* compMate = nullptr; << 90 G4Material* compMate = 0;
80 G4tgbMaterialMgr* mf = G4tgbMaterialMgr::Get 91 G4tgbMaterialMgr* mf = G4tgbMaterialMgr::GetInstance();
81 for(G4int ii = 0; ii < theTgrMate->GetNumber << 92 for( G4int ii = 0; ii < theTgrMate->GetNumberOfComponents(); ii++)
82 { 93 {
83 // Look if this component is a material 94 // Look if this component is a material
84 compMate = mf->FindOrBuildG4Material(GetCo << 95 compMate = mf->FindOrBuildG4Material( GetComponent(ii) );
85 if(compMate != nullptr) << 96 if( compMate != 0 )
86 { << 97 {
87 // If it is a material add it by weight << 98 // If it is a material add it by weight fraction
88 mate->AddMaterial(compMate, theFractions << 99 mate->AddMaterial( compMate, theFractionsByWeight[ii] );
89 } 100 }
90 else 101 else
91 { 102 {
92 G4String ErrMessage = "Component " + Get << 103 G4String ErrMessage = "Component " + GetComponent(ii)
93 theTgrMate->GetNam << 104 + " of material " + theTgrMate->GetName()
94 "is not an element << 105 + "\n" + "is not an element nor a material !";
95 G4Exception("G4tgbMaterialMixtureByVolum 106 G4Exception("G4tgbMaterialMixtureByVolume::BuildG4Material()",
96 "InvalidSetup", FatalExcepti 107 "InvalidSetup", FatalException, ErrMessage);
97 } 108 }
98 } << 109 }
99 110
100 #ifdef G4VERBOSE 111 #ifdef G4VERBOSE
101 if(G4tgrMessenger::GetVerboseLevel() >= 1) << 112 if( G4tgrMessenger::GetVerboseLevel() >= 1 )
102 { 113 {
103 G4cout << " Constructing new G4Material by << 114 G4cout << " Constructing new G4Material by volume: " << *mate << G4endl;
104 } 115 }
105 #endif << 116 #endif
106 117
107 return mate; 118 return mate;
108 } 119 }
109 120
110 // ------------------------------------------- << 121
111 void G4tgbMaterialMixtureByVolume::TransformTo << 122 // -------------------------------------------------------------------------
112 { << 123 void G4tgbMaterialMixtureByVolume::TransformToFractionsByWeight()
>> 124 {
113 G4tgbMaterialMgr* mf = G4tgbMaterialMgr::Get 125 G4tgbMaterialMgr* mf = G4tgbMaterialMgr::GetInstance();
114 G4Material* compMate = nullptr; << 126 G4Material* compMate = 0;
115 G4double totalfd = 0.; << 127 G4double totalfd = 0.;
116 for(G4int ii = 0; ii < theTgrMate->GetNumber << 128 for( G4int ii = 0; ii < theTgrMate->GetNumberOfComponents(); ii++ )
117 { 129 {
118 compMate = mf->FindOrBuildG4Material(GetCo << 130 compMate = mf->FindOrBuildG4Material( GetComponent(ii) );
119 if(compMate != nullptr) << 131 if( compMate != 0 )
120 { 132 {
121 // If it is a material add it by weight << 133 // If it is a material add it by weight fraction
122 theFractionsByWeight.push_back(GetFracti << 134 theFractionsByWeight.push_back( GetFraction(ii)*compMate->GetDensity() );
123 totalfd += theFractionsByWeight[ii]; 135 totalfd += theFractionsByWeight[ii];
124 } 136 }
125 else 137 else
126 { 138 {
127 G4String ErrMessage = "Component " + Get << 139 G4String ErrMessage = "Component " + GetComponent(ii)
128 theTgrMate->GetNam << 140 + " of material " + theTgrMate->GetName()
129 "is not a material << 141 + "\n" + "is not a material !";
130 G4Exception("G4tgbMaterialMixtureByVolum 142 G4Exception("G4tgbMaterialMixtureByVolume::BuildG4Material()",
131 "InvalidSetup", FatalExcepti 143 "InvalidSetup", FatalException, ErrMessage);
132 } << 144 }
133 } 145 }
134 for(G4int ii = 0; ii < theTgrMate->GetNumber << 146 for( G4int ii = 0; ii < theTgrMate->GetNumberOfComponents(); ii++ )
135 { 147 {
136 theFractionsByWeight[ii] /= totalfd; 148 theFractionsByWeight[ii] /= totalfd;
137 #ifdef G4VERBOSE 149 #ifdef G4VERBOSE
138 if(G4tgrMessenger::GetVerboseLevel() >= 2) << 150 if( G4tgrMessenger::GetVerboseLevel() >= 2 )
139 { 151 {
140 G4cout << " G4tgbMaterialMixtureByVolume 152 G4cout << " G4tgbMaterialMixtureByVolume::TransformToFractionsByWeight()"
141 << " Component " << ii << " : " << 153 << " Component " << ii << " : "
142 << mf->FindOrBuildG4Material(GetC << 154 << mf->FindOrBuildG4Material( GetComponent(ii) )->GetName()
143 << " FractionByVolume= " << GetFr 155 << " FractionByVolume= " << GetFraction(ii)
144 << " FractionByWeight= " << theFr << 156 << " FractionByWeight= " << theFractionsByWeight[ii]
>> 157 << G4endl;
145 } 158 }
146 #endif 159 #endif
147 } 160 }
148 } 161 }
149 162