summaryrefslogtreecommitdiff
path: root/Dragon/data/tdraglib_proc/TCDR49.c2m
diff options
context:
space:
mode:
Diffstat (limited to 'Dragon/data/tdraglib_proc/TCDR49.c2m')
-rw-r--r--Dragon/data/tdraglib_proc/TCDR49.c2m4
1 files changed, 2 insertions, 2 deletions
diff --git a/Dragon/data/tdraglib_proc/TCDR49.c2m b/Dragon/data/tdraglib_proc/TCDR49.c2m
index 9086450..086bc22 100644
--- a/Dragon/data/tdraglib_proc/TCDR49.c2m
+++ b/Dragon/data/tdraglib_proc/TCDR49.c2m
@@ -100,7 +100,7 @@ DISCR := SYBILT: ASSMB ::
LIBRARY2 := USS: LIBRARY DISCR :: EDIT 2 PASS 2 ARM ;
CP := ASM: LIBRARY2 DISCR :: ARM ;
CALC := FLU: CP LIBRARY2 DISCR :: TYPE K B1 SIGS ;
-assertS CALC :: 'K-INFINITY' 1 1.233258 ;
+assertS CALC :: 'K-INFINITY' 1 1.233395 ;
DISCR LIBRARY2 CP CALC := DELETE: DISCR LIBRARY2 CP CALC ;
*----
* Self-Shielding calculation SALT WITH MULTICELL SURFACIC
@@ -118,7 +118,7 @@ DISCR DISCR_FIL := SALT: Fic_SAL ::
LIBRARY2 := USS: LIBRARY DISCR DISCR_FIL :: EDIT 2 PASS 2 ARM ;
CP := ASM: LIBRARY2 DISCR DISCR_FIL :: EDIT 1 ARM ;
CALC := FLU: CP LIBRARY2 DISCR :: TYPE K B1 SIGS ;
-assertS CALC :: 'K-INFINITY' 1 1.232764 ;
+assertS CALC :: 'K-INFINITY' 1 1.232901 ;
ECHO "test TCDR49 completed" ;
END: ;
QUIT "LIST" .