From 888bf4ed19afb2970a5f449fc285d3ef217baed8 Mon Sep 17 00:00:00 2001
From: Tom Smeding <tom@tomsmeding.com>
Date: Mon, 7 Jul 2025 10:56:35 +0200
Subject: Fix extremum bug in DualNumbers

---
 src/ForwardAD/DualNumbers.hs | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/src/ForwardAD/DualNumbers.hs b/src/ForwardAD/DualNumbers.hs
index 3ab08af..c98b6c0 100644
--- a/src/ForwardAD/DualNumbers.hs
+++ b/src/ForwardAD/DualNumbers.hs
@@ -220,4 +220,4 @@ dfwdDN = \case
                                                   (EFst ext (EVar ext tIxN (IS IZ)))))))
                              (ESnd ext (EVar ext t2 (IS IZ)))
                              (zeroScalarConst t))))
-           (EMaximum1Inner ext (dfwdDN e))
+           (extremum (dfwdDN e))
-- 
cgit v1.2.3-70-g09d2