*----------------------------------------------- * Benchmark 3D TAKEDA MODEL 4 CR FULLY INSERTED *----------------------------------------------- PARAMETER Geom Macr Trck Syst Flux :: ::: LINKED_LIST Geom Macr Trck Syst Flux ; ; * MODULE GEO: SNT: MAC: ASM: FLU: OUT: GREP: END: ; * SEQ_ASCII OutGeom :: FILE './_GEOM' ; SEQ_ASCII OutMacr :: FILE './_MACR' ; SEQ_ASCII OutTrck :: FILE './_TRCK' ; SEQ_ASCII OutSyst :: FILE './_ASMR' ; SEQ_ASCII OutFlux :: FILE './_FLUX' ; * * * spl = region split * sch = scheme parameter * spa = spatial order * ang = sn order * sca = scattering * * INTEGER spl := 2 ; INTEGER sch := 1 ; INTEGER spa := 0 ; INTEGER ang := 4 ; INTEGER sca := 1 ; * * Geom := GEO: :: HEXZ 169 5 EDIT 0 HBC COMPLETE VOID SIDE 7.50 Z- VOID Z+ VOID MESHZ 0.0 45.0 65.0 125.0 145.0 190.0 SPLITZ 2 1 3 1 2 SPLITL <> MIX (* LAYER 1: STEEL *) 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 7 7 7 7 7 7 7 7 7 7 7 7 7 7 7 7 7 7 7 7 7 7 7 7 8 8 8 8 8 8 8 8 8 8 8 8 8 8 8 8 8 8 8 8 8 8 8 8 8 8 8 8 8 8 9 9 9 9 9 9 9 9 9 9 9 9 9 9 9 9 9 9 9 9 9 9 9 9 9 9 9 9 9 9 9 9 9 9 9 9 10 10 10 10 10 10 10 10 10 10 10 10 10 10 10 10 10 10 10 10 10 10 10 10 10 10 10 10 10 10 10 10 10 10 10 10 10 10 10 10 10 10 (* LAYER 2: AXIAL BLANKET AND REFLECTOR *) 2 2 2 2 2 2 2 3 1 3 1 3 1 3 1 3 1 3 1 3 3 3 3 3 3 3 3 3 3 3 3 3 3 3 3 3 3 7 7 7 7 7 7 7 7 7 7 7 7 7 7 7 7 7 7 7 7 7 7 7 7 8 8 8 8 8 8 8 8 8 8 8 8 8 8 8 8 8 8 8 8 8 8 8 8 8 8 8 8 8 8 9 9 9 9 9 9 9 9 9 9 9 9 9 9 9 9 9 9 9 9 9 9 9 9 9 9 9 9 9 9 9 9 9 9 9 9 10 10 10 10 10 10 10 10 10 10 10 10 10 10 10 10 10 10 10 10 10 10 10 10 10 10 10 10 10 10 10 10 10 10 10 10 10 10 10 10 10 10 (* LAYER 3: TEST ZONE *) 4 4 4 4 4 4 4 5 12 5 12 5 12 5 12 5 12 5 12 6 6 6 6 6 6 6 6 6 6 6 6 6 6 6 6 6 6 7 7 7 7 7 7 7 7 7 7 7 7 7 7 7 7 7 7 7 7 7 7 7 7 8 8 8 8 8 8 8 8 8 8 8 8 8 8 8 8 8 8 8 8 8 8 8 8 8 8 8 8 8 8 9 9 9 9 9 9 9 9 9 9 9 9 9 9 9 9 9 9 9 9 9 9 9 9 9 9 9 9 9 9 9 9 9 9 9 9 10 10 10 10 10 10 10 10 10 10 10 10 10 10 10 10 10 10 10 10 10 10 10 10 10 10 10 10 10 10 10 10 10 10 10 10 10 10 10 10 10 10 (* LAYER 4: AXIAL BLANKET AND REFLECTOR *) 2 2 2 2 2 2 2 3 1 3 1 3 1 3 1 3 1 3 1 3 3 3 3 3 3 3 3 3 3 3 3 3 3 3 3 3 3 7 7 7 7 7 7 7 7 7 7 7 7 7 7 7 7 7 7 7 7 7 7 7 7 8 8 8 8 8 8 8 8 8 8 8 8 8 8 8 8 8 8 8 8 8 8 8 8 8 8 8 8 8 8 9 9 9 9 9 9 9 9 9 9 9 9 9 9 9 9 9 9 9 9 9 9 9 9 9 9 9 9 9 9 9 9 9 9 9 9 10 10 10 10 10 10 10 10 10 10 10 10 10 10 10 10 10 10 10 10 10 10 10 10 10 10 10 10 10 10 10 10 10 10 10 10 10 10 10 10 10 10 (* LAYER 5: STEEL *) 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 7 7 7 7 7 7 7 7 7 7 7 7 7 7 7 7 7 7 7 7 7 7 7 7 8 8 8 8 8 8 8 8 8 8 8 8 8 8 8 8 8 8 8 8 8 8 8 8 8 8 8 8 8 8 9 9 9 9 9 9 9 9 9 9 9 9 9 9 9 9 9 9 9 9 9 9 9 9 9 9 9 9 9 9 9 9 9 9 9 9 10 10 10 10 10 10 10 10 10 10 10 10 10 10 10 10 10 10 10 10 10 10 10 10 10 10 10 10 10 10 10 10 10 10 10 10 10 10 10 10 10 10 ; OutGeom := Geom ; * * Macr := MAC: :: EDIT 0 NGRO 4 NMIX 12 NIFI 1 READ INPUT MIX 1 (* STEEL *) TOTAL 9.83638E-2 1.35140E-1 2.24749E-1 2.83117E-1 SCAT 1 1 9.06050E-2 2 2 1.30581E-1 7.42377E-3 3 3 2.19547E-1 4.35250E-3 1.18163E-4 4 4 2.80707E-1 4.64594E-3 3.41675E-7 8.25890E-7 MIX 2 (* AXIAL BLANKET *) TOTAL 1.40462E-1 2.25534E-1 3.27065E-1 3.41224E-1 NUSIGF 2.96101E-3 6.56171E-5 1.14630E-4 4.93483E-4 CHI 0.908564 0.087307 0.004129 0.0 SCAT 1 1 1.23805E-1 2 2 2.17260E-1 1.45483E-2 3 3 3.17948E-1 6.78885E-3 1.70276E-4 4 4 3.31281E-1 4.38782E-3 6.04793E-6 9.37083E-7 MIX 3 (* AXIAL REFLECTOR *) TOTAL 1.32933E-1 1.78531E-1 2.83151E-1 4.62167E-1 SCAT 1 1 1.22995E-1 2 2 1.73095E-1 9.41231E-3 3 3 2.77194E-1 5.09881E-3 1.93791E-4 4 4 4.58598E-1 5.09601E-3 7.05075E-7 1.39307E-6 MIX 4 (* TEST ZONE *) TOTAL 1.24526E-1 2.01025E-1 2.86599E-1 3.68772E-1 NUSIGF 1.79043E-2 1.59961E-2 2.40856E-2 7.33104E-2 CHI 0.908564 0.087307 0.004129 0.0 SCAT 1 1 1.05964E-1 2 2 1.89370E-1 1.12738E-2 3 3 2.70207E-1 3.64847E-3 1.46192E-4 4 4 3.18960E-1 1.80479E-3 1.06888E-6 9.62178E-7 MIX 5 (* DRIVER WITHOUT MODERATOR *) TOTAL 1.40226E-1 2.28245E-1 3.25806E-1 4.18327E-1 NUSIGF 1.59878E-2 1.64446E-2 2.71451E-2 8.45807E-2 CHI 0.908564 0.087307 0.004129 0.0 SCAT 1 1 1.19887E-1 2 2 2.15213E-1 1.30790E-2 3 3 3.06885E-1 4.00117E-3 1.59938E-4 4 4 3.60906E-1 1.67341E-3 1.82716E-6 1.07166E-6 MIX 6 (* DRIVER WITH MODERATOR *) TOTAL 1.41428E-1 2.45394E-1 3.98255E-1 4.35990E-1 NUSIGF 1.01663E-2 9.46359E-3 1.87325E-2 8.25335E-2 CHI 0.908564 0.087307 0.004129 0.0 SCAT 1 1 1.14337E-1 2 2 2.12006E-1 2.09664E-2 3 3 3.52093E-1 2.67269E-2 1.39132E-3 4 4 3.70872E-1 3.29030E-2 1.08186E-3 6.10281E-5 MIX 7 (* REFLECTOR WITHOUT MODERATOR *) TOTAL 1.59346E-1 2.16355E-1 3.48692E-1 6.24249E-1 SCAT 1 1 1.47969E-1 2 2 2.10410E-1 1.06607E-2 3 3 3.42085E-1 5.46711E-3 2.49956E-4 4 4 6.19306E-1 5.36879E-3 1.00157E-6 1.82565E-6 MIX 8 (* REFLECTOR WITH MODERATOR *) TOTAL 1.39164E-1 2.46993E-1 4.52425E-1 5.36256E-1 SCAT 1 1 1.05911E-1 2 2 1.84820E-1 2.96485E-2 3 3 3.73072E-1 5.91780E-2 3.06502E-3 4 4 5.12103E-1 7.81326E-2 2.69229E-3 1.41697E-4 MIX 9 (* KNK1 REFLECTOR*) TOTAL 1.51644E-1 1.42382E-1 1.65132E-1 8.04845E-1 SCAT 1 1 1.38427E-1 2 2 1.37502E-1 1.23901E-2 3 3 1.60722E-1 4.41927E-3 3.66930E-4 4 4 7.98932E-1 3.33075E-3 1.63280E-6 1.69036E-6 MIX 10 (* SODIUM STEEL ZONE *) TOTAL 9.65097E-2 9.87095E-2 1.34200E-1 4.12670E-1 SCAT 1 1 8.83550E-2 2 2 9.52493E-2 7.73409E-3 3 3 1.30756E-1 3.22568E-3 1.94719E-4 4 4 4.09632E-1 2.90481E-3 7.98494E-7 8.89615E-7 MIX 11 (* SODIUM FILLED CRP *) TOTAL 7.27587E-2 1.00218E-1 1.60703E-1 1.51576E-1 SCAT 1 1 6.63634E-2 2 2 9.61236E-2 6.23393E-3 3 3 1.56016E-1 4.01375E-3 7.02121E-5 4 4 1.50368E-1 4.49111E-3 1.26939E-7 4.16388E-7 MIX 12 (* CONTROL ROD *) TOTAL 1.39085E-1 2.28152E-1 3.18806E-1 6.27366E-1 SCAT 1 1 1.17722E-1 2 2 1.94699E-1 1.26066E-2 3 3 2.44352E-1 4.32219E-3 1.33314E-4 4 4 3.14816E-1 3.68781E-4 1.85491E-7 1.08839E-6 ; OutMacr := Macr ; * * Trck := SNT: Geom :: TITLE '3D TAKEDA MODEL 4 CR FULLY INSERTED' EDIT 0 MAXR 20000000 SCHM <> DIAM <> SN <> SCAT <> NLIVO NDSA ONEG MAXI 25 EPSI 1.0E-5 QUAD 2 (*Level-Symmetric*) ; OutTrck := Trck ; * * Syst := ASM: Macr Trck :: EDIT 0 ARM ; * * Flux := FLU: Macr Trck Syst :: EDIT 1 TYPE K EXTE 100 1.0E-5 ; OutFlux := Flux ; * * END: ;