structure ClickPoints = struct fun generate (start, finish, numPoints) = let val difference = finish - start val increment = Real32.fromInt difference / Real32.fromInt numPoints val start = Real32.fromInt start in Vector.tabulate (numPoints + 1, fn idx => (Real32.fromInt idx * increment) + start) end end