stuff

2022-04-30 16:18:13 +02:00
parent 2465cf84b7
commit b9ef4bb00e
174 changed files with 20605 additions and 100 deletions
--- a/W1/fasto/tests/negate.fo
+++ b/W1/fasto/tests/negate.fo
@ -0,0 +1,11 @@
+fun bool write_nl(bool b) =
+  let res = write(b) in
+  let tmp = write("\n") in
+  res
+
+fun bool main() =
+  let x0 = write_nl(3 / 2 == 1) in
+  let x1 = write_nl(~3 / 2 == ~2) in
+  let x2 = write_nl(3 /~2 == ~2) in
+  let x3 = write_nl(~3 /~2 == 1) in
+  write_nl(x0 && x1 && x2 && x3)