X-Git-Url: https://scm.cri.ensmp.fr/git/Faustine.git/blobdiff_plain/fc2ec49c325b99370170789886b4be4f43e16d68..b8e89a384896a4f8ce3e1990a10c88e7164af55c:/documentation/code_VALSignal.signal_append.html diff --git a/documentation/code_VALSignal.signal_append.html b/documentation/code_VALSignal.signal_append.html deleted file mode 100644 index 619e304..0000000 --- a/documentation/code_VALSignal.signal_append.html +++ /dev/null @@ -1,31 +0,0 @@ - - - - - - - - - - - - - - - - -Signal.signal_append - - -let signal_append s1 s2 = 
-        let f = signal_check_frequency s1 s2 in
-        let new_signal = fun t -> 
-                let temp1 = (signal_fun s1) t in
-                let temp2 = (signal_fun s2) t in
-                match (temp1, temp2) with
-                |(Vec (size1, vec1), Vec (size2, vec2)) ->
-                        let new_vec = fun i -> if i < size1 then vec1 i else vec2 (i - size1) in
-                        make_vector (size1 + size2) new_vec
-                |-> raise (Signal_operation "Append: input signals should be vectors.")
-        in
-        (f, new_signal)
\ No newline at end of file