23 lines
1.1 KiB
OpenEdge ABL
23 lines
1.1 KiB
OpenEdge ABL
c Original definition of source from proton beam
|
|
c cut:n j 0.99e-06
|
|
cut:n j 0
|
|
cut:p 1e+08 1.667
|
|
c weight windows from external file generated by WWG
|
|
c make sure to supply the correct WWINP file
|
|
WWP:n j j 4 j -1 j 1.0 1j 1e20 1j
|
|
c energy splitting for higher neutron energies and roulette below 1keV
|
|
c esplt:n 0.05 1e-6 0.2 1e-3 1 10 3 100 10 3000
|
|
c energy splitting for higher neutron energies no roulette
|
|
c esplt:n 1 10 3 100 10 3000
|
|
c the source definition with protons/s
|
|
sdef dir=1 erg=2000 par=9 vec=0.0 1 0.0 x=d1 y=-30 z=d2 wgt=1.560377E16
|
|
si1 A -8 -7.5 -7 -6.5 -6 -5.5 -5 -4.5 -4 -3.5 -3 -2.5 -2 -1.5 -1 -0.5 0
|
|
0.5 1 1.5 2 2.5 3 3.5 4 4.5 5 5.5 6 6.5 7 7.5 8
|
|
sp1 D 0 0.12109 0.23438 0.33984 0.4375 0.52734 0.60938 0.68359 0.75
|
|
0.80859 0.85938 0.90234 0.9375 0.96484 0.98438 0.99609 1
|
|
0.99609 0.98438 0.96484 0.9375 0.90234 0.85938 0.80859 0.75
|
|
0.68359 0.60938 0.52734 0.4375 0.33984 0.23438 0.12109 0
|
|
si2 A -3 -2.5 -2 -1.5 -1 -0.5 0 0.5 1 1.5 2 2.5 3
|
|
sp2 D 0 0.30556 0.55556 0.75 0.88889 0.97222 1 0.97222 0.88889 0.75
|
|
0.55556 0.30556 0
|