# macro for rdecay01
#
/control/cout/ignoreThreadsExcept 0
/control/verbose 2
/run/verbose 1
#
# Set a very high time threshold to allow all decays to happen
/process/had/rdm/thresholdForVeryLongDecayTime 1.0e+60 year
#
/gun/particle ion
# This is Pa-234m in the decay chain of U-238
/gun/ion 91 234 0 73.920
#
/rdecay01/fullChain true
/process/had/rdm/nucleusLimits 234 234 91 91
#
/analysis/setFileName run1
#/analysis/h1/set 1  100  0. 2000 keV	#e+ e-
#/analysis/h1/set 2  100  0. 2000 keV	#neutrino
/analysis/h1/set 3  3000  0. 3000 keV	#gamma
#/analysis/h1/set 5  100  0.  200 eV	#recoil ion
#/analysis/h1/set 6  100  1.  2.5 MeV	#EkinTot (Q)
#/analysis/h1/set 7  100  0.    1 eV	#P balance
#/analysis/h1/set 8  100  0.   70 min	#time of life
#
/run/printProgress 10000
/run/beamOn 100000