done refactoring functional core (mostly); next, need to move folders in temp-squares directory into main

temp-squares/fcore/click-points.sml

@@ -21,10 +21,8 @@ struct
           val curPos = Vector.sub (clickPoints, idx)
           val nextPos = Vector.sub (clickPoints, nextIdx)
         in
-          if mousePos >= curPos andalso mousePos <= nextPos then
-            SOME idx
-          else
-            getClickPos (clickPoints, mousePos, idx + 1)
+          if mousePos >= curPos andalso mousePos <= nextPos then SOME idx
+          else getClickPos (clickPoints, mousePos, idx + 1)
         end
     end