From a1979125c6ff539d681b150f3005c1e9d1bfb489 Mon Sep 17 00:00:00 2001
From: Zeno Rogue <zeno@attnam.com>
Date: Sun, 2 Mar 2025 22:02:27 +0100
Subject: [PATCH] added function euscalexx to scale X and Y dims by the same
 value

---
 hyperpoint.cpp | 7 +++++++
 1 file changed, 7 insertions(+)

diff --git a/hyperpoint.cpp b/hyperpoint.cpp
index 84fdf233..0dfdb6ca 100644
--- a/hyperpoint.cpp
+++ b/hyperpoint.cpp
@@ -704,6 +704,13 @@ EX transmatrix euclidean_translate(ld x, ld y, ld z) {
   return T;
   }
 
+EX transmatrix euscalexx(ld x) {
+  transmatrix T = Id;
+  T[0][0] = x;
+  T[1][1] = x;
+  return T;
+  }
+
 EX transmatrix euscale(ld x, ld y) {
   transmatrix T = Id;
   T[0][0] = x;