Geant4 Cross Reference |
1 // 1 2 // ******************************************* 3 // * License and Disclaimer 4 // * 5 // * The Geant4 software is copyright of th 6 // * the Geant4 Collaboration. It is provided 7 // * conditions of the Geant4 Software License 8 // * LICENSE and available at http://cern.ch/ 9 // * include a list of copyright holders. 10 // * 11 // * Neither the authors of this software syst 12 // * institutes,nor the agencies providing fin 13 // * work make any representation or warran 14 // * regarding this software system or assum 15 // * use. Please see the license in the file 16 // * for the full disclaimer and the limitatio 17 // * 18 // * This code implementation is the result 19 // * technical work of the GEANT4 collaboratio 20 // * By using, copying, modifying or distri 21 // * any work based on the software) you ag 22 // * use in resulting scientific publicati 23 // * acceptance of all terms of the Geant4 Sof 24 // ******************************************* 25 // 26 // 27 // 28 // by I.Hrivnacova, 13.10.99 29 30 #include <iomanip> 31 #include "G3VolTable.hh" 32 #include "globals.hh" 33 #include "G3toG4.hh" 34 #include "G3toG4MakeSolid.hh" 35 36 void PG4gsvolu(G4String *tokens) { 37 // fill the parameter containers 38 G3fillParams(tokens,PTgsvolu); 39 40 // interpret the parameters 41 G4String vname = Spar[0]; 42 G4String shape = Spar[1]; 43 G4int nmed = Ipar[0]; 44 G4int npar = Ipar[1]; 45 G4double *pars = Rpar; 46 47 G4gsvolu(vname, shape, nmed, pars, npar); 48 } 49 50 G3VolTableEntry* G4CreateVTE(G4String vname, G 51 G4double rpar[], 52 { 53 // create the solid 54 G4bool hasNegPars; 55 G4bool deferred; 56 G4bool okAxis[3]; 57 G4VSolid* solid 58 = G3toG4MakeSolid(vname, shape, rpar, npar 59 60 // if solid has been deferred 61 // VTE is created with hasNegPars = true 62 if (deferred) hasNegPars = true; 63 64 // create VTE 65 G3VolTableEntry* vte 66 = new G3VolTableEntry(vname, shape, rpar, 67 G3Vol.PutVTE(vte); 68 69 return vte; 70 } 71 72 void G4gsvolu(G4String vname, G4String shape, 73 G4int npar) 74 { 75 /* 76 G4cout << "Creating logical volume " << vnam 77 << " nmed " << nmed << " #pars "<< npar < 78 for (int ipar=0; ipar< npar; ipar++) G4cout 79 G4cout << G4endl; 80 */ 81 if (G3Vol.GetVTE(vname)) { 82 // abort if VTE with given name exists 83 G4String text = "G4gsvolu: Attempt to crea 84 G4Exception("G4gsvolu()", "G3toG40024", Fa 85 return; 86 } 87 else { 88 G4CreateVTE(vname, shape, nmed, rpar, npar 89 } 90 } 91