From 0c6c855e2e6537891c2fe656348c574d90d9a14b Mon Sep 17 00:00:00 2001 From: Skip Kahler Date: Thu, 3 Aug 2023 10:43:23 -0400 Subject: [PATCH] Update endf.f90 Defining a default value for iverf. --- src/endf.f90 | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/src/endf.f90 b/src/endf.f90 index 620c3f5b..5371d930 100644 --- a/src/endf.f90 +++ b/src/endf.f90 @@ -17,7 +17,7 @@ module endf !--Public variables integer,public::npage=306 - integer,public::iverf + integer,public::iverf=-1 real(kr),public::c1h,c2h integer,public::l1h,l2h,n1h,n2h,math,mfh,mth,nsh,nsp,nsc real(kr),public::thr6