ray example

athas · athas · commit d0f8aae89a94 · 2020-01-25T21:04:52.000+01:00
diff --git a/examples/Makefile b/examples/Makefile
@@ -6,7 +6,8 @@ PROGRAMS= \
 	random \
 	primes \
 	msort \
-	dmm
+	dmm \
+	ray
 
 all: $(PROGRAMS)
 
diff --git a/examples/README.md b/examples/README.md
@@ -51,3 +51,13 @@ power-of-two. For example:
 $ make dmm
 $ ./dmm @mpl procs 4 -- -N 1024
 ```
+
+## Ray Tracing
+
+A simple ray tracer that generates MxN images in PPM format.  Use
+`-m`/`-n` for output size, `-s` to select a scene, and `-f` to specific
+the output file.  For example:
+```
+$ make ray
+$ ./ray -f out.ppm -m 400 -n 400 -s irreg
+```
diff --git a/examples/src/ray.mlb b/examples/src/ray.mlb
@@ -0,0 +1,5 @@
+$(SML_LIB)/basis/basis.mlb
+$(SML_LIB)/basis/fork-join.mlb
+
+lib/sources.mlb
+ray.sml
diff --git a/examples/src/ray.sml b/examples/src/ray.sml
