X-Git-Url: https://scm.cri.ensmp.fr/git/Faustine.git/blobdiff_plain/fc2ec49c325b99370170789886b4be4f43e16d68..b8e89a384896a4f8ce3e1990a10c88e7164af55c:/documentation/code_VALFaustexp.subtree.html diff --git a/documentation/code_VALFaustexp.subtree.html b/documentation/code_VALFaustexp.subtree.html deleted file mode 100644 index 8a83436..0000000 --- a/documentation/code_VALFaustexp.subtree.html +++ /dev/null @@ -1,25 +0,0 @@ - - - - - - - - - - - - - - - - -Faustexp.subtree - - -let subtree = fun d_tree -> fun i ->
-  match d_tree with
-  | End d -> raise (Beam_Matching_Error "Subtree left absent.")
-  | Tree (d, branches) -> (
-      match branches with 
-        (left, right) -> if i = 0 then left else right)
\ No newline at end of file