- gMC->Gstpar(idtmed[1601],"CUTGAM",0.00008) ;
- gMC->Gstpar(idtmed[1601],"CUTELE",0.001) ;
- gMC->Gstpar(idtmed[1601],"BCUTE",0.0001) ;
-
- // the same parameters as for Pb - 10-sep-04
- gMC->Gstpar(idtmed[1603],"CUTGAM",0.00008) ;
- gMC->Gstpar(idtmed[1603],"CUTELE",0.001) ;
- gMC->Gstpar(idtmed[1603],"BCUTE", 0.0001);
- // --- Generate explicitly delta rays in Lead ---
+ gMC->Gstpar(idtmed[1601],"CUTGAM", cutgam) ;
+ gMC->Gstpar(idtmed[1601],"CUTELE", cutele) ;// 1MEV -> 0.1MEV; 15-aug-05
+ gMC->Gstpar(idtmed[1601],"BCUTE", cutgam); // BCUTE and BCUTM start from GUTGUM
+ gMC->Gstpar(idtmed[1601],"BCUTM", cutgam); // BCUTE and BCUTM start from GUTGUM
+ gMC->Gstpar(idtmed[1601], "LOSS",3.) ; // generate delta rays
+ gMC->Gstpar(idtmed[1601], "DRAY",1.) ;
+ gMC->Gstpar(idtmed[1601], "DCUTE", cutele) ;
+ gMC->Gstpar(idtmed[1601], "DCUTM", cutele) ;
+
+ // S steel -
+ gMC->Gstpar(idtmed[1603],"CUTGAM", cutgam);
+ gMC->Gstpar(idtmed[1603],"CUTELE", cutele);
+ gMC->Gstpar(idtmed[1603],"BCUTE", cutgam); // BCUTE and BCUTM start from GUTGUM
+ gMC->Gstpar(idtmed[1603],"BCUTM", cutgam); // BCUTE and BCUTM start from GUTGUM
+ // --- Generate explicitly delta rays