patrick/ray-tracing-fsharp
1
0
Fork 0
mirror of https://github.com/Smaug123/ray-tracing-fsharp synced 2025-10-08 05:18:43 +00:00
Code Issues Packages Projects Releases Wiki Activity

Fix off-by-one

Browse Source
This commit is contained in:
Patrick Stevens
2021-04-03 11:51:56 +01:00
parent ed47d9f9fd
commit 8fc5f3f057
1 changed files with 3 additions and 2 deletions
Download Patch File Download Diff File Expand all files Collapse all files

5
RayTracing/ImageOutput.fs
View File

@@ -29,9 +29,10 @@ module ImageOutput =
match image with
| Image arr ->
for row in arr do
for pixel in row do
writer.Write (PixelOutput.toPpm pixel)
for pixel in 0..row.Length - 2 do
writer.Write (PixelOutput.toPpm row.[pixel])
writer.Write " "
writer.Write (PixelOutput.toPpm row.[row.Length - 1])
writer.Write "\n"
progressIncrement 1.0<progress>
}