From 7dfcc480ba1e19bd3232349fc733caef94034292 Mon Sep 17 00:00:00 2001 From: stainer_t Date: Mon, 8 Sep 2025 13:48:49 +0200 Subject: Initial commit from Polytechnique Montreal --- Dragon/data/trowland_proc/uo2_6c_case1.c2m | 182 +++++++++++++++++++++++++++++ 1 file changed, 182 insertions(+) create mode 100644 Dragon/data/trowland_proc/uo2_6c_case1.c2m (limited to 'Dragon/data/trowland_proc/uo2_6c_case1.c2m') diff --git a/Dragon/data/trowland_proc/uo2_6c_case1.c2m b/Dragon/data/trowland_proc/uo2_6c_case1.c2m new file mode 100644 index 0000000..b6829e3 --- /dev/null +++ b/Dragon/data/trowland_proc/uo2_6c_case1.c2m @@ -0,0 +1,182 @@ +*---- +* +* TEST CASE uo2_6c_case1 +* FIRST UO2 ROWLAND'S BENCHMARK +* DISTRIBUTED SELF-SHIELDING +* 172-GROUP JEF2.2 DRAGLIB +* +* Author: A. Hebert +* +*---- +* Define STRUCTURES and MODULES used +*---- +LINKED_LIST GEOM TRACK LIBRARY LIBRARY2 CP FLUX ; +MODULE LIB: GEO: SYBILT: SHI: USS: ASM: FLU: DELETE: END: ; +INTEGER COMB0101 COMB0102 COMB0103 COMB0104 COMB0105 COMB0106 GAIN1 + MODE1 MODE2 := + 1 2 3 4 5 6 7 8 9 ; (* DISTRIBUTED SELF-SHIELDING *) +REAL RCOMB1 RCOMB2 RCOMB3 RCOMB4 RCOMB5 RCOMB6 ; +PROCEDURE assertS ; +* +EVALUATE RCOMB1 RCOMB2 RCOMB3 RCOMB4 RCOMB5 RCOMB6 := 0.2529822 +0.334664 0.3577709 0.3794733 0.3898718 0.40 ; +GEOM := GEO: :: TUBE 9 + R+ REFL + RADIUS 0.0 <> <> <> <> + <> <> 0.45 0.5748331 0.6770275 + MIX <> <> <> <> + <> <> <> <> <> + ; +* +TRACK := SYBILT: GEOM :: + TITLE 'FIRST UO2 ROWLAND S BENCHMARK' + MAXR 20 QUA1 5 ; +*---- +* SHI LEVEL 1 +*---- +LIBRARY := LIB: :: + EDIT 1 + NMIX 9 (*MAXIMUM OF MATERIAL MIXTURES*) + CTRA APOL (*APOLLO TYPE TRANSPORT CORRECTION*) + ANIS 2 + ADED 4 NELAS N4N N2N N3N +* + MIXS LIB: DRAGON FIL: DLIB_J2 + MIX <> 293.0 (*COMB0101*) + O16 = O16 4.6624E-2 + U235 = U235 7.0803E-4 1 IRSET 0.0 81 + U238 = U238 2.2604E-2 1 IRSET 0.0 81 + MIX <> COMB <> 1.0 (*COMB0102*) + MIX <> COMB <> 1.0 (*COMB0103*) + MIX <> COMB <> 1.0 (*COMB0104*) + MIX <> COMB <> 1.0 (*COMB0105*) + MIX <> COMB <> 1.0 (*COMB0106*) + MIX <> 293.0 (*GAIN1*) + Zr0 = Zr0 4.3241E-2 2 IRSET 0.0 81 + MIX <> 293.0 (*MODE1*) + H1 = H1_H2O 6.6988E-2 + O16 = O16 3.3494E-2 + MIX <> 293.0 (*MODE2*) + H1 = H1_H2O 6.6988E-2 + O16 = O16 3.3494E-2 +; +LIBRARY2 := SHI: LIBRARY TRACK :: EDIT 1 LJ GRMIN 45 LEVEL 1 MXIT 3 ; +CP := ASM: LIBRARY2 TRACK :: PIJ ; +FLUX := FLU: CP LIBRARY2 TRACK :: TYPE K ; +assertS FLUX :: K-EFFECTIVE 1 1.386497 ; +LIBRARY2 CP FLUX := DELETE: LIBRARY2 CP FLUX ; +*---- +* SHI LEVEL 2 +*---- +LIBRARY2 := SHI: LIBRARY TRACK :: EDIT 1 LJ GRMIN 45 LEVEL 2 MXIT 3 ; +CP := ASM: LIBRARY2 TRACK :: PIJ ; +FLUX := FLU: CP LIBRARY2 TRACK :: TYPE K ; +assertS FLUX :: K-EFFECTIVE 1 1.389577 ; +LIBRARY LIBRARY2 CP FLUX := DELETE: LIBRARY LIBRARY2 CP FLUX ; +*---- +* USS +*---- +LIBRARY := LIB: :: + EDIT 1 + NMIX 9 (*MAXIMUM OF MATERIAL MIXTURES*) + CTRA APOL (*APOLLO TYPE TRANSPORT CORRECTION*) + ANIS 2 + ADED 4 NELAS N4N N2N N3N + SUBG (*HELIOS TYPE PROBABILITY TABLES*) +* + MIXS LIB: DRAGON FIL: DLIB_J2 + MIX <> 293.0 (*COMB0101*) + O16 = O16 4.6624E-2 + U235 = U235 7.0803E-4 1 IRSET 0.0 81 + U238 = U238 2.2604E-2 1 IRSET 0.0 81 + MIX <> COMB <> 1.0 (*COMB0102*) + MIX <> COMB <> 1.0 (*COMB0103*) + MIX <> COMB <> 1.0 (*COMB0104*) + MIX <> COMB <> 1.0 (*COMB0105*) + MIX <> COMB <> 1.0 (*COMB0106*) + MIX <> 293.0 (*GAIN1*) + Zr0 = Zr0 4.3241E-2 2 IRSET 0.0 81 + MIX <> 293.0 (*MODE1*) + H1 = H1_H2O 6.6988E-2 + O16 = O16 3.3494E-2 + MIX <> 293.0 (*MODE2*) + H1 = H1_H2O 6.6988E-2 + O16 = O16 3.3494E-2 + ; +LIBRARY2 := USS: LIBRARY TRACK :: EDIT 1 TRAN PASS 2 GRMIN 45 ; +CP := ASM: LIBRARY2 TRACK :: PIJ ; +FLUX := FLU: CP LIBRARY2 TRACK :: TYPE K ; +assertS FLUX :: K-EFFECTIVE 1 1.387408 ; +LIBRARY LIBRARY2 CP FLUX := DELETE: LIBRARY LIBRARY2 CP FLUX ; +*---- +* Ribon extended +*---- +LIBRARY := LIB: :: + EDIT 1 + NMIX 9 (*MAXIMUM OF MATERIAL MIXTURES*) + CTRA APOL (*APOLLO TYPE TRANSPORT CORRECTION*) + ANIS 2 + ADED 4 NELAS N4N N2N N3N + PTSL (*CALENDF TYPE PROBABILITY TABLES*) +* + MIXS LIB: DRAGON FIL: DLIB_J2 + MIX <> 293.0 (*COMB0101*) + O16 = O16 4.6624E-2 + U235 = U235 7.0803E-4 1 IRSET PTSL 1 + U238 = U238 2.2604E-2 1 IRSET PTSL 1 + MIX <> COMB <> 1.0 (*COMB0102*) + MIX <> COMB <> 1.0 (*COMB0103*) + MIX <> COMB <> 1.0 (*COMB0104*) + MIX <> COMB <> 1.0 (*COMB0105*) + MIX <> COMB <> 1.0 (*COMB0106*) + MIX <> 293.0 (*GAIN1*) + Zr0 = Zr0 4.3241E-2 2 IRSET PTSL 1 + MIX <> 293.0 (*MODE1*) + H1 = H1_H2O 6.6988E-2 + O16 = O16 3.3494E-2 + MIX <> 293.0 (*MODE2*) + H1 = H1_H2O 6.6988E-2 + O16 = O16 3.3494E-2 + ; +LIBRARY2 := USS: LIBRARY TRACK :: EDIT 1 TRAN PASS 2 GRMIN 45 ; +CP := ASM: LIBRARY2 TRACK :: PIJ ; +FLUX := FLU: CP LIBRARY2 TRACK :: TYPE K ; +assertS FLUX :: K-EFFECTIVE 1 1.387702 ; +LIBRARY LIBRARY2 CP FLUX := DELETE: LIBRARY LIBRARY2 CP FLUX ; +*---- +* Ribon extended with correlation +*---- +LIBRARY := LIB: :: + EDIT 1 + NMIX 9 (*MAXIMUM OF MATERIAL MIXTURES*) + CTRA APOL (*APOLLO TYPE TRANSPORT CORRECTION*) + ANIS 2 + ADED 4 NELAS N4N N2N N3N + PTSL (*CALENDF TYPE PROBABILITY TABLES*) +* + MIXS LIB: DRAGON FIL: DLIB_J2 + MIX <> 293.0 (*COMB0101*) + O16 = O16 4.6624E-2 + U235 = U235 7.0803E-4 CORR 1 IRSET PTSL 1 + U238 = U238 2.2604E-2 CORR 1 IRSET PTSL 1 + MIX <> COMB <> 1.0 (*COMB0102*) + MIX <> COMB <> 1.0 (*COMB0103*) + MIX <> COMB <> 1.0 (*COMB0104*) + MIX <> COMB <> 1.0 (*COMB0105*) + MIX <> COMB <> 1.0 (*COMB0106*) + MIX <> 293.0 (*GAIN1*) + Zr0 = Zr0 4.3241E-2 2 IRSET PTSL 1 + MIX <> 293.0 (*MODE1*) + H1 = H1_H2O 6.6988E-2 + O16 = O16 3.3494E-2 + MIX <> 293.0 (*MODE2*) + H1 = H1_H2O 6.6988E-2 + O16 = O16 3.3494E-2 + ; +LIBRARY2 := USS: LIBRARY TRACK :: EDIT 1 TRAN PASS 4 GRMIN 45 ; +CP := ASM: LIBRARY2 TRACK :: PIJ ; +FLUX := FLU: CP LIBRARY2 TRACK :: TYPE K ; +assertS FLUX :: K-EFFECTIVE 1 1.387639 ; +LIBRARY LIBRARY2 CP FLUX := DELETE: LIBRARY LIBRARY2 CP FLUX ; +ECHO "test uo2_6c_case1 completed" ; +END: ; -- cgit v1.2.3