From c73cee19d6d8aab25d05e7f73389b0d22aa72739 Mon Sep 17 00:00:00 2001
From: Zeno Rogue <zeno@attnam.com>
Date: Mon, 21 Apr 2025 18:54:32 +0200
Subject: [PATCH] acosh_vlamp factored out

---
 hyperpoint.cpp | 6 ++++--
 1 file changed, 4 insertions(+), 2 deletions(-)

diff --git a/hyperpoint.cpp b/hyperpoint.cpp
index d2fee592..781b046d 100644
--- a/hyperpoint.cpp
+++ b/hyperpoint.cpp
@@ -370,10 +370,12 @@ EX ld asin_auto_clamp(ld x) {
     }
   }
 
+EX ld acosh_clamp(ld x) { return x < 1 ? 0 : acosh(x); }
+
 EX ld acos_auto_clamp(ld x) {
   switch(cgclass) {
-    case gcHyperbolic: return x < 1 ? 0 : acosh(x);
-    case gcSL2: return x < 1 ? 0 : acosh(x);
+    case gcHyperbolic: return acosh_clamp(x);
+    case gcSL2: return acosh_clamp(x);
     case gcSphere: return acos_clamp(x);
     case gcProduct: return PIU(acos_auto_clamp(x));
     default: return x;