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