summaryrefslogtreecommitdiff
path: root/Dragon/data/g2s_prestation_proc/tst2019_3.c2m
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 /Dragon/data/g2s_prestation_proc/tst2019_3.c2m
Initial commit from Polytechnique Montreal
Diffstat (limited to 'Dragon/data/g2s_prestation_proc/tst2019_3.c2m')
-rw-r--r--Dragon/data/g2s_prestation_proc/tst2019_3.c2m59
1 files changed, 59 insertions, 0 deletions
diff --git a/Dragon/data/g2s_prestation_proc/tst2019_3.c2m b/Dragon/data/g2s_prestation_proc/tst2019_3.c2m
new file mode 100644
index 0000000..69ff586
--- /dev/null
+++ b/Dragon/data/g2s_prestation_proc/tst2019_3.c2m
@@ -0,0 +1,59 @@
+*----
+* Define STRUCTURES and MODULES used
+*----
+LINKED_LIST TRACKM GEOM ;
+SEQ_BINARY TRKFILM ;
+MODULE GEO: G2S: SALT: TLM: END: ;
+SEQ_ASCII Fil_SAL_fl :: FILE './Fil_ssym_fl.ps' ;
+SEQ_ASCII Fil_SAL.tdt :: FILE './Fil_ssym.tdt' ;
+SEQ_ASCII Lines.m :: FILE './Lines_ssym.m' ;
+
+REAL side rfuel rclad := 1.63600 0.51500 0.60300 ;
+REAL densur := 10.0 ;
+INTEGER an2d := 6 ;
+
+GEOM := GEO: :: CAR2D 9 5
+ EDIT 0
+ X- VOID X+ VOID
+ Y- SSYM Y+ VOID
+ CELL
+ C1 C1 C1 C2 C2 C2 C1 C1 C1
+ C0 C1 C1 C2 C2 C2 C1 C1 C0
+ C0 C0 C1 C1 C1 C1 C1 C0 C0
+ C0 C0 C1 C1 C1 C1 C1 C0 C0
+ C0 C0 C0 C1 C1 C1 C0 C0 C0
+ ::: C2 := GEO: CARCEL 2 1 1
+ MESHX 0.0 <<side>>
+ MESHY 0.0 <<side>>
+ RADIUS 0.0 <<rfuel>> <<rclad>>
+ MIX 1 2 3
+ ;
+ ::: C1 := GEO: CAR2D 1 1
+ MESHX 0.0 <<side>>
+ MESHY 0.0 <<side>>
+ MIX 4
+ ;
+ ::: C0 := GEO: CAR2D 1 1
+ MESHX 0.0 <<side>>
+ MESHY 0.0 <<side>>
+ MIX 0
+ ;
+ ;
+
+Fil_SAL.tdt Fil_SAL_fl := G2S: GEOM
+ ;
+
+TRACKM TRKFILM := SALT: Fil_SAL.tdt ::
+ EDIT 2
+ TISO <<an2d>> <<densur>> REND LONG
+ TITLE 'TRACKING FOR TISO'
+ ;
+
+Lines.m := TLM: TRACKM TRKFILM ::
+ EDIT 1
+ MIXTURE
+ NTPO 1
+ DIRECTIONS NoPause DIR 0
+ ;
+ECHO "test tst2019_3 completed" ;
+END: ;