TITLE

* Set the defaults for precision simulations
DEFAULTS                                                              PRECISIO
* Define the beam characteristics
BEAM             0.0                                                  ISOTOPE
HI-PROPE          9.       18.
* Define the beam position
BEAMPOS          0.0       0.0       0.0
GEOBEGIN                                                              COMBNAME
    0    0          
* Black body
SPH blkbody    0.0 0.0 0.0 100000.0
* Void sphere
SPH void       0.0 0.0 0.0 10000.0
SPH sphExt     0.0 0.0 0.0 19.313207915828
SPH sphInt     0.0 0.0 0.0 10.0
XCC cyl        0.0 0.0 3.0
PLA pla        1.0 0.0 1.0 -6.0 0.0 3.0
YZP pla2       8.
END
* Black hole
BLKBODY      5 +blkbody -void
* Void around
VOID         5 +void -sphExt
               | +sphExt +cyl -pla2
OSHIELD      5 +sphExt -sphInt -(cyl -pla)
ISHIELD      5 +sphInt -(cyl -pla)
WATER        5 +cyl -pla +pla2
END
GEOEND
MATERIAL          5.                2.34                              BORON
MATERIAL         19.               0.862                              POTASSIU
* 169 Glass, BoroSilicate (Pyrex)
*
MATERIAL                            2.23                              Glass
COMPOUND   -0.040061     BORON -0.539564    OXYGEN -0.028191    SODIUMGlass
COMPOUND   -0.011644  ALUMINUM  -0.37722   SILICON -0.003321  POTASSIUGlass
* ..+....1....+....2....+....3....+....4....+....5....+....6....+....7..
ASSIGNMA    BLCKHOLE   BLKBODY
ASSIGNMA      VACUUM      VOID
ASSIGNMA        LEAD   OSHIELD
ASSIGNMA       Glass   ISHIELD
ASSIGNMA       WATER     WATER
* Requests simulation of radioactive decays and sets the corresponding
* biasing and transport conditions
RADDECAY          2.
* Define an irradiation profile for radioactive decay calculations
*IRRPROFI
* Defines decay times for radioactive product scoring
*DCYTIMES
* Associates selected scoring detectors with user-defined decay times
DCYSCORE         -1.                            Ph                    USRBIN
USRBIN           10.    PHOTON      -21.       20.       20.       20.Ph
USRBIN          -20.      -20.      -20.      100.        1.      100. &
* Set the random number seed
RANDOMIZ         1.0
* Set the number of primary histories to be simulated in the run
START           100.
STOP