aboutsummaryrefslogtreecommitdiff
path: root/src/ForwardAD/DualNumbers.hs
diff options
context:
space:
mode:
authorTom Smeding <tom@tomsmeding.com>2025-07-07 10:56:35 +0200
committerTom Smeding <tom@tomsmeding.com>2025-07-07 10:56:35 +0200
commit888bf4ed19afb2970a5f449fc285d3ef217baed8 (patch)
tree2ade0abb03f817b9d4617d26620dcb6f8d973647 /src/ForwardAD/DualNumbers.hs
parent699c62fd44bdef9d6ffa608fd4e6f7a880a75e61 (diff)
Fix extremum bug in DualNumbersHEADmaster
Diffstat (limited to 'src/ForwardAD/DualNumbers.hs')
-rw-r--r--src/ForwardAD/DualNumbers.hs2
1 files changed, 1 insertions, 1 deletions
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))