summaryrefslogtreecommitdiff
path: root/Donjon/data/UOX_5x5_TG6_sym8_multiDom_rt2.x2m
diff options
context:
space:
mode:
authorstainer_t <thomas.stainer@oecd-nea.org>2025-09-08 13:48:49 +0200
committerstainer_t <thomas.stainer@oecd-nea.org>2025-09-08 13:48:49 +0200
commit7dfcc480ba1e19bd3232349fc733caef94034292 (patch)
tree03ee104eb8846d5cc1a981d267687a729185d3f3 /Donjon/data/UOX_5x5_TG6_sym8_multiDom_rt2.x2m
Initial commit from Polytechnique Montreal
Diffstat (limited to 'Donjon/data/UOX_5x5_TG6_sym8_multiDom_rt2.x2m')
-rw-r--r--Donjon/data/UOX_5x5_TG6_sym8_multiDom_rt2.x2m42
1 files changed, 42 insertions, 0 deletions
diff --git a/Donjon/data/UOX_5x5_TG6_sym8_multiDom_rt2.x2m b/Donjon/data/UOX_5x5_TG6_sym8_multiDom_rt2.x2m
new file mode 100644
index 0000000..be39578
--- /dev/null
+++ b/Donjon/data/UOX_5x5_TG6_sym8_multiDom_rt2.x2m
@@ -0,0 +1,42 @@
+*----
+* TEST CASE UOX_5x5_TG6_sym8_multiDom_rt2
+* SIMPLE 5 X 5 PWR ASSEMBLY WITH TRIVAC
+* Input cross section data from Apex
+*----
+* Define STRUCTURES and MODULES used
+*----
+LINKED_LIST ASSMB TRACK MACRO SYS FLUX ;
+HDF5_FILE UOX_5x5 :: FILE './UOX_5x5_TG6_sym8_multiDom.h5' ;
+MODULE GEO: HUTL: SPH: TRIVAT: TRIVAA: FLUD: END: ;
+REAL B2 ;
+PROCEDURE assertS ;
+
+REAL side1 := 1.26 ;
+REAL side2 := side1 1.26 + ;
+REAL side3 := side2 1.26 + ;
+ASSMB := GEO: :: CAR2D 3 3 (*ASSEMBLY 5 X 5*)
+ X- DIAG X+ REFL
+ Y- SYME Y+ DIAG
+ MESHX 0.0 <<side1>> <<side2>> <<side3>>
+ MIX 1 2 4
+ 3 5
+ 6
+;
+
+TRACK := TRIVAT: ASSMB ::
+ TITLE 'SIMPLE 5x5 FUEL ASSEMBLY'
+ EDIT 0 MAXR 3000 DUAL 3 1 SPN 5 SCAT 1 ;
+
+HUTL: UOX_5x5 :: DIR
+ GREP '/calc 1/miscellaneous/B2' 1 >>B2<< ;
+ECHO 'buckling B2=' B2 ;
+UOX_5x5 := SPH: UOX_5x5 TRACK :: EDIT 6 STEP AT 1
+ EQUI 'equivalence_SP3_P0c_rt2' ;
+MACRO := SPH: UOX_5x5 :: EDIT 3 STEP AT 1 MACRO SPRD
+ EQUI 'equivalence_SP3_P0c_rt2' LEAK <<B2>> ;
+SYS := TRIVAA: MACRO TRACK ;
+FLUX := FLUD: SYS TRACK :: EDIT 1 ADI 4 ACCE 5 3 ;
+assertS FLUX :: 'K-EFFECTIVE' 1 0.9982139 ;
+
+ECHO "UOX_5x5_TG6_sym8_multiDom_rt2 completed" ;
+END: ;