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