diff options
Diffstat (limited to 'Donjon/data/Candu6_proc/SetReflPro.c2m')
| -rwxr-xr-x | Donjon/data/Candu6_proc/SetReflPro.c2m | 25 |
1 files changed, 25 insertions, 0 deletions
diff --git a/Donjon/data/Candu6_proc/SetReflPro.c2m b/Donjon/data/Candu6_proc/SetReflPro.c2m new file mode 100755 index 0000000..71fb651 --- /dev/null +++ b/Donjon/data/Candu6_proc/SetReflPro.c2m @@ -0,0 +1,25 @@ +*********************************************************** +* * +* Procedure : SetReflPro.c2m * +* Purpose : Reactor reflector specifications * +* Author(s) : M. Guyot (2010) * +* * +* CALL : MACRO := SetReflPro CPOREFL ; * +* * +*********************************************************** + +PARAMETER MACRO CPOREFL :: + ::: LINKED_LIST + MACRO CPOREFL ; ; +MODULE CRE: END: ; + +STRING NamCpo1 ; +EVALUATE NamCpo1 := 'MIXTMOD 1' ; + +MACRO := CRE: CPOREFL :: + EDIT 5 NMIX 60 READ + COMPO CPOREFL MIX 2 <<NamCpo1>> + ENDMIX ; + +END: ; +QUIT . |