address second regression mentioned in previous commit, where clicked dots are no longer visible (turns out that I removed a line during refactoring which added the triangle stage coordinates to the dot vector)

functional-core/app/app-update.sml

@@ -20,6 +20,8 @@ struct
           SOME (xpos, ypos) =>
             ClickPoints.getDrawDot (xpos, ypos, 1.0, 0.0, 0.0, model)
         | NONE => Vector.fromList []
+      val drawVec = TriangleStage.toVector (model, drawVec)
+      
       val drawMsg = DRAW_DOT drawVec
     in
       (model, DRAW drawMsg)