From 09d6f275e58c204c3ed716077dafb53d199d07dc Mon Sep 17 00:00:00 2001
From: prod2 <prod2@norlang.art>
Date: Fri, 13 Jan 2023 21:29:54 +0100
Subject: [PATCH] fix //

---
 Program.fs | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/Program.fs b/Program.fs
index 23a8b17..fcbe71f 100644
--- a/Program.fs
+++ b/Program.fs
@@ -230,7 +230,7 @@ let applyOp op left right =
     | Star, Number x, Number y -> Number (x * y)
     | Slash, Number x, Number y -> Number (x / y)
     | Percent, Number x, Number y -> Number (x % y)
-    | SlashSlash, Number x, Number y -> Number (floor x / y)
+    | SlashSlash, Number x, Number y -> Number (floor (x / y))
     | Caret, Number x, Number y -> Number (x ** y)
     | _, Fail _, _ -> left
     | _, _, Fail _ -> right