allow width and height to have a different number of click points

2025-02-18 11:53:28 +00:00
parent 68cbf59f04
commit 78905b59f0
9 changed files with 129 additions and 75 deletions
--- a/imperative-shell/constants.sml
+++ b/imperative-shell/constants.sml
@@ -2,7 +2,8 @@ structure Constants =
 struct
  val windowWidth = 1000
  val windowHeight = 900
-  val initialNumClickPoints = 15
+  val initialWidthClickPoints = 16
+  val initialHeightClickPoints = 20

  val graphVertexShaderString =
    "#version 300 es\n\