From 7dfcc480ba1e19bd3232349fc733caef94034292 Mon Sep 17 00:00:00 2001
From: stainer_t <thomas.stainer@oecd-nea.org>
Date: Mon, 8 Sep 2025 13:48:49 +0200
Subject: Initial commit from Polytechnique Montreal

---
 Skin++/data/pwr2010.c2m | 19 +++++++++++++++++++
 1 file changed, 19 insertions(+)
 create mode 100755 Skin++/data/pwr2010.c2m

(limited to 'Skin++/data/pwr2010.c2m')

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 " .
-- 
cgit v1.2.3