From bd7171d346ad4f079aa89b2d9fdd6a56aa0a3b1c Mon Sep 17 00:00:00 2001 From: HEBERT Alain Date: Tue, 23 Dec 2025 11:34:01 -0500 Subject: Resolve "Depreciate use of Version 4 and 5.0 Draglibs" --- Dragon/data/tdraglib_proc/TCDR49.c2m | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) (limited to 'Dragon/data/tdraglib_proc/TCDR49.c2m') 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" . -- cgit v1.2.3