begin merging files which were previously in temp-squares directory into main

message-types/draw-msg.sml

@@ -2,12 +2,12 @@ structure DrawMessage =
 struct
   datatype t =
     DRAW_DOT of Real32.real vector
-  | DRAW_TRIANGLES_AND_DOTS of
-      {triangles: Real32.real vector, dots: Real32.real vector}
-  | DRAW_TRIANGLES_AND_RESET_DOTS of Real32.real vector
+  | DRAW_SQUARES_AND_DOTS of
+      {squares: Real32.real vector, dots: Real32.real vector}
+  | DRAW_SQUARES_AND_RESET_DOTS of Real32.real vector
   | DRAW_GRAPH of Real32.real vector
-  | RESIZE_TRIANGLES_DOTS_AND_GRAPH of
-      { triangles: Real32.real vector
+  | RESIZE_SQUARES_DOTS_AND_GRAPH of
+      { squares: Real32.real vector
       , graphLines: Real32.real vector
       , dots: Real32.real vector
       }

message-types/file-msg.sml

@@ -1,9 +1,9 @@
 structure FileMessage =
 struct
   datatype t =
-    SAVE_TRIANGLES of AppType.triangle list
-  | LOAD_TRIANGLES
-  | EXPORT_TRIANGLES of AppType.triangle list
+    SAVE_SQUARES of int vector vector
+  | LOAD_SQUARES
+  | EXPORT_SQUARES of int vector vector
   | LOAD_FILES of string
   | SELECT_PATH of string
 end

message-types/input-msg.sml

@@ -22,8 +22,9 @@ struct
   | ARROW_DOWN
   | KEY_ENTER
   | KEY_SPACE
-  | USE_TRIANGLES of AppType.triangle list
-  | TRIANGLES_LOAD_ERROR
+  | USE_SQUARES of
+      {squares: int vector vector, canvasWidth: int, canvasHeight: int}
+  | SQUARES_LOAD_ERROR
   | FILE_BROWSER_AND_PATH of
       {fileBrowser: AppType.file_browser_item vector, path: string}
 end