27 TMaterial::TMaterial()
40 TMaterial::TMaterial(
const char *name,
const char *title, Float_t a, Float_t z, Float_t density)
41 :TNamed(name,title), TAttFill(0,1)
43 if (!gGeometry) gGeometry =
new TGeometry(
"Geometry",
"Default Geometry");
47 fNumber = gGeometry->GetListOfMaterials()->GetSize();
50 gGeometry->GetListOfMaterials()->Add(
this);
56 TMaterial::TMaterial(
const char *name,
const char *title, Float_t a, Float_t z, Float_t density, Float_t radl, Float_t inter)
57 :TNamed(name,title), TAttFill(0,1)
59 if (!gGeometry) gGeometry =
new TGeometry(
"Geometry",
"Default Geometry");
63 fNumber = gGeometry->GetListOfMaterials()->GetSize();
66 gGeometry->GetListOfMaterials()->Add(
this);
72 TMaterial::~TMaterial()
74 if (gGeometry) gGeometry->GetListOfMaterials()->Remove(
this);
81 void TMaterial::Streamer(TBuffer &R__b)
84 if (R__b.IsReading()) {
85 Version_t R__v = R__b.ReadVersion(&R__s, &R__c);
86 R__b.ClassBegin(TMaterial::IsA());
87 R__b.ClassMember(
"TNamed");
88 TNamed::Streamer(R__b);
89 R__b.ClassMember(
"fNumber",
"Int_t");
91 R__b.ClassMember(
"fA",
"Float_t");
93 R__b.ClassMember(
"fZ",
"Float_t");
95 R__b.ClassMember(
"fDensity",
"Float_t");
98 R__b.ClassMember(
"TAttFill");
99 TAttFill::Streamer(R__b);
100 R__b.ClassMember(
"fRadLength",
"Float_t");
102 R__b.ClassMember(
"fInterLength",
"Float_t");
103 R__b >> fInterLength;
108 R__b.ClassEnd(TMaterial::IsA());
109 R__b.CheckByteCount(R__s, R__c, TMaterial::IsA());
111 R__c = R__b.WriteVersion(TMaterial::IsA(), kTRUE);
112 R__b.ClassBegin(TMaterial::IsA());
113 R__b.ClassMember(
"TNamed");
114 TNamed::Streamer(R__b);
115 R__b.ClassMember(
"fNumber",
"Int_t");
117 R__b.ClassMember(
"fA",
"Float_t");
119 R__b.ClassMember(
"fZ",
"Float_t");
121 R__b.ClassMember(
"fDensity",
"Float_t");
123 R__b.ClassMember(
"TAttFill");
124 TAttFill::Streamer(R__b);
125 R__b.ClassMember(
"fRadLength",
"Float_t");
127 R__b.ClassMember(
"fInterLength",
"Float_t");
128 R__b << fInterLength;
129 R__b.ClassEnd(TMaterial::IsA());
130 R__b.SetByteCount(R__c, kTRUE);