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 // G4tgbMaterialMixtureByWeight 26 // G4tgbMaterialMixtureByWeight 27 // 27 // 28 // Author: P.Arce, CIEMAT (November 2007) 28 // Author: P.Arce, CIEMAT (November 2007) 29 // ------------------------------------------- 29 // -------------------------------------------------------------------- 30 30 31 #include "G4tgbMaterialMixtureByWeight.hh" 31 #include "G4tgbMaterialMixtureByWeight.hh" 32 32 33 #include "G4SystemOfUnits.hh" 33 #include "G4SystemOfUnits.hh" 34 #include "G4tgbMaterial.hh" 34 #include "G4tgbMaterial.hh" 35 #include "G4tgbMaterialMgr.hh" 35 #include "G4tgbMaterialMgr.hh" 36 #include "G4tgrMessenger.hh" 36 #include "G4tgrMessenger.hh" 37 37 38 // ------------------------------------------- 38 // -------------------------------------------------------------------- 39 G4tgbMaterialMixtureByWeight::G4tgbMaterialMix 39 G4tgbMaterialMixtureByWeight::G4tgbMaterialMixtureByWeight() 40 { 40 { 41 } 41 } 42 42 43 // ------------------------------------------- 43 // -------------------------------------------------------------------- 44 G4tgbMaterialMixtureByWeight::~G4tgbMaterialMi 44 G4tgbMaterialMixtureByWeight::~G4tgbMaterialMixtureByWeight() 45 { 45 { 46 } 46 } 47 47 48 // ------------------------------------------- 48 // -------------------------------------------------------------------- 49 G4tgbMaterialMixtureByWeight::G4tgbMaterialMix 49 G4tgbMaterialMixtureByWeight::G4tgbMaterialMixtureByWeight(G4tgrMaterial* hg) 50 { 50 { 51 theTgrMate = hg; 51 theTgrMate = hg; 52 } 52 } 53 53 54 // ------------------------------------------- 54 // -------------------------------------------------------------------- 55 G4Material* G4tgbMaterialMixtureByWeight::Buil 55 G4Material* G4tgbMaterialMixtureByWeight::BuildG4Material() 56 { 56 { 57 //----- construct new G4Material with compon 57 //----- construct new G4Material with component materials (a mixture) 58 G4Material* mate = 58 G4Material* mate = 59 new G4Material(theTgrMate->GetName(), theT 59 new G4Material(theTgrMate->GetName(), theTgrMate->GetDensity(), 60 theTgrMate->GetNumberOfComp 60 theTgrMate->GetNumberOfComponents(), theTgrMate->GetState(), 61 theTgrMate->GetTemperature( 61 theTgrMate->GetTemperature(), theTgrMate->GetPressure()); 62 #ifdef G4VERBOSE 62 #ifdef G4VERBOSE 63 if(G4tgrMessenger::GetVerboseLevel() >= 2) 63 if(G4tgrMessenger::GetVerboseLevel() >= 2) 64 { 64 { 65 G4cout << " G4tgbMaterialMixtureByWeight:: 65 G4cout << " G4tgbMaterialMixtureByWeight::BuildG4Material() -" 66 << " Constructing new G4Material:" 66 << " Constructing new G4Material:" 67 << " " << theTgrMate->GetName() << 67 << " " << theTgrMate->GetName() << " " 68 << theTgrMate->GetDensity() / g * c 68 << theTgrMate->GetDensity() / g * cm3 << " " 69 << theTgrMate->GetNumberOfComponent 69 << theTgrMate->GetNumberOfComponents() << " " 70 << theTgrMate->GetState() << " " << 70 << theTgrMate->GetState() << " " << theTgrMate->GetTemperature() 71 << " " << theTgrMate->GetPressure() 71 << " " << theTgrMate->GetPressure() << G4endl; 72 } 72 } 73 #endif 73 #endif 74 74 75 //--- Add components 75 //--- Add components 76 G4Element* compElem; 76 G4Element* compElem; 77 G4Material* compMate; 77 G4Material* compMate; 78 G4tgbMaterialMgr* mf = G4tgbMaterialMgr::Get 78 G4tgbMaterialMgr* mf = G4tgbMaterialMgr::GetInstance(); 79 79 80 for(G4int ii = 0; ii < theTgrMate->GetNumber 80 for(G4int ii = 0; ii < theTgrMate->GetNumberOfComponents(); ++ii) 81 { 81 { 82 // Look if this component is an element 82 // Look if this component is an element 83 compElem = mf->FindOrBuildG4Element(GetCom 83 compElem = mf->FindOrBuildG4Element(GetComponent(ii), false); 84 if(compElem != nullptr) 84 if(compElem != nullptr) 85 { 85 { 86 mate->AddElement(compElem, GetFraction(i 86 mate->AddElement(compElem, GetFraction(ii)); 87 } 87 } 88 else // If it is not an element, it must 88 else // If it is not an element, it must be a material 89 { 89 { 90 compMate = mf->FindOrBuildG4Material(Get 90 compMate = mf->FindOrBuildG4Material(GetComponent(ii)); 91 if(compMate != nullptr) 91 if(compMate != nullptr) 92 { 92 { 93 // If it is a material add it by weigh 93 // If it is a material add it by weight fraction 94 mate->AddMaterial(compMate, GetFractio 94 mate->AddMaterial(compMate, GetFraction(ii)); 95 } 95 } 96 else 96 else 97 { 97 { 98 G4String ErrMessage = "Component " + G 98 G4String ErrMessage = "Component " + GetComponent(ii) + 99 " of material " 99 " of material " + theTgrMate->GetName() + "\n" + 100 "is not an eleme 100 "is not an element nor a material !"; 101 G4Exception("G4tgbMaterialMixtureByWei 101 G4Exception("G4tgbMaterialMixtureByWeight::BuildG4Material()", 102 "InvalidSetup", FatalExcep 102 "InvalidSetup", FatalException, ErrMessage); 103 } 103 } 104 } 104 } 105 } 105 } 106 106 107 #ifdef G4VERBOSE 107 #ifdef G4VERBOSE 108 if(G4tgrMessenger::GetVerboseLevel() >= 1) 108 if(G4tgrMessenger::GetVerboseLevel() >= 1) 109 { 109 { 110 G4cout << " Constructing new G4Material by 110 G4cout << " Constructing new G4Material by weight: " << *mate << G4endl; 111 G4cout << " TEMPERATURE " << mate->GetTemp 111 G4cout << " TEMPERATURE " << mate->GetTemperature() / kelvin << " kelvin " 112 << G4endl; 112 << G4endl; 113 } 113 } 114 #endif 114 #endif 115 115 116 return mate; 116 return mate; 117 } 117 } 118 118