diff options
Diffstat (limited to 'Skin++/data/pwr2010.c2m')
| -rwxr-xr-x | Skin++/data/pwr2010.c2m | 19 |
1 files changed, 19 insertions, 0 deletions
diff --git a/Skin++/data/pwr2010.c2m b/Skin++/data/pwr2010.c2m new file mode 100755 index 0000000..14d5042 --- /dev/null +++ b/Skin++/data/pwr2010.c2m @@ -0,0 +1,19 @@ + ! + ! Dummy pwr2010 computational scheme + ! + PARAMETER saphyb :: + ::: XSM_FILE saphyb ; ; + MODULE UTL: END: ; + STRING draglib type fuel rod homoge ; + :: >>draglib<< >>type<< >>fuel<< >>rod<< >>homoge<< ; + REAL u235 burnup ; + :: >>u235<< >>burnup<< ; + INTEGER ngroup ; + :: >>ngroup<< ; + + saphyb := UTL: :: CREA 'SIGNATURE' 3 = 'L_SA' 'PHYB' ' ' ; + ECHO "draglib=" draglib " type=" type " fuel=" fuel ; + ECHO "rod=" rod " homoge=" homoge " u235=" u235 ; + ECHO "burnup=" burnup " ngroup=" ngroup ; + + QUIT " Computational scheme *pwr2010* XREF " . |
