|
Homework
Please write and run a FORTRAN code to:
1. Find the group 12 hydrogen total group and elastic scattering group-to-group
scattering cross sections for scattering from group12 to groups 12-18 of
the 27 group SCALE energy group structure:
gp energy
lethargy weighted
broad gp calc group
boundaries
boundaries velocities
numbers type
band
1 2.00000E+07 -6.93147E-01 4.60581E+09
1 0
1
2 6.43400E+06 4.40989E-01 2.88737E+09
2 0
2
3 3.00000E+06 1.20397E+00 2.12201E+09
3 0
3
4 1.85000E+06 1.68740E+00 1.75673E+09
4 0
4
5 1.40000E+06 1.96611E+00 1.46535E+09
5 0
5
6 9.00000E+05 2.40795E+00 1.06620E+09
6 0
6
7 4.00000E+05 3.21888E+00 6.07557E+08
7 0
7
8 1.00000E+05 4.60517E+00 2.72415E+08
8 0
8
9 1.70000E+04 6.37713E+00 1.13526E+08
9 0
9
10 3.00000E+03 8.11173E+00 4.82126E+07
10 0
10
11 5.50000E+02 9.80818E+00 2.05946E+07
11 0
11
12 1.00000E+02 1.15129E+01 1.01036E+07
12 0
12
13 3.00000E+01 1.27169E+01 5.69595E+06
13 0
13
14 1.00000E+01 1.38155E+01 3.20957E+06
14 0
14
15 3.04999E+00 1.50030E+01 2.10601E+06
15 0
15
16 1.77000E+00 1.55471E+01 1.70522E+06
16 0
15
17 1.29999E+00 1.58557E+01 1.52545E+06
17 0
15
18 1.12999E+00 1.59959E+01 1.42867E+06
18 0
15
19 1.00000E+00 1.61181E+01 1.31002E+06
19 0
15
20 8.00000E-01 1.63412E+01 9.29104E+05
20 0
15
21 4.00000E-01 1.70344E+01 8.15206E+05
21 0
15
22 3.25000E-01 1.72420E+01 6.90059E+05
22 0
15
23 2.25000E-01 1.76098E+01 4.86933E+05
23 0
15
24 9.99998E-02 1.84207E+01 3.57766E+05
24 0
15
25 5.00000E-02 1.91138E+01 2.71895E+05
25 0
15
26 3.00000E-02 1.96247E+01 1.87283E+05
26 0
15
27 1.00000E-02 2.07233E+01 8.88202E+04
27 0
15
28 1.00000E-05 2.76310E+01
[My answers: SigmaT12 = 20.4614, SigmaS12->12=8.566, 12->13=7.926,
12->14=2.754, 12->15=0.5072, 12->16=0.1863, 12->17=0.06737, 12->18=0.05151]
2. Find the group 12 total cross sections for U-235 and U-238 in the
same groups with sigma-0 values of 0, 0.1, 1, 10, 100, 1000, and infinity
[My answers: U235=41.33, 41.37, 41.72, 44.50, 55.35, 68.82, 74.05
U238=10.35, 10.37, 10.57, 11.81, 16.40, 32.75, 116.75]
Use the following data from the class Public Folder:
Continuous cross sections:
U-235: 92235.pxs
U-238: 92238.pxs
H:
1001.pxs
O:
8016.pxs (Not needed for this assignment)
Note that there is a FORTRAN example that explains and reads the data
in the public area under PXS.FOR.
[Hint: You should expect APPROXIMATE agreement with the data used in
the previous assignment]
Please e-mail your results (with your code attached, if possible) to
me:
Subject:
IMCalc#2
|