X-Git-Url: https://scm.cri.ensmp.fr/git/Faustine.git/blobdiff_plain/fc2ec49c325b99370170789886b4be4f43e16d68..b8e89a384896a4f8ce3e1990a10c88e7164af55c:/documentation/code_VALValue.v_larger_than_zero.html
diff --git a/documentation/code_VALValue.v_larger_than_zero.html b/documentation/code_VALValue.v_larger_than_zero.html
deleted file mode 100644
index 3564744..0000000
--- a/documentation/code_VALValue.v_larger_than_zero.html
+++ /dev/null
@@ -1,25 +0,0 @@
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-Value.v_larger_than_zero
-
-
-let rec v_larger_than_zero v = match v with
- |N i -> if i > 0 then return_N 1 else return_N 0
- |R f -> if f > 0. then return_N 1 else return_N 0
- |Vec (size, vec) -> make_vector size (fun i -> v_larger_than_zero (vec i))
- |Zero -> return_N 0
- |W -> W
\ No newline at end of file