projects
/
Faustine.git
/ blobdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
|
commitdiff
|
tree
raw
|
inline
| side by side
Examples' Makefiles are completed and tested.
[Faustine.git]
/
interpretor
/
beam.ml
diff --git
a/interpretor/beam.ml
b/interpretor/beam.ml
index
6e56170
..
bec7ed0
100644
(file)
--- 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
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 ->
fun (length_max : int) ->
let transpose : 'a array array -> 'a array array =
fun matrix ->