Use ints in examples

Sudha247 · Jan 26, 2024 · a21e3ec · a21e3ec
1 parent 49de3b7
commit a21e3ec
Show file tree

Hide file tree

Showing 2 changed files with 6 additions and 6 deletions.
diff --git a/examples/donut_with_scale.ml b/examples/donut_with_scale.ml
@@ -2,7 +2,7 @@ open Joy
 
 let () =
   init ();
-  let c = circle 100. in
+  let c = circle 100 in
   let hole = scale 0.5 c in
   show [ c; hole ];
   write ~filename:"donut_with_scale.png" ()
diff --git a/examples/rectangle_canvas.ml b/examples/rectangle_canvas.ml
@@ -1,9 +1,9 @@
 open Joy
 
 let () =
-  init ~size:(500., 300.) ();
-  background (1., 1., 1., 1.);
-  let c = circle 50. in
-  set_color (0., 0., 0.);
+  init ~size:(500, 300) ();
+  background (255, 255, 255, 255);
+  let c = circle 50 in
+  set_color (0, 0, 0);
   show [ c ];
-  write ~filename:"rectangular_canvas.png" ()
+  write ~filename:"rectangle_canvas.png" ()