From 54f95655057db5d123729e65f2205dfc3629a542 Mon Sep 17 00:00:00 2001
From: Christian Glusa <caglusa@sandia.gov>
Date: Tue, 27 Nov 2018 13:38:35 -0700
Subject: [PATCH] Belos SingleRedIter: Fix type bug

Don't compare complex to double.
---
 packages/belos/src/BelosCGSingleRedIter.hpp | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/packages/belos/src/BelosCGSingleRedIter.hpp b/packages/belos/src/BelosCGSingleRedIter.hpp
index 8f77c5e2b002..09a81a09ec44 100644
--- a/packages/belos/src/BelosCGSingleRedIter.hpp
+++ b/packages/belos/src/BelosCGSingleRedIter.hpp
@@ -429,7 +429,7 @@ class CGSingleRedIter : virtual public CGIteration<ScalarType,MV,OP> {
     MVT::MvTransMv( one, *S_, *Z_, sHz );
     rHz = sHz(0,0);
     delta = sHz(1,0);
-    if ((delta < Teuchos::ScalarTraits<ScalarType>::eps()) &&
+    if ((Teuchos::ScalarTraits<ScalarType>::magnitude(delta) < Teuchos::ScalarTraits<ScalarType>::eps()) &&
         (stest_->checkStatus(this) == Passed))
       return;
     alpha = rHz / delta;