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 // G4tgbElement << 27 // 26 // 28 // Author: P.Arce, CIEMAT (November 2007) << 27 // $Id: G4tgbElement.cc,v 1.5 2010/10/13 07:56:55 gcosmo Exp $ 29 // ------------------------------------------- << 28 // GEANT4 tag $Name: geant4-09-04 $ >> 29 // >> 30 // >> 31 // class G4tgbElement >> 32 >> 33 // History: >> 34 // - Created. P.Arce, CIEMAT (November 2007) >> 35 // ------------------------------------------------------------------------- 30 36 31 #include "G4tgbElement.hh" 37 #include "G4tgbElement.hh" 32 #include "G4tgbMaterialMgr.hh" 38 #include "G4tgbMaterialMgr.hh" 33 #include "G4tgrElementSimple.hh" 39 #include "G4tgrElementSimple.hh" 34 #include "G4tgrElementFromIsotopes.hh" 40 #include "G4tgrElementFromIsotopes.hh" 35 #include "G4tgrMessenger.hh" 41 #include "G4tgrMessenger.hh" 36 42 37 // ------------------------------------------- << 43 38 G4tgbElement::G4tgbElement(G4tgrElement* hg) << 44 //---------------------------------------------------------------------- >> 45 G4tgbElement::G4tgbElement( G4tgrElement* hg ) 39 { 46 { 40 theTgrElem = hg; 47 theTgrElem = hg; >> 48 theG4Elem = 0; 41 } 49 } 42 50 43 // ------------------------------------------- << 51 >> 52 //---------------------------------------------------------------------- 44 G4Element* G4tgbElement::BuildG4ElementSimple( 53 G4Element* G4tgbElement::BuildG4ElementSimple() 45 { 54 { 46 G4Element* elem = nullptr; << 55 G4Element* elem = 0; 47 56 48 //-------- if G4Element not found, construct << 57 //-------- if G4Element not found, construct it 49 if(theG4Elem == nullptr) << 58 if( theG4Elem == 0 ) 50 { << 59 { 51 //----- construct new G4Element << 60 //----- construct new G4Element 52 G4tgrElementSimple* tgrElem = static_cast< 61 G4tgrElementSimple* tgrElem = static_cast<G4tgrElementSimple*>(theTgrElem); 53 62 54 elem = new G4Element(tgrElem->GetName(), t 63 elem = new G4Element(tgrElem->GetName(), tgrElem->GetSymbol(), 55 tgrElem->GetZ(), tgrE << 64 tgrElem->GetZ(), tgrElem->GetA() ); 56 #ifdef G4VERBOSE 65 #ifdef G4VERBOSE 57 if(G4tgrMessenger::GetVerboseLevel() >= 1) << 66 if( G4tgrMessenger::GetVerboseLevel() >= 1 ) 58 { 67 { 59 G4cout << " Constructing new G4Element: << 68 G4cout << " Constructing new G4Element: " >> 69 << *elem << G4endl; 60 } 70 } 61 #endif 71 #endif 62 theG4Elem = elem; 72 theG4Elem = elem; 63 } 73 } 64 else 74 else 65 { 75 { 66 elem = theG4Elem; << 76 elem = theG4Elem; 67 } 77 } 68 78 69 return elem; 79 return elem; 70 } 80 } 71 81 72 // ------------------------------------------- << 82 >> 83 //---------------------------------------------------------------------- 73 G4Element* G4tgbElement::BuildG4ElementFromIso 84 G4Element* G4tgbElement::BuildG4ElementFromIsotopes() 74 { 85 { 75 G4Element* elem = nullptr; << 86 G4Element* elem = 0; 76 87 77 //-------- if G4Element not found, construct << 88 //-------- if G4Element not found, construct it 78 if(theG4Elem == nullptr) << 89 if( theG4Elem == 0 ) 79 { << 90 { 80 //----- construct new G4Element << 91 //----- construct new G4Element 81 G4tgrElementFromIsotopes* tgrElem = << 92 G4tgrElementFromIsotopes* tgrElem 82 static_cast<G4tgrElementFromIsotopes*>(t << 93 = static_cast<G4tgrElementFromIsotopes*>(theTgrElem); 83 94 84 elem = new G4Element(tgrElem->GetName(), t 95 elem = new G4Element(tgrElem->GetName(), tgrElem->GetSymbol(), 85 tgrElem->GetNumberOfI << 96 tgrElem->GetNumberOfIsotopes() ); 86 97 87 //----- add isotopes 98 //----- add isotopes 88 G4Isotope* compIsot; 99 G4Isotope* compIsot; 89 G4tgbMaterialMgr* mf = G4tgbMaterialMgr::G 100 G4tgbMaterialMgr* mf = G4tgbMaterialMgr::GetInstance(); 90 for(G4int ii = 0; ii < tgrElem->GetNumberO << 101 for( G4int ii = 0; ii < tgrElem->GetNumberOfIsotopes(); ii++) 91 { 102 { 92 // Look if this component is a material 103 // Look if this component is a material 93 104 94 compIsot = mf->FindOrBuildG4Isotope(tgrE << 105 compIsot = mf->FindOrBuildG4Isotope( tgrElem->GetComponent(ii) ); 95 if(compIsot != nullptr) << 106 if( compIsot != 0 ) 96 { << 107 { 97 elem->AddIsotope(compIsot, tgrElem->Ge << 108 elem->AddIsotope( compIsot, tgrElem->GetAbundance(ii) ); 98 } 109 } 99 else 110 else 100 { 111 { 101 G4String ErrMessage = "Component " + t << 112 G4String ErrMessage = "Component " + tgrElem->GetComponent(ii) 102 " of element " + << 113 + " of element " + tgrElem->GetName() 103 " is not an isot << 114 + " is not an isotope !"; 104 G4Exception("G4tgbElement::BuildG4Elem 115 G4Exception("G4tgbElement::BuildG4ElementFromIsotopes()", 105 "InvalidSetup", FatalExcep << 116 "InvalidSetup", FatalException, ErrMessage ); 106 } 117 } 107 } << 118 } 108 theG4Elem = elem; 119 theG4Elem = elem; 109 } 120 } 110 else 121 else 111 { 122 { 112 elem = theG4Elem; << 123 elem = theG4Elem; 113 } 124 } 114 125 >> 126 115 #ifdef G4VERBOSE 127 #ifdef G4VERBOSE 116 if(G4tgrMessenger::GetVerboseLevel() >= 1) << 128 if( G4tgrMessenger::GetVerboseLevel() >= 1 ) 117 { << 129 { 118 G4cout << " Constructing new G4Element fr << 130 G4cout << " Constructing new G4Element from isotopes: " 119 } << 131 << *elem << G4endl; >> 132 } 120 #endif 133 #endif 121 134 122 return elem; 135 return elem; 123 } 136 } 124 137