summaryrefslogtreecommitdiff
path: root/Donjon/data/NCRtest_proc
diff options
context:
space:
mode:
Diffstat (limited to 'Donjon/data/NCRtest_proc')
-rwxr-xr-xDonjon/data/NCRtest_proc/Pburntest.c2m135
-rwxr-xr-xDonjon/data/NCRtest_proc/Pdevtest.c2m748
-rwxr-xr-xDonjon/data/NCRtest_proc/Pfluxtest.c2m167
-rwxr-xr-xDonjon/data/NCRtest_proc/Pfmaptest.c2m127
-rwxr-xr-xDonjon/data/NCRtest_proc/Pgeotest.c2m120
5 files changed, 1297 insertions, 0 deletions
diff --git a/Donjon/data/NCRtest_proc/Pburntest.c2m b/Donjon/data/NCRtest_proc/Pburntest.c2m
new file mode 100755
index 0000000..21a7047
--- /dev/null
+++ b/Donjon/data/NCRtest_proc/Pburntest.c2m
@@ -0,0 +1,135 @@
+****************************************************************
+* *
+* Procedure : Pburntest.c2m *
+* Purpose : Average exit burnups for ACR-1000 core *
+* Author : R. Chambon (2008/03) *
+* based on : D. Sekki (2007/06) *
+* *
+* CALL : FMAP := Pburntest FMAP :: <<Btyp>> ; *
+* *
+****************************************************************
+
+PARAMETER FMAP :: ::: LINKED_LIST FMAP ; ;
+MODULE END: RESINI: ;
+STRING Btyp ;
+
+ :: >>Btyp<< ;
+
+FMAP := RESINI: FMAP ::
+ EDIT 1
+ BTYPE <<Btyp>> ! NCOMB ALL
+ REF-SHIFT 8
+ ADD-PARAM PNAME D-COOL PARKEY X-COOL LOCAL
+SET-PARAM D-COOL SAME 0.9
+! SET-PARAM D-COOL SAME 1.0
+ ADD-PARAM PNAME T-COOL PARKEY T-COOL LOCAL
+ SET-PARAM T-COOL SAME 5.831600E+02
+! SET-PARAM T-COOL SAME 5.731600E+02
+ ADD-PARAM PNAME T-FUEL PARKEY T-FUEL LOCAL
+ SET-PARAM T-FUEL SAME 9.851600E+02
+! SET-PARAM T-FUEL SAME 9.601600E+02
+ TIMAV-BVAL
+* A
+ 4900. 4900. 4400. 4400. 4900. 4900.
+* B
+ 6200. 5900. 5800. 5800. 6100. 8000. 8000. 6100.
+ 5800. 5800. 5900. 6200.
+* C
+ 6700. 7200. 8200. 8600. 9500. 10800. 12200. 12200.
+ 10800. 9500. 8600. 8200. 7200. 6700.
+* D
+ 7800. 7800. 8600. 9500. 10700. 11200. 12100. 13300.
+ 13300. 12100. 11200. 10700. 9500. 8600. 7800. 7800.
+* E
+ 8200. 8100. 10500. 9700. 10000. 11200. 12000. 11800.
+ 12300. 13300. 13300. 12300. 11800. 12000. 11200. 10000.
+ 9700. 10500. 8100. 8200.
+* F
+ 9200. 10900. 11600. 11200. 11300. 12200. 12500. 11900.
+ 12100. 13400. 13400. 12100. 11900. 12500. 12200. 11300.
+ 11200. 11600. 10900. 9200.
+* G
+ 9600. 10500. 12100. 12600. 11900. 11800. 12600. 12600.
+ 11800. 12400. 13400. 13400. 12400. 11800. 12600. 12600.
+ 11800. 11900. 12600. 12100. 10500. 9600.
+* H
+ 6200. 9800. 12100. 13300. 13400. 12400. 12000. 12400.
+ 12500. 12300. 12600. 13700. 13700. 12600. 12300. 12500.
+ 12400. 12000. 12400. 13400. 13300. 12100. 9800. 6200.
+* J
+ 8000. 10400. 12600. 13600. 13900. 13000. 12600. 12400.
+ 12500. 12800. 13200. 13800. 13800. 13200. 12800. 12500.
+ 12400. 12600. 13000. 13900. 13600. 12600. 10400. 8000.
+* K
+ 8300. 11900. 12800. 13900. 13900. 13100. 12700. 12400.
+ 12400. 12900. 13200. 13900. 13900. 13200. 12900. 12400.
+ 12400. 12700. 13100. 13900. 13900. 12800. 11900. 8300.
+* L
+ 8000. 8700. 12500. 13800. 13600. 13600. 13000. 12600.
+ 12300. 12300. 12900. 13200. 13800. 13800. 13200. 12900.
+ 12300. 12300. 12600. 13000. 13600. 13600. 13800. 12500.
+ 8700. 8000.
+* M
+ 8600. 8900. 12800. 13900. 13700. 13800. 13000. 12600.
+ 12000. 12000. 12700. 13000. 13600. 13600. 13000. 12700.
+ 12000. 12000. 12600. 13000. 13800. 13700. 13900. 12800.
+ 8900. 8600.
+* N
+ 8900. 9600. 13000. 13900. 13800. 13800. 13100. 12600.
+ 11900. 11900. 12500. 13000. 13500. 13500. 13000. 12500.
+ 11900. 11900. 12600. 13100. 13800. 13800. 13900. 13000.
+ 9600. 8900.
+* O
+ 8900. 9600. 13000. 13900. 13800. 13800. 13100. 12600.
+ 11900. 11900. 12500. 13000. 13500. 13500. 13000. 12500.
+ 11900. 11900. 12600. 13100. 13800. 13800. 13900. 13000.
+ 9600. 8900.
+* P
+ 8600. 8900. 12800. 13900. 13700. 13800. 13000. 12600.
+ 12000. 12000. 12700. 13000. 13600. 13600. 13000. 12700.
+ 12000. 12000. 12600. 13000. 13800. 13700. 13900. 12800.
+ 8900. 8600.
+* Q
+ 8000. 8700. 12500. 13800. 13600. 13600. 13000. 12600.
+ 12300. 12300. 12900. 13200. 13800. 13800. 13200. 12900.
+ 12300. 12300. 12600. 13000. 13600. 13600. 13800. 12500.
+ 8700. 8000.
+* R
+ 8300. 11900. 12800. 13900. 13900. 13100. 12700. 12400.
+ 12400. 12900. 13200. 13900. 13900. 13200. 12900. 12400.
+ 12400. 12700. 13100. 13900. 13900. 12800. 11900. 8300.
+* S
+ 8000. 10400. 12600. 13600. 13900. 13000. 12600. 12400.
+ 12500. 12800. 13200. 13800. 13800. 13200. 12800. 12500.
+ 12400. 12600. 13000. 13900. 13600. 12600. 10400. 8000.
+* T
+ 6200. 9800. 12100. 13300. 13400. 12400. 12000. 12400.
+ 12500. 12300. 12600. 13700. 13700. 12600. 12300. 12500.
+ 12400. 12000. 12400. 13400. 13300. 12100. 9800. 6200.
+* U
+ 9600. 10500. 12100. 12600. 11900. 11800. 12600. 12600.
+ 11800. 12400. 13400. 13400. 12400. 11800. 12600. 12600.
+ 11800. 11900. 12600. 12100. 10500. 9600.
+* V
+ 9200. 10900. 11600. 11200. 11300. 12200. 12500. 11900.
+ 12100. 13400. 13400. 12100. 11900. 12500. 12200. 11300.
+ 11200. 11600. 10900. 9200.
+* W
+ 8200. 8100. 10500. 9700. 10000. 11200. 12000. 11800.
+ 12300. 13300. 13300. 12300. 11800. 12000. 11200. 10000.
+ 9700. 10500. 8100. 8200.
+* X
+ 7800. 7800. 8600. 9500. 10700. 11200. 12100. 13300.
+ 13300. 12100. 11200. 10700. 9500. 8600. 7800. 7800.
+* Y
+ 6700. 7200. 8200. 8600. 9500. 10800. 12200. 12200.
+ 10800. 9500. 8600. 8200. 7200. 6700.
+* Z
+ 6200. 5900. 5800. 5800. 6100. 8000. 8000. 6100.
+ 5800. 5800. 5900. 6200.
+* ZZ
+ 4900. 4900. 4400. 4400. 4900. 4900.
+ ;
+
+END: ;
+QUIT .
diff --git a/Donjon/data/NCRtest_proc/Pdevtest.c2m b/Donjon/data/NCRtest_proc/Pdevtest.c2m
new file mode 100755
index 0000000..e1f936a
--- /dev/null
+++ b/Donjon/data/NCRtest_proc/Pdevtest.c2m
@@ -0,0 +1,748 @@
+*********************************************************************
+* *
+* Procedure : Pdevtest.c2m *
+* Purpose : Devices specification for ACR-1000 core *
+* Author : R. Chambon (2008/03) *
+* based on : D. Sekki (2007/06) *
+* *
+* CALL : DEVICE MATEX := Pdevtest MATEX :: *
+* <<mZCRin>> <<mZCRout>> <<mSORin>> <<mSORout>> ; *
+* *
+*********************************************************************
+PARAMETER DEVICE MATEX ::
+ ::: LINKED_LIST DEVICE MATEX ; ;
+MODULE END: DEVINI: ;
+INTEGER mZCRin mZCRout mSORin mSORout ;
+
+ :: >>mZCRin<< >>mZCRout<< >>mSORin<< >>mSORout<< ;
+
+ DEVICE MATEX := DEVINI: MATEX :: EDIT 1 NUM-ROD 100 FADE
+*--
+* ZCU:
+*--
+ ROD 1
+ ROD-NAME ZCR01A ! * ZCU01 => LOWER ROD *
+ LEVEL 0.0 AXIS Y FROM H-
+ MAXPOS 168.0 192.0 132.0 420.0 123.825 173.355
+ DMIX <<mZCRin>> <<mZCRout>>
+ ENDROD
+*
+ ROD 2
+ ROD-NAME ZCR01B ! * ZCU01 => UPPER ROD *
+ LEVEL 0.0 AXIS Y FROM H+
+ MAXPOS 168.0 192.0 324.0 612.0 123.825 173.355
+ DMIX <<mZCRin>> <<mZCRout>>
+ ENDROD
+*
+ ROD 3
+ ROD-NAME ZCR02A ! * ZCU02 => LOWER ROD *
+ LEVEL 0.0 AXIS Y FROM H-
+ MAXPOS 216.0 240.0 84.0 420.0 123.825 173.355
+ DMIX <<mZCRin>> <<mZCRout>>
+ ENDROD
+*
+ ROD 4
+ ROD-NAME ZCR02B ! * ZCU02 => UPPER ROD *
+ LEVEL 0.0 AXIS Y FROM H+
+ MAXPOS 216.0 240.0 324.0 660.0 123.825 173.355
+ DMIX <<mZCRin>> <<mZCRout>>
+ ENDROD
+*
+ ROD 5
+ ROD-NAME ZCR03A ! * ZCU03 => LOWER ROD *
+ LEVEL 0.0 AXIS Y FROM H-
+ MAXPOS 264.0 288.0 60.0 420.0 123.825 173.355
+ DMIX <<mZCRin>> <<mZCRout>>
+ ENDROD
+*
+ ROD 6
+ ROD-NAME ZCR03B ! * ZCU03 => UPPER ROD *
+ LEVEL 0.0 AXIS Y FROM H+
+ MAXPOS 264.0 288.0 324.0 684.0 123.825 173.355
+ DMIX <<mZCRin>> <<mZCRout>>
+ ENDROD
+*
+ ROD 7
+ ROD-NAME ZCR04A ! * ZCU04 => LOWER ROD *
+ LEVEL 0.0 AXIS Y FROM H-
+ MAXPOS 312.0 336.0 60.0 420.0 123.825 173.355
+ DMIX <<mZCRin>> <<mZCRout>>
+ ENDROD
+*
+ ROD 8
+ ROD-NAME ZCR04B ! * ZCU04 => UPPER ROD *
+ LEVEL 0.0 AXIS Y FROM H+
+ MAXPOS 312.0 336.0 324.0 684.0 123.825 173.355
+ DMIX <<mZCRin>> <<mZCRout>>
+ ENDROD
+*
+ ROD 9
+ ROD-NAME ZCR05A ! * ZCU05 => LOWER ROD *
+ LEVEL 0.0 AXIS Y FROM H-
+ MAXPOS 408.0 432.0 60.0 420.0 123.825 173.355
+ DMIX <<mZCRin>> <<mZCRout>>
+ ENDROD
+*
+ ROD 10
+ ROD-NAME ZCR05B ! * ZCU05 => UPPER ROD *
+ LEVEL 0.0 AXIS Y FROM H+
+ MAXPOS 408.0 432.0 324.0 684.0 123.825 173.355
+ DMIX <<mZCRin>> <<mZCRout>>
+ ENDROD
+*
+ ROD 11
+ ROD-NAME ZCR06A ! * ZCU06 => LOWER ROD *
+ LEVEL 0.0 AXIS Y FROM H-
+ MAXPOS 456.0 480.0 60.0 420.0 123.825 173.355
+ DMIX <<mZCRin>> <<mZCRout>>
+ ENDROD
+*
+ ROD 12
+ ROD-NAME ZCR06B ! * ZCU06 => UPPER ROD *
+ LEVEL 0.0 AXIS Y FROM H+
+ MAXPOS 456.0 480.0 324.0 684.0 123.825 173.355
+ DMIX <<mZCRin>> <<mZCRout>>
+ ENDROD
+*
+ ROD 13
+ ROD-NAME ZCR07A ! * ZCU07 => LOWER ROD *
+ LEVEL 0.0 AXIS Y FROM H-
+ MAXPOS 504.0 528.0 84.0 420.0 123.825 173.355
+ DMIX <<mZCRin>> <<mZCRout>>
+ ENDROD
+*
+ ROD 14
+ ROD-NAME ZCR07B ! * ZCU07 => UPPER ROD *
+ LEVEL 0.0 AXIS Y FROM H+
+ MAXPOS 504.0 528.0 324.0 660.0 123.825 173.355
+ DMIX <<mZCRin>> <<mZCRout>>
+ ENDROD
+*
+ ROD 15
+ ROD-NAME ZCR08A ! * ZCU08 => LOWER ROD *
+ LEVEL 0.0 AXIS Y FROM H-
+ MAXPOS 552.0 576.0 132.0 420.0 123.825 173.355
+ DMIX <<mZCRin>> <<mZCRout>>
+ ENDROD
+*
+ ROD 16
+ ROD-NAME ZCR08B ! * ZCU08 => UPPER ROD *
+ LEVEL 0.0 AXIS Y FROM H+
+ MAXPOS 552.0 576.0 324.0 612.0 123.825 173.355
+ DMIX <<mZCRin>> <<mZCRout>>
+ ENDROD
+*
+ ROD 17
+ ROD-NAME ZCR09A ! * ZCU09 => LOWER ROD *
+ LEVEL 0.0 AXIS Y FROM H-
+ MAXPOS 216.0 240.0 84.0 420.0 272.415 321.945
+ DMIX <<mZCRin>> <<mZCRout>>
+ ENDROD
+*
+ ROD 18
+ ROD-NAME ZCR09B ! * ZCU09 => UPPER ROD *
+ LEVEL 0.0 AXIS Y FROM H+
+ MAXPOS 216.0 240.0 324.0 660.0 272.415 321.945
+ DMIX <<mZCRin>> <<mZCRout>>
+ ENDROD
+*
+ ROD 19
+ ROD-NAME ZCR10A ! * ZCU10 => LOWER ROD *
+ LEVEL 0.0 AXIS Y FROM H-
+ MAXPOS 264.0 288.0 60.0 420.0 272.415 321.945
+ DMIX <<mZCRin>> <<mZCRout>>
+ ENDROD
+*
+ ROD 20
+ ROD-NAME ZCR10B ! * ZCU10 => UPPER ROD *
+ LEVEL 0.0 AXIS Y FROM H+
+ MAXPOS 264.0 288.0 324.0 684.0 272.415 321.945
+ DMIX <<mZCRin>> <<mZCRout>>
+ ENDROD
+*
+ ROD 21
+ ROD-NAME ZCR11A ! * ZCU11 => LOWER ROD *
+ LEVEL 0.0 AXIS Y FROM H-
+ MAXPOS 312.0 336.0 60.0 420.0 272.415 321.945
+ DMIX <<mZCRin>> <<mZCRout>>
+ ENDROD
+*
+ ROD 22
+ ROD-NAME ZCR11B ! * ZCU11 => UPPER ROD *
+ LEVEL 0.0 AXIS Y FROM H+
+ MAXPOS 312.0 336.0 324.0 684.0 272.415 321.945
+ DMIX <<mZCRin>> <<mZCRout>>
+ ENDROD
+*
+ ROD 23
+ ROD-NAME ZCR12A ! * ZCU12 => LOWER ROD *
+ LEVEL 0.0 AXIS Y FROM H-
+ MAXPOS 360.0 384.0 48.0 420.0 272.415 321.945
+ DMIX <<mZCRin>> <<mZCRout>>
+ ENDROD
+*
+ ROD 24
+ ROD-NAME ZCR12B ! * ZCU12 => UPPER ROD *
+ LEVEL 0.0 AXIS Y FROM H+
+ MAXPOS 360.0 384.0 324.0 696.0 272.415 321.945
+ DMIX <<mZCRin>> <<mZCRout>>
+ ENDROD
+*
+ ROD 25
+ ROD-NAME ZCR13A ! * ZCU13 => LOWER ROD *
+ LEVEL 0.0 AXIS Y FROM H-
+ MAXPOS 408.0 432.0 60.0 420.0 272.415 321.945
+ DMIX <<mZCRin>> <<mZCRout>>
+ ENDROD
+*
+ ROD 26
+ ROD-NAME ZCR13B ! * ZCU13 => UPPER ROD *
+ LEVEL 0.0 AXIS Y FROM H+
+ MAXPOS 408.0 432.0 324.0 684.0 272.415 321.945
+ DMIX <<mZCRin>> <<mZCRout>>
+ ENDROD
+*
+ ROD 27
+ ROD-NAME ZCR14A ! * ZCU14 => LOWER ROD *
+ LEVEL 0.0 AXIS Y FROM H-
+ MAXPOS 456.0 480.0 60.0 420.0 272.415 321.945
+ DMIX <<mZCRin>> <<mZCRout>>
+ ENDROD
+*
+ ROD 28
+ ROD-NAME ZCR14B ! * ZCU14 => UPPER ROD *
+ LEVEL 0.0 AXIS Y FROM H+
+ MAXPOS 456.0 480.0 324.0 684.0 272.415 321.945
+ DMIX <<mZCRin>> <<mZCRout>>
+ ENDROD
+*
+ ROD 29
+ ROD-NAME ZCR15A ! * ZCU15 => LOWER ROD *
+ LEVEL 0.0 AXIS Y FROM H-
+ MAXPOS 504.0 528.0 84.0 420.0 272.415 321.945
+ DMIX <<mZCRin>> <<mZCRout>>
+ ENDROD
+*
+ ROD 30
+ ROD-NAME ZCR15B ! * ZCU15 => UPPER ROD *
+ LEVEL 0.0 AXIS Y FROM H+
+ MAXPOS 504.0 528.0 324.0 660.0 272.415 321.945
+ DMIX <<mZCRin>> <<mZCRout>>
+ ENDROD
+*
+ ROD 31
+ ROD-NAME ZCR16A ! * ZCU16 => LOWER ROD *
+ LEVEL 0.0 AXIS Y FROM H-
+ MAXPOS 168.0 192.0 132.0 420.0 421.005 470.535
+ DMIX <<mZCRin>> <<mZCRout>>
+ ENDROD
+*
+ ROD 32
+ ROD-NAME ZCR16B ! * ZCU16 => UPPER ROD *
+ LEVEL 0.0 AXIS Y FROM H+
+ MAXPOS 168.0 192.0 324.0 612.0 421.005 470.535
+ DMIX <<mZCRin>> <<mZCRout>>
+ ENDROD
+*
+ ROD 33
+ ROD-NAME ZCR17A ! * ZCU17 => LOWER ROD *
+ LEVEL 0.0 AXIS Y FROM H-
+ MAXPOS 216.0 240.0 84.0 420.0 421.005 470.535
+ DMIX <<mZCRin>> <<mZCRout>>
+ ENDROD
+*
+ ROD 34
+ ROD-NAME ZCR17B ! * ZCU17 => UPPER ROD *
+ LEVEL 0.0 AXIS Y FROM H+
+ MAXPOS 216.0 240.0 324.0 660.0 421.005 470.535
+ DMIX <<mZCRin>> <<mZCRout>>
+ ENDROD
+*
+ ROD 35
+ ROD-NAME ZCR18A ! * ZCU18 => LOWER ROD *
+ LEVEL 0.0 AXIS Y FROM H-
+ MAXPOS 264.0 288.0 60.0 420.0 421.005 470.535
+ DMIX <<mZCRin>> <<mZCRout>>
+ ENDROD
+*
+ ROD 36
+ ROD-NAME ZCR18B ! * ZCU18 => UPPER ROD *
+ LEVEL 0.0 AXIS Y FROM H+
+ MAXPOS 264.0 288.0 324.0 684.0 421.005 470.535
+ DMIX <<mZCRin>> <<mZCRout>>
+ ENDROD
+*
+ ROD 37
+ ROD-NAME ZCR19A ! * ZCU19 => LOWER ROD *
+ LEVEL 0.0 AXIS Y FROM H-
+ MAXPOS 312.0 336.0 60.0 420.0 421.005 470.535
+ DMIX <<mZCRin>> <<mZCRout>>
+ ENDROD
+*
+ ROD 38
+ ROD-NAME ZCR19B ! * ZCU19 => UPPER ROD *
+ LEVEL 0.0 AXIS Y FROM H+
+ MAXPOS 312.0 336.0 324.0 684.0 421.005 470.535
+ DMIX <<mZCRin>> <<mZCRout>>
+ ENDROD
+*
+ ROD 39
+ ROD-NAME ZCR20A ! * ZCU20 => LOWER ROD *
+ LEVEL 0.0 AXIS Y FROM H-
+ MAXPOS 408.0 432.0 60.0 420.0 421.005 470.535
+ DMIX <<mZCRin>> <<mZCRout>>
+ ENDROD
+*
+ ROD 40
+ ROD-NAME ZCR20B ! * ZCU20 => UPPER ROD *
+ LEVEL 0.0 AXIS Y FROM H+
+ MAXPOS 408.0 432.0 324.0 684.0 421.005 470.535
+ DMIX <<mZCRin>> <<mZCRout>>
+ ENDROD
+*
+ ROD 41
+ ROD-NAME ZCR21A ! * ZCU21 => LOWER ROD *
+ LEVEL 0.0 AXIS Y FROM H-
+ MAXPOS 456.0 480.0 60.0 420.0 421.005 470.535
+ DMIX <<mZCRin>> <<mZCRout>>
+ ENDROD
+*
+ ROD 42
+ ROD-NAME ZCR21B ! * ZCU21 => UPPER ROD *
+ LEVEL 0.0 AXIS Y FROM H+
+ MAXPOS 456.0 480.0 324.0 684.0 421.005 470.535
+ DMIX <<mZCRin>> <<mZCRout>>
+ ENDROD
+*
+ ROD 43
+ ROD-NAME ZCR22A ! * ZCU22 => LOWER ROD *
+ LEVEL 0.0 AXIS Y FROM H-
+ MAXPOS 504.0 528.0 84.0 420.0 421.005 470.535
+ DMIX <<mZCRin>> <<mZCRout>>
+ ENDROD
+*
+ ROD 44
+ ROD-NAME ZCR22B ! * ZCU22 => UPPER ROD *
+ LEVEL 0.0 AXIS Y FROM H+
+ MAXPOS 504.0 528.0 324.0 660.0 421.005 470.535
+ DMIX <<mZCRin>> <<mZCRout>>
+ ENDROD
+*
+ ROD 45
+ ROD-NAME ZCR23A ! * ZCU23 => LOWER ROD *
+ LEVEL 0.0 AXIS Y FROM H-
+ MAXPOS 552.0 576.0 132.0 420.0 421.005 470.535
+ DMIX <<mZCRin>> <<mZCRout>>
+ ENDROD
+*
+ ROD 46
+ ROD-NAME ZCR23B ! * ZCU23 => UPPER ROD *
+ LEVEL 0.0 AXIS Y FROM H+
+ MAXPOS 552.0 576.0 324.0 612.0 421.005 470.535
+ DMIX <<mZCRin>> <<mZCRout>>
+ ENDROD
+*--
+* SOR:
+*--
+ ROD 47
+ ROD-NAME SOR01
+ LEVEL 0.0 AXIS Y FROM H+
+ MAXPOS 120.0 144.0 87.0 657.0 49.53 99.06
+ DMIX <<mSORin>> <<mSORout>>
+ ENDROD
+*
+ ROD 48
+ ROD-NAME SOR02
+ LEVEL 0.0 AXIS Y FROM H+
+ MAXPOS 168.0 192.0 87.0 657.0 49.53 99.06
+ DMIX <<mSORin>> <<mSORout>>
+ ENDROD
+*
+ ROD 49
+ ROD-NAME SOR03
+ LEVEL 0.0 AXIS Y FROM H+
+ MAXPOS 216.0 240.0 30.5 713.5 49.53 99.06
+ DMIX <<mSORin>> <<mSORout>>
+ ENDROD
+*
+ ROD 50
+ ROD-NAME SOR04
+ LEVEL 0.0 AXIS Y FROM H+
+ MAXPOS 264.0 288.0 30.5 713.5 49.53 99.06
+ DMIX <<mSORin>> <<mSORout>>
+ ENDROD
+*
+ ROD 51
+ ROD-NAME SOR05
+ LEVEL 0.0 AXIS Y FROM H+
+ MAXPOS 312.0 336.0 30.5 713.5 49.53 99.06
+ DMIX <<mSORin>> <<mSORout>>
+ ENDROD
+*
+ ROD 52
+ ROD-NAME SOR06
+ LEVEL 0.0 AXIS Y FROM H+
+ MAXPOS 360.0 384.0 30.5 713.5 49.53 99.06
+ DMIX <<mSORin>> <<mSORout>>
+ ENDROD
+*
+ ROD 53
+ ROD-NAME SOR07
+ LEVEL 0.0 AXIS Y FROM H+
+ MAXPOS 408.0 432.0 30.5 713.5 49.53 99.06
+ DMIX <<mSORin>> <<mSORout>>
+ ENDROD
+*
+ ROD 54
+ ROD-NAME SOR08
+ LEVEL 0.0 AXIS Y FROM H+
+ MAXPOS 456.0 480.0 30.5 713.5 49.53 99.06
+ DMIX <<mSORin>> <<mSORout>>
+ ENDROD
+*
+ ROD 55
+ ROD-NAME SOR09
+ LEVEL 0.0 AXIS Y FROM H+
+ MAXPOS 504.0 528.0 30.5 713.5 49.53 99.06
+ DMIX <<mSORin>> <<mSORout>>
+ ENDROD
+*
+ ROD 56
+ ROD-NAME SOR10
+ LEVEL 0.0 AXIS Y FROM H+
+ MAXPOS 552.0 576.0 87.0 657.0 49.53 99.06
+ DMIX <<mSORin>> <<mSORout>>
+ ENDROD
+*
+ ROD 57
+ ROD-NAME SOR11
+ LEVEL 0.0 AXIS Y FROM H+
+ MAXPOS 600.0 624.0 87.0 657.0 49.53 99.06
+ DMIX <<mSORin>> <<mSORout>>
+ ENDROD
+*
+ ROD 58
+ ROD-NAME SOR12
+ LEVEL 0.0 AXIS Y FROM H+
+ MAXPOS 360.0 384.0 30.5 713.5 123.825 173.355
+ DMIX <<mSORin>> <<mSORout>>
+ ENDROD
+*
+ ROD 59
+ ROD-NAME SOR13
+ LEVEL 0.0 AXIS Y FROM H+
+ MAXPOS 120.0 144.0 87.0 657.0 161.415 210.945
+ DMIX <<mSORin>> <<mSORout>>
+ ENDROD
+*
+ ROD 60
+ ROD-NAME SOR14
+ LEVEL 0.0 AXIS Y FROM H+
+ MAXPOS 600.0 624.0 87.0 657.0 161.415 210.945
+ DMIX <<mSORin>> <<mSORout>>
+ ENDROD
+*
+ ROD 61
+ ROD-NAME SOR15
+ LEVEL 0.0 AXIS Y FROM H+
+ MAXPOS 312.0 336.0 30.5 713.5 198.415 247.945
+ DMIX <<mSORin>> <<mSORout>>
+ ENDROD
+*
+ ROD 62
+ ROD-NAME SOR16
+ LEVEL 0.0 AXIS Y FROM H+
+ MAXPOS 360.0 384.0 30.5 713.5 198.415 247.945
+ DMIX <<mSORin>> <<mSORout>>
+ ENDROD
+*
+ ROD 63
+ ROD-NAME SOR17
+ LEVEL 0.0 AXIS Y FROM H+
+ MAXPOS 408.0 432.0 30.5 713.5 198.415 247.945
+ DMIX <<mSORin>> <<mSORout>>
+ ENDROD
+*
+ ROD 64
+ ROD-NAME SOR18
+ LEVEL 0.0 AXIS Y FROM H+
+ MAXPOS 216.0 240.0 30.5 713.5 222.915 272.445
+ DMIX <<mSORin>> <<mSORout>>
+ ENDROD
+*
+ ROD 65
+ ROD-NAME SOR19
+ LEVEL 0.0 AXIS Y FROM H+
+ MAXPOS 504.0 528.0 30.5 713.5 222.915 272.445
+ DMIX <<mSORin>> <<mSORout>>
+ ENDROD
+*
+ ROD 66
+ ROD-NAME SOR20
+ LEVEL 0.0 AXIS Y FROM H+
+ MAXPOS 120.0 144.0 87.0 657.0 232.415 281.945
+ DMIX <<mSORin>> <<mSORout>>
+ ENDROD
+*
+ ROD 67
+ ROD-NAME SOR21
+ LEVEL 0.0 AXIS Y FROM H+
+ MAXPOS 600.0 624.0 87.0 657.0 232.415 281.945
+ DMIX <<mSORin>> <<mSORout>>
+ ENDROD
+*
+ ROD 68
+ ROD-NAME SOR22
+ LEVEL 0.0 AXIS Y FROM H+
+ MAXPOS 120.0 144.0 87.0 657.0 272.415 321.945
+ DMIX <<mSORin>> <<mSORout>>
+ ENDROD
+*
+ ROD 69
+ ROD-NAME SOR23
+ LEVEL 0.0 AXIS Y FROM H+
+ MAXPOS 168.0 192.0 87.0 657.0 272.415 321.945
+ DMIX <<mSORin>> <<mSORout>>
+ ENDROD
+*
+ ROD 70
+ ROD-NAME SOR24
+ LEVEL 0.0 AXIS Y FROM H+
+ MAXPOS 552.0 576.0 87.0 657.0 272.415 321.945
+ DMIX <<mSORin>> <<mSORout>>
+ ENDROD
+*
+ ROD 71
+ ROD-NAME SOR25
+ LEVEL 0.0 AXIS Y FROM H+
+ MAXPOS 600.0 624.0 87.0 657.0 272.415 321.945
+ DMIX <<mSORin>> <<mSORout>>
+ ENDROD
+*
+ ROD 72
+ ROD-NAME SOR26
+ LEVEL 0.0 AXIS Y FROM H+
+ MAXPOS 120.0 144.0 87.0 657.0 312.415 361.945
+ DMIX <<mSORin>> <<mSORout>>
+ ENDROD
+*
+ ROD 73
+ ROD-NAME SOR27
+ LEVEL 0.0 AXIS Y FROM H+
+ MAXPOS 600.0 624.0 87.0 657.0 312.415 361.945
+ DMIX <<mSORin>> <<mSORout>>
+ ENDROD
+*
+ ROD 74
+ ROD-NAME SOR28
+ LEVEL 0.0 AXIS Y FROM H+
+ MAXPOS 216.0 240.0 30.5 713.5 321.915 371.445
+ DMIX <<mSORin>> <<mSORout>>
+ ENDROD
+*
+ ROD 75
+ ROD-NAME SOR29
+ LEVEL 0.0 AXIS Y FROM H+
+ MAXPOS 504.0 528.0 30.5 713.5 321.915 371.445
+ DMIX <<mSORin>> <<mSORout>>
+ ENDROD
+*
+ ROD 76
+ ROD-NAME SOR30
+ LEVEL 0.0 AXIS Y FROM H+
+ MAXPOS 312.0 336.0 30.5 713.5 346.415 395.945
+ DMIX <<mSORin>> <<mSORout>>
+ ENDROD
+*
+ ROD 77
+ ROD-NAME SOR31
+ LEVEL 0.0 AXIS Y FROM H+
+ MAXPOS 360.0 384.0 30.5 713.5 346.415 395.945
+ DMIX <<mSORin>> <<mSORout>>
+ ENDROD
+*
+ ROD 78
+ ROD-NAME SOR32
+ LEVEL 0.0 AXIS Y FROM H+
+ MAXPOS 408.0 432.0 30.5 713.5 346.415 395.945
+ DMIX <<mSORin>> <<mSORout>>
+ ENDROD
+*
+ ROD 79
+ ROD-NAME SOR33
+ LEVEL 0.0 AXIS Y FROM H+
+ MAXPOS 120.0 144.0 87.0 657.0 383.415 432.945
+ DMIX <<mSORin>> <<mSORout>>
+ ENDROD
+*
+ ROD 80
+ ROD-NAME SOR34
+ LEVEL 0.0 AXIS Y FROM H+
+ MAXPOS 600.0 624.0 87.0 657.0 383.415 432.945
+ DMIX <<mSORin>> <<mSORout>>
+ ENDROD
+*
+ ROD 81
+ ROD-NAME SOR35
+ LEVEL 0.0 AXIS Y FROM H+
+ MAXPOS 360.0 384.0 30.5 713.5 420.915 470.415
+ DMIX <<mSORin>> <<mSORout>>
+ ENDROD
+*
+ ROD 82
+ ROD-NAME SOR36
+ LEVEL 0.0 AXIS Y FROM H+
+ MAXPOS 120.0 144.0 87.0 657.0 495.415 544.945
+ DMIX <<mSORin>> <<mSORout>>
+ ENDROD
+*
+ ROD 83
+ ROD-NAME SOR37
+ LEVEL 0.0 AXIS Y FROM H+
+ MAXPOS 168.0 192.0 87.0 657.0 495.415 544.945
+ DMIX <<mSORin>> <<mSORout>>
+ ENDROD
+*
+ ROD 84
+ ROD-NAME SOR38
+ LEVEL 0.0 AXIS Y FROM H+
+ MAXPOS 216.0 240.0 30.5 713.5 495.415 544.945
+ DMIX <<mSORin>> <<mSORout>>
+ ENDROD
+*
+ ROD 85
+ ROD-NAME SOR39
+ LEVEL 0.0 AXIS Y FROM H+
+ MAXPOS 264.0 288.0 30.5 713.5 495.415 544.945
+ DMIX <<mSORin>> <<mSORout>>
+ ENDROD
+*
+ ROD 86
+ ROD-NAME SOR40
+ LEVEL 0.0 AXIS Y FROM H+
+ MAXPOS 312.0 336.0 30.5 713.5 495.415 544.945
+ DMIX <<mSORin>> <<mSORout>>
+ ENDROD
+*
+ ROD 87
+ ROD-NAME SOR41
+ LEVEL 0.0 AXIS Y FROM H+
+ MAXPOS 360.0 384.0 30.5 713.5 495.415 544.945
+ DMIX <<mSORin>> <<mSORout>>
+ ENDROD
+*
+ ROD 88
+ ROD-NAME SOR42
+ LEVEL 0.0 AXIS Y FROM H+
+ MAXPOS 408.0 432.0 30.5 713.5 495.415 544.945
+ DMIX <<mSORin>> <<mSORout>>
+ ENDROD
+*
+ ROD 89
+ ROD-NAME SOR43
+ LEVEL 0.0 AXIS Y FROM H+
+ MAXPOS 456.0 480.0 30.5 713.5 495.415 544.945
+ DMIX <<mSORin>> <<mSORout>>
+ ENDROD
+*
+ ROD 90
+ ROD-NAME SOR44
+ LEVEL 0.0 AXIS Y FROM H+
+ MAXPOS 504.0 528.0 30.5 713.5 495.415 544.945
+ DMIX <<mSORin>> <<mSORout>>
+ ENDROD
+*
+ ROD 91
+ ROD-NAME SOR45
+ LEVEL 0.0 AXIS Y FROM H+
+ MAXPOS 552.0 576.0 87.0 657.0 495.415 544.945
+ DMIX <<mSORin>> <<mSORout>>
+ ENDROD
+*
+ ROD 92
+ ROD-NAME SOR46
+ LEVEL 0.0 AXIS Y FROM H+
+ MAXPOS 600.0 624.0 87.0 657.0 495.415 544.945
+ DMIX <<mSORin>> <<mSORout>>
+ ENDROD
+*--
+* CAU:
+*--
+ ROD 93
+ ROD-NAME CAU01
+ LEVEL 0.0 AXIS Y FROM H+
+ MAXPOS 120.0 144.0 87.0 657.0 123.825 173.355
+ DMIX <<mSORin>> <<mSORout>>
+ ENDROD
+*
+ ROD 94
+ ROD-NAME CAU02
+ LEVEL 0.0 AXIS Y FROM H+
+ MAXPOS 600.0 624.0 87.0 657.0 123.825 173.355
+ DMIX <<mSORin>> <<mSORout>>
+ ENDROD
+*
+ ROD 95
+ ROD-NAME CAU03
+ LEVEL 0.0 AXIS Y FROM H+
+ MAXPOS 264.0 288.0 30.5 713.5 198.12 247.65
+ DMIX <<mSORin>> <<mSORout>>
+ ENDROD
+*
+ ROD 96
+ ROD-NAME CAU04
+ LEVEL 0.0 AXIS Y FROM H+
+ MAXPOS 456.0 480.0 30.5 713.5 198.12 247.65
+ DMIX <<mSORin>> <<mSORout>>
+ ENDROD
+*
+ ROD 97
+ ROD-NAME CAU05
+ LEVEL 0.0 AXIS Y FROM H+
+ MAXPOS 264.0 288.0 30.5 713.5 346.71 396.24
+ DMIX <<mSORin>> <<mSORout>>
+ ENDROD
+*
+ ROD 98
+ ROD-NAME CAU06
+ LEVEL 0.0 AXIS Y FROM H+
+ MAXPOS 456.0 480.0 30.5 713.5 346.71 396.24
+ DMIX <<mSORin>> <<mSORout>>
+ ENDROD
+*
+ ROD 99
+ ROD-NAME CAU07
+ LEVEL 0.0 AXIS Y FROM H+
+ MAXPOS 120.0 144.0 87.0 657.0 421.005 470.535
+ DMIX <<mSORin>> <<mSORout>>
+ ENDROD
+*
+ ROD 100
+ ROD-NAME CAU08
+ LEVEL 0.0 AXIS Y FROM H+
+ MAXPOS 600.0 624.0 87.0 657.0 421.005 470.535
+ DMIX <<mSORin>> <<mSORout>>
+ ENDROD
+*
+
+ CREATE ROD-GR 5
+
+ GROUP-ID 1 ! ZCU AT 0%
+ ROD-ID 1 2 15 16 19 20 23 24 27 28 31 32 45 46
+
+ GROUP-ID 2 ! ZCU AT 50%
+ ROD-ID 3 4 7 8 9 10 13 14 33 34 37 38 39 40 43 44
+
+ GROUP-ID 3 ! ZCU AT 100%
+ ROD-ID 5 6 11 12 17 18 21 22 25 26 29 30 35 36 41 42
+
+ GROUP-ID 4 ! ALL SOR
+ ROD-ID 47 48 49 50 51 52 53 54 55 56 57 58 59 60 61
+ 62 63 64 65 66 67 68 69 70 71 72 73 74 75 76
+ 77 78 79 80 81 82 83 84 85 86 87 88 89 90 91 92
+
+ GROUP-ID 5 ! ALL CAU
+ ROD-ID 93 94 95 96 97 98 99 100 ;
+
+END: ;
+QUIT .
diff --git a/Donjon/data/NCRtest_proc/Pfluxtest.c2m b/Donjon/data/NCRtest_proc/Pfluxtest.c2m
new file mode 100755
index 0000000..64fc4ba
--- /dev/null
+++ b/Donjon/data/NCRtest_proc/Pfluxtest.c2m
@@ -0,0 +1,167 @@
+****************************************************************
+* *
+* Procedure : Pfluxtest.c2m *
+* Purpose : Time-average calculation for ACR-1000 core *
+* using the NCR module instead of CRE *
+* Author : R. Chambon (2008/03) *
+* based on : D. Sekki (2007/10) *
+* *
+* CALL : FMAP MATEX := Pfluxtest FMAP MATEX MACRO1 *
+* DEVICE TRACK LMCPO :: *
+* <<NamFueld>> <<NamPARKEYF>> *
+* <<mFue20>> <<mFue18>> <<NamFue20>> <<NamFue18>> *
+* <<Pow>> <<epsil>> <<Prec>> <<maxItr>> <<iEdit>> *
+* >>nbItr<< >>Keff<< >>Bexit<< ; *
+****************************************************************
+
+PARAMETER FMAP MATEX MACRO1 DEVICE TRACK
+ LMCPO18 LMCPO20 :: :::
+ LINKED_LIST FMAP MATEX MACRO1 DEVICE TRACK
+ LMCPO18 LMCPO20 ; ;
+
+MODULE DELETE: GREP: END: CRE: MACINI: NEWMAC:
+ TAVG: FLUD: FLPOW: TRIVAT: TRIVAA: NCR: ;
+
+LINKED_LIST FLUX POWER SYSTEM MACFL MACRO2 MACRO ;
+
+INTEGER mFue20 mFue18 maxItr iEdit ;
+REAL Pow epsil Prec Eps epsM Keff Bexit ;
+STRING NamFueld NamPARKEYF NamFue20 NamFue18 ;
+INTEGER iter iPwPrt := 0 0 ;
+ :: >>NamFueld<< >>NamPARKEYF<<
+ >>mFue20<< >>mFue18<< >>NamFue20<< >>NamFue18<<
+ >>Pow<< >>epsil<< >>Prec<< >>maxItr<< >>iEdit<< ;
+
+*---------------------------------------------------------------
+* TIME-AVERAGE CALCULATION
+*---------------------------------------------------------------
+EVALUATE Eps := epsil 1. + ;
+EVALUATE epsM := Eps ;
+
+WHILE Eps epsil > iter maxItr < * DO
+
+ EVALUATE iter := iter 1 + ;
+*--
+* fuel-map macrolib:
+*--
+ MACFL := NCR: LMCPO18 LMCPO20 FMAP ::
+ EDIT 0 MACRO
+ TABLE LMCPO20 <<NamFueld>> BURN
+ MIX <<mFue20>>
+ SET <<NamPARKEYF>> <<NamFue20>>
+ SET X-COOL 1.0
+ SET T-COOL 5.731600E+02
+ SET T-FUEL 9.601600E+02
+ ADD X-COOL 1.0 MAP
+ REF
+ BURN SAMEASREF
+ T-COOL 5.731600E+02
+ T-FUEL 9.601600E+02
+ ENDREF
+ ADD T-COOL 5.731600E+02 MAP
+ REF
+ BURN SAMEASREF
+ X-COOL 1.0
+ T-FUEL 9.601600E+02
+ ENDREF
+ ADD T-FUEL 9.601600E+02 MAP
+ REF
+ BURN SAMEASREF
+ X-COOL 1.0
+ T-COOL 5.731600E+02
+ ENDREF
+ ENDMIX
+ TABLE LMCPO18 <<NamFueld>> BURN
+ MIX <<mFue18>>
+ SET <<NamPARKEYF>> <<NamFue18>>
+ SET X-COOL 1.0
+ SET T-COOL 5.731600E+02
+ SET T-FUEL 9.601600E+02
+ SET RDTPOS 0.0
+ SET RDDPOS 0.0
+ ADD X-COOL 1.0 MAP
+ REF
+ BURN SAMEASREF
+ T-COOL 5.731600E+02
+ T-FUEL 9.601600E+02
+ RDTPOS 0.0
+ RDDPOS 0.0
+ ENDREF
+ ADD T-COOL 5.731600E+02 MAP
+ REF
+ BURN SAMEASREF
+ X-COOL 1.0
+ T-FUEL 9.601600E+02
+ RDTPOS 0.0
+ RDDPOS 0.0
+ ENDREF
+ ADD T-FUEL 9.601600E+02 MAP
+ REF
+ BURN SAMEASREF
+ X-COOL 1.0
+ T-COOL 5.731600E+02
+ RDTPOS 0.0
+ RDDPOS 0.0
+ ENDREF
+ ENDMIX
+ ;
+*--
+* extended macrolib:
+*--
+ MACRO2 MATEX := MACINI: MATEX MACRO1 MACFL :: EDIT 0 ;
+ MACFL := DELETE: MACFL ;
+*--
+* complete macrolib:
+*--
+ MACRO MATEX := NEWMAC: MATEX MACRO2 DEVICE :: EDIT 0 ;
+ MACRO2 := DELETE: MACRO2 ;
+*--
+* numerical solution:
+*--
+ SYSTEM := TRIVAA: MACRO TRACK :: EDIT 0 ;
+ MACRO := DELETE: MACRO ;
+ IF iter 1 = THEN
+ FLUX := FLUD: SYSTEM TRACK :: EDIT 10
+ ACCE 3 3 ADI 2 EXTE 1000 <<Prec>>
+ THER 1000 ;
+ ELSE
+ FLUX := FLUD: FLUX SYSTEM TRACK :: EDIT 10
+ ACCE 3 3 ADI 2 EXTE 1000 <<Prec>>
+ THER 1000 ;
+ ENDIF ;
+ SYSTEM := DELETE: SYSTEM ;
+*--
+* flux and power:
+*--
+ EVALUATE iPwPrt := 0 ;
+ POWER := FLPOW: FMAP FLUX TRACK MATEX ::
+ EDIT <<iPwPrt>> PTOT <<Pow>> ;
+*--
+* burnups integration limits:
+*--
+ FMAP := TAVG: FMAP POWER :: EDIT 0 AX-SHAPE RELAX 0.55 B-EXIT ;
+ GREP: POWER :: GETVAL 'K-EFFECTIVE' 1 >>Keff<< ;
+ POWER := DELETE: POWER ;
+*--
+* current parameters:
+*--
+ GREP: FMAP :: GETVAL EPS-AX 1 >>Eps<< ;
+ ECHO "Iteration No. " iter ;
+ ECHO "AXIAL-SHAPE ERROR : " Eps ;
+ ECHO "RESULTING K-EFF : " Keff ;
+
+ IF epsM Eps > THEN
+ EVALUATE epsM := Eps ;
+ ELSE
+ EVALUATE epsil := Eps ;
+ EVALUATE maxItr := iter ;
+ ENDIF ;
+
+ENDWHILE ;
+FLUX := DELETE: FLUX ;
+GREP: FMAP :: GETVAL B-EXIT 1 >>Bexit<< ;
+
+ :: <<iter>> <<Keff>> <<Bexit>> ;
+
+END: ;
+QUIT .
diff --git a/Donjon/data/NCRtest_proc/Pfmaptest.c2m b/Donjon/data/NCRtest_proc/Pfmaptest.c2m
new file mode 100755
index 0000000..a80c4d5
--- /dev/null
+++ b/Donjon/data/NCRtest_proc/Pfmaptest.c2m
@@ -0,0 +1,127 @@
+****************************************************************
+* *
+* Procedure : Pfmaptest.c2m *
+* Purpose : Fuel-map definition for ACR-1000 core *
+* Author : R. Chambon (2008/03) *
+* based on : D. Sekki (2007/06) *
+* *
+* CALL : FMAP MATEX := Pfmaptest MATEX ; *
+* *
+****************************************************************
+
+PARAMETER FMAP MATEX :: ::: LINKED_LIST FMAP MATEX ; ;
+MODULE END: RESINI: ;
+
+ FMAP MATEX := RESINI: MATEX :: EDIT 1
+
+ ::: GEO: CAR3D 28 28 12
+
+ EDIT 0
+ X- VOID X+ VOID
+ Y- VOID Y+ VOID
+ Z- VOID Z+ VOID
+ MIX
+
+ PLANE 1
+
+* - 1 2 3 4 5 6 7 8 9 0 1 2 3 4 5 6 7 8 9 0 1 2 3 4 5 6 -
+
+ 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 ! -
+ 0 0 0 0 0 0 0 0 0 0 0 1 1 1 1 1 1 0 0 0 0 0 0 0 0 0 0 0 ! A
+ 0 0 0 0 0 0 0 0 1 1 1 1 1 1 1 1 1 1 1 1 0 0 0 0 0 0 0 0 ! B
+ 0 0 0 0 0 0 0 1 1 1 1 1 1 1 1 1 1 1 1 1 1 0 0 0 0 0 0 0 ! C
+ 0 0 0 0 0 0 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 0 0 0 0 0 0 ! D
+ 0 0 0 0 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 0 0 0 0 ! E
+ 0 0 0 0 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 0 0 0 0 ! F
+ 0 0 0 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 0 0 0 ! G
+ 0 0 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 0 0 ! H
+ 0 0 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 0 0 ! J
+ 0 0 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 0 0 ! K
+ 0 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 0 ! L
+ 0 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 0 ! M
+ 0 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 0 ! N
+
+ 0 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 0 ! O
+ 0 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 0 ! P
+ 0 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 0 ! Q
+ 0 0 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 0 0 ! R
+ 0 0 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 0 0 ! S
+ 0 0 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 0 0 ! T
+ 0 0 0 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 0 0 0 ! U
+ 0 0 0 0 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 0 0 0 0 ! V
+ 0 0 0 0 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 0 0 0 0 ! W
+ 0 0 0 0 0 0 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 0 0 0 0 0 0 ! X
+ 0 0 0 0 0 0 0 1 1 1 1 1 1 1 1 1 1 1 1 1 1 0 0 0 0 0 0 0 ! Y
+ 0 0 0 0 0 0 0 0 1 1 1 1 1 1 1 1 1 1 1 1 0 0 0 0 0 0 0 0 ! Z
+ 0 0 0 0 0 0 0 0 0 0 0 1 1 1 1 1 1 0 0 0 0 0 0 0 0 0 0 0 ! ZZ
+ 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 ! -
+
+ PLANE 2 SAME 1
+ PLANE 3 SAME 1
+ PLANE 4 SAME 1
+
+ PLANE 5
+
+* - 1 2 3 4 5 6 7 8 9 0 1 2 3 4 5 6 7 8 9 0 1 2 3 4 5 6 -
+
+ 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 ! -
+ 0 0 0 0 0 0 0 0 0 0 0 2 2 2 2 2 2 0 0 0 0 0 0 0 0 0 0 0 ! A
+ 0 0 0 0 0 0 0 0 2 2 2 2 2 2 2 2 2 2 2 2 0 0 0 0 0 0 0 0 ! B
+ 0 0 0 0 0 0 0 2 2 2 2 2 2 2 2 2 2 2 2 2 2 0 0 0 0 0 0 0 ! C
+ 0 0 0 0 0 0 2 2 2 2 2 2 2 2 2 2 2 2 2 2 2 2 0 0 0 0 0 0 ! D
+ 0 0 0 0 2 2 2 2 2 2 2 2 2 2 2 2 2 2 2 2 2 2 2 2 0 0 0 0 ! E
+ 0 0 0 0 2 2 2 2 2 2 2 2 2 2 2 2 2 2 2 2 2 2 2 2 0 0 0 0 ! F
+ 0 0 0 2 2 2 2 2 2 2 2 2 2 2 2 2 2 2 2 2 2 2 2 2 2 0 0 0 ! G
+ 0 0 2 2 2 2 2 2 2 2 2 2 2 2 2 2 2 2 2 2 2 2 2 2 2 2 0 0 ! H
+ 0 0 2 2 2 2 2 2 2 2 2 2 2 2 2 2 2 2 2 2 2 2 2 2 2 2 0 0 ! J
+ 0 0 2 2 2 2 2 2 2 2 2 2 2 2 2 2 2 2 2 2 2 2 2 2 2 2 0 0 ! K
+ 0 2 2 2 2 2 2 2 2 2 2 2 2 2 2 2 2 2 2 2 2 2 2 2 2 2 2 0 ! L
+ 0 2 2 2 2 2 2 2 2 2 2 2 2 2 2 2 2 2 2 2 2 2 2 2 2 2 2 0 ! M
+ 0 2 2 2 2 2 2 2 2 2 2 2 2 2 2 2 2 2 2 2 2 2 2 2 2 2 2 0 ! N
+
+ 0 2 2 2 2 2 2 2 2 2 2 2 2 2 2 2 2 2 2 2 2 2 2 2 2 2 2 0 ! O
+ 0 2 2 2 2 2 2 2 2 2 2 2 2 2 2 2 2 2 2 2 2 2 2 2 2 2 2 0 ! P
+ 0 2 2 2 2 2 2 2 2 2 2 2 2 2 2 2 2 2 2 2 2 2 2 2 2 2 2 0 ! Q
+ 0 0 2 2 2 2 2 2 2 2 2 2 2 2 2 2 2 2 2 2 2 2 2 2 2 2 0 0 ! R
+ 0 0 2 2 2 2 2 2 2 2 2 2 2 2 2 2 2 2 2 2 2 2 2 2 2 2 0 0 ! S
+ 0 0 2 2 2 2 2 2 2 2 2 2 2 2 2 2 2 2 2 2 2 2 2 2 2 2 0 0 ! T
+ 0 0 0 2 2 2 2 2 2 2 2 2 2 2 2 2 2 2 2 2 2 2 2 2 2 0 0 0 ! U
+ 0 0 0 0 2 2 2 2 2 2 2 2 2 2 2 2 2 2 2 2 2 2 2 2 0 0 0 0 ! V
+ 0 0 0 0 2 2 2 2 2 2 2 2 2 2 2 2 2 2 2 2 2 2 2 2 0 0 0 0 ! W
+ 0 0 0 0 0 0 2 2 2 2 2 2 2 2 2 2 2 2 2 2 2 2 0 0 0 0 0 0 ! X
+ 0 0 0 0 0 0 0 2 2 2 2 2 2 2 2 2 2 2 2 2 2 0 0 0 0 0 0 0 ! Y
+ 0 0 0 0 0 0 0 0 2 2 2 2 2 2 2 2 2 2 2 2 0 0 0 0 0 0 0 0 ! Z
+ 0 0 0 0 0 0 0 0 0 0 0 2 2 2 2 2 2 0 0 0 0 0 0 0 0 0 0 0 ! ZZ
+ 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 ! -
+
+ PLANE 6 SAME 5
+ PLANE 7 SAME 5
+ PLANE 8 SAME 5
+
+ PLANE 9 SAME 1
+ PLANE 10 SAME 1
+ PLANE 11 SAME 1
+ PLANE 12 SAME 1
+
+ MESHX 0. 60. 84. 108. 132. 156. 180. 204. 228. 252.
+ 276. 300. 324. 348. 372. 396. 420. 444. 468. 492.
+ 516. 540. 564. 588. 612. 636. 660. 684. 744.
+
+ MESHY 0. 60. 84. 108. 132. 156. 180. 204. 228. 252.
+ 276. 300. 324. 348. 372. 396. 420. 444. 468. 492.
+ 516. 540. 564. 588. 612. 636. 660. 684. 744.
+
+ MESHZ 0.00 49.53 99.06 148.59 198.12 247.65 297.18
+ 346.71 396.24 445.77 495.30 544.83 594.36 ;
+
+ NXNAME '-' '1' '2' '3' '4' '5' '6' '7' '8' '9' '10'
+ '11' '12' '13' '14' '15' '16' '17' '18' '19'
+ '20' '21' '22' '23' '24' '25' '26' '-'
+
+ NYNAME '-' 'A' 'B' 'C' 'D' 'E' 'F' 'G' 'H' 'J' 'K'
+ 'L' 'M' 'N' 'O' 'P' 'Q' 'R' 'S' 'T' 'U' 'V'
+ 'W' 'X' 'Y' 'Z' 'ZZ' '-'
+ NCOMB ALL
+ ;
+END: ;
+QUIT .
diff --git a/Donjon/data/NCRtest_proc/Pgeotest.c2m b/Donjon/data/NCRtest_proc/Pgeotest.c2m
new file mode 100755
index 0000000..c7f5d45
--- /dev/null
+++ b/Donjon/data/NCRtest_proc/Pgeotest.c2m
@@ -0,0 +1,120 @@
+*******************************************************************
+* *
+* Procedure : Pgeotest.c2m *
+* Purpose : Coarse geometry definition for ACR-1000 core *
+* Author : J. Koclas (2006/07) *
+* Modified : D. Sekki (2007/06) *
+* *
+* CALL : GEOM := Pgeotest :: <<sZ>> ; *
+* *
+*******************************************************************
+PARAMETER GEOM :: ::: LINKED_LIST GEOM ; ;
+MODULE END: GEO: ;
+INTEGER sZ ;
+
+ :: >>sZ<< ;
+
+ GEOM := GEO: :: CAR3D 32 32 12
+ EDIT 1
+ X- VOID X+ VOID
+ Y- VOID Y+ VOID
+ Z- VOID Z+ VOID
+ MIX
+ PLANE 1
+ 0 0 0 0 0 0 0 0 0 0 0 0 0 3 3 3 3 3 3 0 0 0 0 0 0 0 0 0 0 0 0 0
+ 0 0 0 0 0 0 0 0 0 0 3 3 3 3 3 3 3 3 3 3 3 3 0 0 0 0 0 0 0 0 0 0
+ 0 0 0 0 0 0 0 0 3 3 3 3 3 3 3 3 3 3 3 3 3 3 3 3 0 0 0 0 0 0 0 0
+ 0 0 0 0 0 0 0 3 3 3 3 3 3 1 1 1 1 1 1 3 3 3 3 3 3 0 0 0 0 0 0 0
+ 0 0 0 0 0 0 3 3 3 3 1 1 1 1 1 1 1 1 1 1 1 1 3 3 3 3 0 0 0 0 0 0
+ 0 0 0 0 3 3 3 3 3 1 1 1 1 1 1 1 1 1 1 1 1 1 1 3 3 3 3 3 0 0 0 0
+ 0 0 0 0 3 3 3 3 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 3 3 3 3 0 0 0 0
+ 0 0 0 3 3 3 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 3 3 3 0 0 0
+ 0 0 3 3 3 3 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 3 3 3 3 0 0
+ 0 0 3 3 3 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 3 3 3 0 0
+ 0 3 3 3 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 3 3 3 0
+ 0 3 3 3 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 3 3 3 0
+ 0 3 3 3 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 3 3 3 0
+ 3 3 3 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 3 3 3
+ 3 3 3 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 3 3 3
+ 3 3 3 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 3 3 3
+
+ 3 3 3 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 3 3 3
+ 3 3 3 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 3 3 3
+ 3 3 3 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 3 3 3
+ 0 3 3 3 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 3 3 3 0
+ 0 3 3 3 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 3 3 3 0
+ 0 3 3 3 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 3 3 3 0
+ 0 0 3 3 3 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 3 3 3 0 0
+ 0 0 3 3 3 3 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 3 3 3 3 0 0
+ 0 0 0 3 3 3 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 3 3 3 0 0 0
+ 0 0 0 0 3 3 3 3 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 3 3 3 3 0 0 0 0
+ 0 0 0 0 3 3 3 3 3 1 1 1 1 1 1 1 1 1 1 1 1 1 1 3 3 3 3 3 0 0 0 0
+ 0 0 0 0 0 0 3 3 3 3 1 1 1 1 1 1 1 1 1 1 1 1 3 3 3 3 0 0 0 0 0 0
+ 0 0 0 0 0 0 0 3 3 3 3 3 3 1 1 1 1 1 1 3 3 3 3 3 3 0 0 0 0 0 0 0
+ 0 0 0 0 0 0 0 0 3 3 3 3 3 3 3 3 3 3 3 3 3 3 3 3 0 0 0 0 0 0 0 0
+ 0 0 0 0 0 0 0 0 0 0 3 3 3 3 3 3 3 3 3 3 3 3 0 0 0 0 0 0 0 0 0 0
+ 0 0 0 0 0 0 0 0 0 0 0 0 0 3 3 3 3 3 3 0 0 0 0 0 0 0 0 0 0 0 0 0
+
+ PLANE 2 SAME 1
+ PLANE 3 SAME 1
+ PLANE 4 SAME 1
+
+ PLANE 5
+ 0 0 0 0 0 0 0 0 0 0 0 0 0 4 4 4 4 4 4 0 0 0 0 0 0 0 0 0 0 0 0 0
+ 0 0 0 0 0 0 0 0 0 0 4 4 4 4 4 4 4 4 4 4 4 4 0 0 0 0 0 0 0 0 0 0
+ 0 0 0 0 0 0 0 0 4 4 4 4 4 4 4 4 4 4 4 4 4 4 4 4 0 0 0 0 0 0 0 0
+ 0 0 0 0 0 0 0 4 4 4 4 4 4 2 2 2 2 2 2 4 4 4 4 4 4 0 0 0 0 0 0 0
+ 0 0 0 0 0 0 4 4 4 4 2 2 2 2 2 2 2 2 2 2 2 2 4 4 4 4 0 0 0 0 0 0
+ 0 0 0 0 4 4 4 4 4 2 2 2 2 2 2 2 2 2 2 2 2 2 2 4 4 4 4 4 0 0 0 0
+ 0 0 0 0 4 4 4 4 2 2 2 2 2 2 2 2 2 2 2 2 2 2 2 2 4 4 4 4 0 0 0 0
+ 0 0 0 4 4 4 2 2 2 2 2 2 2 2 2 2 2 2 2 2 2 2 2 2 2 2 4 4 4 0 0 0
+ 0 0 4 4 4 4 2 2 2 2 2 2 2 2 2 2 2 2 2 2 2 2 2 2 2 2 4 4 4 4 0 0
+ 0 0 4 4 4 2 2 2 2 2 2 2 2 2 2 2 2 2 2 2 2 2 2 2 2 2 2 4 4 4 0 0
+ 0 4 4 4 2 2 2 2 2 2 2 2 2 2 2 2 2 2 2 2 2 2 2 2 2 2 2 2 4 4 4 0
+ 0 4 4 4 2 2 2 2 2 2 2 2 2 2 2 2 2 2 2 2 2 2 2 2 2 2 2 2 4 4 4 0
+ 0 4 4 4 2 2 2 2 2 2 2 2 2 2 2 2 2 2 2 2 2 2 2 2 2 2 2 2 4 4 4 0
+ 4 4 4 2 2 2 2 2 2 2 2 2 2 2 2 2 2 2 2 2 2 2 2 2 2 2 2 2 2 4 4 4
+ 4 4 4 2 2 2 2 2 2 2 2 2 2 2 2 2 2 2 2 2 2 2 2 2 2 2 2 2 2 4 4 4
+ 4 4 4 2 2 2 2 2 2 2 2 2 2 2 2 2 2 2 2 2 2 2 2 2 2 2 2 2 2 4 4 4
+
+ 4 4 4 2 2 2 2 2 2 2 2 2 2 2 2 2 2 2 2 2 2 2 2 2 2 2 2 2 2 4 4 4
+ 4 4 4 2 2 2 2 2 2 2 2 2 2 2 2 2 2 2 2 2 2 2 2 2 2 2 2 2 2 4 4 4
+ 4 4 4 2 2 2 2 2 2 2 2 2 2 2 2 2 2 2 2 2 2 2 2 2 2 2 2 2 2 4 4 4
+ 0 4 4 4 2 2 2 2 2 2 2 2 2 2 2 2 2 2 2 2 2 2 2 2 2 2 2 2 4 4 4 0
+ 0 4 4 4 2 2 2 2 2 2 2 2 2 2 2 2 2 2 2 2 2 2 2 2 2 2 2 2 4 4 4 0
+ 0 4 4 4 2 2 2 2 2 2 2 2 2 2 2 2 2 2 2 2 2 2 2 2 2 2 2 2 4 4 4 0
+ 0 0 4 4 4 2 2 2 2 2 2 2 2 2 2 2 2 2 2 2 2 2 2 2 2 2 2 4 4 4 0 0
+ 0 0 4 4 4 4 2 2 2 2 2 2 2 2 2 2 2 2 2 2 2 2 2 2 2 2 4 4 4 4 0 0
+ 0 0 0 4 4 4 2 2 2 2 2 2 2 2 2 2 2 2 2 2 2 2 2 2 2 2 4 4 4 0 0 0
+ 0 0 0 0 4 4 4 4 2 2 2 2 2 2 2 2 2 2 2 2 2 2 2 2 4 4 4 4 0 0 0 0
+ 0 0 0 0 4 4 4 4 4 2 2 2 2 2 2 2 2 2 2 2 2 2 2 4 4 4 4 4 0 0 0 0
+ 0 0 0 0 0 0 4 4 4 4 2 2 2 2 2 2 2 2 2 2 2 2 4 4 4 4 0 0 0 0 0 0
+ 0 0 0 0 0 0 0 4 4 4 4 4 4 2 2 2 2 2 2 4 4 4 4 4 4 0 0 0 0 0 0 0
+ 0 0 0 0 0 0 0 0 4 4 4 4 4 4 4 4 4 4 4 4 4 4 4 4 0 0 0 0 0 0 0 0
+ 0 0 0 0 0 0 0 0 0 0 4 4 4 4 4 4 4 4 4 4 4 4 0 0 0 0 0 0 0 0 0 0
+ 0 0 0 0 0 0 0 0 0 0 0 0 0 4 4 4 4 4 4 0 0 0 0 0 0 0 0 0 0 0 0 0
+
+ PLANE 6 SAME 5
+ PLANE 7 SAME 5
+ PLANE 8 SAME 5
+ PLANE 9 SAME 1
+ PLANE 10 SAME 1
+ PLANE 11 SAME 1
+ PLANE 12 SAME 1
+
+ MESHX 0. 12. 36. 60. 84. 108. 132. 156. 180. 204. 228.
+ 252. 276. 300. 324. 348. 372. 396. 420. 444. 468. 492.
+ 516. 540. 564. 588. 612. 636. 660. 684. 708. 732. 744.
+
+ MESHY 0. 12. 36. 60. 84. 108. 132. 156. 180. 204. 228.
+ 252. 276. 300. 324. 348. 372. 396. 420. 444. 468. 492.
+ 516. 540. 564. 588. 612. 636. 660. 684. 708. 732. 744.
+
+ MESHZ 0.00 49.53 99.06 148.59 198.12 247.65 297.18
+ 346.71 396.24 445.77 495.30 544.83 594.36
+
+ SPLITZ <<sZ>> <<sZ>> <<sZ>> <<sZ>> <<sZ>> <<sZ>>
+ <<sZ>> <<sZ>> <<sZ>> <<sZ>> <<sZ>> <<sZ>> ;
+
+END: ;
+QUIT .
generated by cgit v1.2.3 (git 2.46.0) at 2026-02-16 16:25:56 +0000