// In this case, WMAT in output is changed to relative
// weigths.
//
+ printf("Mixture %5d %10s %5d \n", kmat, name, nlmat);
+
Int_t i,j;
if (nlmat < 0) {
nlmat = - nlmat;
delete [] wmatnew;
return;
}
- gGeoManager->Mixture(name, a, z, dens, nlmat, wmat, kmat);
+ printf("Mixture (2) %5d %10s %5d \n", kmat, name, nlmat);
+ gGeoManager->Mixture(name, a, z, dens, nlmat, wmat, kmat);
}
//______________________________________________________________________________
return fMCGeo->VolName(id);
}
+Int_t TFluka::MediumId(const Text_t* mediumName) const
+{
+ //
+ // Return the unique medium id for medium with name mediumName
+ TList *medlist = gGeoManager->GetListOfMedia();
+ TGeoMedium* med = (TGeoMedium*) medlist->FindObject(mediumName);
+ if (med) {
+ return (med->GetId());
+ } else {
+ return (-1);
+ }
+}
+
//______________________________________________________________________________
Int_t TFluka::VolId(const Text_t* volName) const
{
virtual const char* VolName(Int_t id) const;
virtual Int_t NofVolumes() const {return fNVolumes;}
virtual Int_t VolId2Mate(Int_t id) const;
+ // Return the unique numeric identifier for medium name mediumName
+ virtual Int_t MediumId(const Text_t* mediumName) const;
+
//
// Methods for physics management
// ------------------------------------------------