39 G4cout<<
"attempt of redefining an existing element "<<symbol<<
G4endl;
62 if (mlist.find(name)!=mlist.end())
64 G4cout<<
"attempt of redefining an existing material "<<
G4endl;
70 mlist[
name]=newmaterial;
76 if (mlist.find(name)!=mlist.end())
78 G4cout<<
"attempt of redefining an existing material "<<
G4endl;
84 mlist[
name]=newmaterial;
90 if (mlist.find(name)==mlist.end())
122 MaterialList::iterator it;
123 for (it=mlist.begin();it!=mlist.end();it++)
G4cout<<(*it).second<<
G4endl;
128 ElementList::iterator it;
136 int ncomponents,natoms;
138 storeElement(name=
"Hydrogen",symbol=
"H" , z= 1., a=1.01*
g/
mole);
139 storeElement(name=
"Carbon" ,symbol=
"C" , z= 6., a=12.01*
g/
mole);
140 storeElement(name=
"Nitrogen",symbol=
"N" , z= 7., a=14.01*
g/
mole);
141 storeElement(name=
"Oxygen" ,symbol=
"O" , z= 8., a=16.00*
g/
mole);
142 storeElement(name=
"Silicon",symbol=
"Si" , z= 14., a=28.09*
g/
mole);
143 storeElement(name=
"Argon",symbol=
"Ar",z=18.,a=39.95*
g/
mole);
144 storeElement(name=
"Iron" ,symbol=
"Fe", z=26., a=55.85*
g/
mole);
145 storeElement(name=
"Aluminum",symbol=
"Al",z=13.,a=26.98*
g/
mole);
146 storeElement(name=
"Lead",symbol=
"Pb",z=82.,a=207.19*
g/
mole);
147 storeElement(name=
"Fluorine",symbol=
"F",z=9.,a=18.99*
g/
mole);
148 storeElement(name=
"Chlorine",symbol=
"Cl",z=17.,a=35.45*
g/
mole);
149 storeElement(name=
"Tungsten",symbol=
"W",z=74.,a=183.85*
g/
mole);
150 storeMaterial(name=
"Aluminium", z=13., a = 26.98*
g/
mole, density = 2.700*
g/
cm3);
151 storeMaterial(name=
"Iron",z=26., a=55.85*
g/
mole, density=7.87*
g/
cm3);
152 storeMaterial(name=
"Copper",z=29.,a=63.546*
g/
mole, density=8.96*
g/
cm3);
153 storeMaterial(name=
"Silicon",z=14.,a=28.0855*
g/
mole, density=2.33*
g/
cm3);
154 storeMaterial(name=
"Tungsten",z=74.,a=183.85*
g/
mole, density = 19.3*
g/
cm3 );
155 storeMaterial(name=
"Lead" , z=82., a= 207.19*
g/
mole,density = 11.35*
g/
cm3);
156 storeMaterial(name=
"LAr",z=18.,a=39.95*
g/
mole,density =1.39*
g/
cm3);
157 storeMaterial(name=
"Scintillator", density=1.032*
g/
cm3, ncomponents=2);
158 addElement(
"Scintillator",
"C",natoms=9);
159 addElement(
"Scintillator",
"H",natoms=10);
160 storeMaterial(name=
"PbWO4", density=8.28*
g/
cm3, ncomponents=3);
161 addElement(
"PbWO4",
"Pb",natoms=1);
162 addElement(
"PbWO4",
"W",natoms=1);
163 addElement(
"PbWO4",
"O",natoms=4);
167 storeMaterial(name=
"Air" , density=1.290*
mg/
cm3, ncomponents=2);
168 addElement(
"Air",
"N", .7);
169 addElement(
"Air",
"O", .3);
170 storeMaterial(name=
"CO2", density=1.977*
mg/1000*
cm3,ncomponents=2);
171 addElement(
"CO2",
"C",natoms=1);
172 addElement(
"CO2",
"O",natoms=2);
173 storeMaterial(name=
"ArCO2",density=1.8*
mg/1000*
cm3,ncomponents=2);
174 addElement(
"ArCO2",
"Ar",.93);
175 addMaterial(
"ArCO2",
"CO2",.07);
176 storeMaterial(name=
"RPCgas", density=1.977*
mg/1000*
cm3,ncomponents=3);
177 addElement(
"RPCgas",
"C",natoms=2);
178 addElement(
"RPCgas",
"H",natoms=2);
179 addElement(
"RPCgas",
"F",natoms=4);
180 storeMaterial(name=
"RPVC", density=1.4*
g/
cm3,ncomponents=3);
181 addElement(
"RPVC",
"C",natoms=2);
182 addElement(
"RPVC",
"H",natoms=3);
183 addElement(
"RPVC",
"Cl",natoms=1);
184 storeMaterial(name=
"Bakelite", density=1.4*
g/
cm3,ncomponents=3);
185 addElement(
"Bakelite",
"C",natoms=1);
186 addElement(
"Bakelite",
"H",natoms=4);
187 addElement(
"Bakelite",
"O",natoms=2);