From a21e3ec1d5d16d366b051b3f9084461a05b69b76 Mon Sep 17 00:00:00 2001
From: Kaustubh Maske Patil <37668193+nikochiko@users.noreply.github.com>
Date: Fri, 26 Jan 2024 19:30:40 +0530
Subject: [PATCH] Use ints in examples

---
 examples/donut_with_scale.ml |  2 +-
 examples/rectangle_canvas.ml | 10 +++++-----
 2 files changed, 6 insertions(+), 6 deletions(-)

diff --git a/examples/donut_with_scale.ml b/examples/donut_with_scale.ml
index 8ed4bcb..3cc0f03 100644
--- 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
index 3fedbf5..e9ad105 100644
--- 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" ()