nureg/cr-6700 - Oak Ridge National Laboratory
nureg/cr-6700 - Oak Ridge National Laboratory
nureg/cr-6700 - Oak Ridge National Laboratory
You also want an ePaper? Increase the reach of your titles
YUMPU automatically turns print PDFs into web optimized ePapers that Google loves.
Computer Code Input and Output Listings<br />
Appendix A<br />
5 114.0 4 0<br />
end zone<br />
ndetec=1<br />
read xsdose<br />
' 2 det. @ 1" ans 2' from surface(114.0)<br />
365.76 116.54 182.88<br />
end<br />
last<br />
tn24p with 24 unconsolided fuel assemblies<br />
cylinder<br />
' source position 5/6/8/12 =(3/5/20/100 years)<br />
1 72.25 60 +1 0 0.0 71 12 5.998+6 11.04<br />
2 72.75 2 0<br />
3 99.75 40 0<br />
4 113.0 25 0<br />
5 114.0 4 0<br />
end zone<br />
ndetec=1<br />
read xsdose<br />
' 2 det. @ 1" ans 2' from surface(114.0)<br />
365.76 116.54 182.88<br />
end<br />
72