File indexing completed on 2025-02-23 09:20:12
0001
0002
0003
0004
0005
0006
0007
0008
0009
0010
0011
0012
0013
0014
0015
0016
0017
0018
0019
0020
0021
0022
0023
0024
0025
0026
0027
0028
0029
0030
0031
0032 #include "G4MIRDThymus.hh"
0033
0034 #include "globals.hh"
0035 #include "G4SystemOfUnits.hh"
0036 #include "G4SDManager.hh"
0037 #include "G4VisAttributes.hh"
0038 #include "G4Ellipsoid.hh"
0039 #include "G4ThreeVector.hh"
0040 #include "G4VPhysicalVolume.hh"
0041 #include "G4RotationMatrix.hh"
0042 #include "G4Material.hh"
0043 #include "G4LogicalVolume.hh"
0044 #include "G4HumanPhantomMaterial.hh"
0045 #include "G4VPhysicalVolume.hh"
0046 #include "G4PVPlacement.hh"
0047 #include "G4UnionSolid.hh"
0048 #include "G4HumanPhantomColour.hh"
0049
0050 G4VPhysicalVolume* G4MIRDThymus::Construct(const G4String& volumeName, G4VPhysicalVolume* mother,
0051 const G4String& colourName, G4bool wireFrame,G4bool)
0052 {
0053 G4cout<<"Construct "<<volumeName<<" with mother volume "<<mother->GetName()<<G4endl;
0054
0055
0056 auto* material = new G4HumanPhantomMaterial();
0057 auto* soft = material -> GetMaterial("soft_tissue");
0058 delete material;
0059
0060 G4double ax= 3. *cm;
0061 G4double by= 0.5*cm;
0062 G4double cz= 4.*cm;
0063
0064 auto* Thymus = new G4Ellipsoid("Thymus",
0065 ax, by, cz);
0066
0067 auto* logicThymus = new G4LogicalVolume(Thymus,
0068 soft,
0069 "logical" + volumeName,
0070 nullptr, nullptr, nullptr);
0071
0072
0073 G4VPhysicalVolume* physThymus = new G4PVPlacement(nullptr,
0074 G4ThreeVector(2.*cm,-6.*cm, 25.5*cm),
0075 "physicalThymus",
0076 logicThymus,
0077 mother,
0078 false,
0079 0, true);
0080
0081
0082
0083 auto* colourPointer = new G4HumanPhantomColour();
0084 G4Colour colour = colourPointer -> GetColour(colourName);
0085 auto* ThymusVisAtt = new G4VisAttributes(colour);
0086 ThymusVisAtt->SetForceSolid(wireFrame);
0087 logicThymus->SetVisAttributes(ThymusVisAtt);
0088
0089 G4cout << "Thymus created !!!!!!" << G4endl;
0090
0091
0092 G4double ThymusVol = logicThymus->GetSolid()->GetCubicVolume();
0093 G4cout << "Volume of Thymus = " << ThymusVol/cm3 << " cm^3" << G4endl;
0094
0095
0096 G4String ThymusMat = logicThymus->GetMaterial()->GetName();
0097 G4cout << "Material of Thymus = " << ThymusMat << G4endl;
0098
0099
0100 G4double ThymusDensity = logicThymus->GetMaterial()->GetDensity();
0101 G4cout << "Density of Material = " << ThymusDensity*cm3/g << " g/cm^3" << G4endl;
0102
0103
0104 G4double ThymusMass = (ThymusVol)*ThymusDensity;
0105 G4cout << "Mass of Thymus = " << ThymusMass/gram << " g" << G4endl;
0106
0107 return physThymus;
0108 }