9 lines
309 B
OpenEdge ABL
9 lines
309 B
OpenEdge ABL
c source definition based on surface source generated from 2m source term
|
|
cut:n j 0
|
|
c cut all photons that can't produce neutrons
|
|
cut:p 1e+08 1.667
|
|
c but adapted to model geometry and actual size of Estia beam extraction
|
|
c make sure to supply the correct WWINP file
|
|
WWP:n j j 4 j -1 j 1.0 1j 2.0E+13 1j
|
|
ssr
|