From 7b7069980bebada734bbc0b0172d984a6c95128c Mon Sep 17 00:00:00 2001
From: Peter Hill <zed.three@gmail.com>
Date: Wed, 5 Jun 2019 10:47:56 +0100
Subject: [PATCH] Use quiet comparison when converting from double to float

---
 libsrc4/nc4var.c | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/libsrc4/nc4var.c b/libsrc4/nc4var.c
index 9aaef2e17..39728a457 100644
--- a/libsrc4/nc4var.c
+++ b/libsrc4/nc4var.c
@@ -1212,7 +1212,7 @@ nc4_convert_type(const void *src, void *dest, const nc_type src_type,
         case NC_FLOAT:
             for (dp = (double *)src, fp = dest; count < len; count++)
             {
-                if (*dp > X_FLOAT_MAX || *dp < X_FLOAT_MIN)
+                if (isgreater(*dp, X_FLOAT_MAX) || isless(*dp, X_FLOAT_MIN))
                     (*range_error)++;
                 *fp++ = *dp++;
             }