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