X-Git-Url: https://svn.cri.ensmp.fr/git/Faustine.git/blobdiff_plain/d204fe8a60e0556b0294e17c5c6948cb6cee7d91..f1f94803668061f90a5ce88bf06ee72bba8e41a5:/interpretor/beam.ml diff --git a/interpretor/beam.ml b/interpretor/beam.ml index 6e56170..bec7ed0 100644 --- a/interpretor/beam.ml +++ b/interpretor/beam.ml @@ -70,7 +70,7 @@ class beam : signal_type array -> beam_type = let signal_at = fun (t : time) -> fun (s : signal_type) -> s#at t in Array.map (signal_at t) self#get - method output : int -> float array array array = + method output : int -> data = fun (length_max : int) -> let transpose : 'a array array -> 'a array array = fun matrix ->