add graph lines to refactored version

2025-07-06 02:15:16 +01:00
parent 79be94bcbd
commit 441e5fdd69
3 changed files with 148 additions and 1 deletions
--- a/temp-squares/app-with.sml
+++ b/temp-squares/app-with.sml
@@ -110,7 +110,7 @@ struct
      }
    end

-  fun arrowX (app, arrowY) =
+  fun arrowY (app, arrowY) =
    let
      val
        { mode