From f3879f97211a25d60f68638b29b6a6d42bfecc01 Mon Sep 17 00:00:00 2001
From: Wiarda <wiardada@ornl.gov>
Date: Tue, 2 Jun 2020 17:49:46 -0400
Subject: [PATCH] Set a variable to 0 to ensure it is set
---
sammy/src/ssm/mssm07.f90 | 2 ++
1 file changed, 2 insertions(+)
diff --git a/sammy/src/ssm/mssm07.f90 b/sammy/src/ssm/mssm07.f90
index 34f1c106c..e07f36e3c 100644
--- a/sammy/src/ssm/mssm07.f90
+++ b/sammy/src/ssm/mssm07.f90
@@ -59,6 +59,8 @@ module ssm_7_m
call grid%initialize()
call grid%setParameters(numcro, ktzero)
call grid%setToAuxGrid(expData)
+
+ Not_Quad = 0
!
!
CALL Zero2_2 (A, Sumw, Yyy1xx, Yyy2xx, Yyy2xq, Y2aaaa, Y2aaaq, Nx)
--
GitLab