From bcdc8bb11944563e5492fd244bfcc7e7a023507d Mon Sep 17 00:00:00 2001
From: =?UTF-8?q?B=C3=A5rd=20Skaflestad?= <Bard.Skaflestad@sintef.no>
Date: Thu, 30 Apr 2020 17:48:08 +0200
Subject: [PATCH] Table Output: Revise TOLCRIT Interpretation

This commit switches the previous interpretation of notionally zero
relative permeability in Flow's .INIT-file output.  We now treat all
relative permeability values less than *or equal to* TOLCRIT as
zero.

This change is for increased ECLIPSE compatibility.
---
 src/opm/output/eclipse/Tables.cpp | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/src/opm/output/eclipse/Tables.cpp b/src/opm/output/eclipse/Tables.cpp
index dca0d4633..b83c6c497 100644
--- a/src/opm/output/eclipse/Tables.cpp
+++ b/src/opm/output/eclipse/Tables.cpp
@@ -232,7 +232,7 @@ namespace { namespace SatFunc {
             std::transform(begin, end, dest,
                 [tolcrit](const double kr) -> double
             {
-                return (kr < tolcrit) ? 0.0 : kr;
+                return (kr > tolcrit) ? kr : 0.0;
             });
         }