X-Git-Url: https://svn.cri.ensmp.fr/git/Faustine.git/blobdiff_plain/8c48d01c4b78dba6159c13438b06cb7e07a1f338..e4c4706aa217ba2c8fca216860764ad5ef7d740a:/interpretor/signal.ml

diff --git a/interpretor/signal.ml b/interpretor/signal.ml
index 2dd9f73..a32923e 100644
--- a/interpretor/signal.ml
+++ b/interpretor/signal.ml
@@ -90,6 +90,8 @@ class signal : int -> (time -> value_type) -> signal_type =
 	method _mod = self#prim2 (fun t -> (self#at t)#_mod)
 	method larger = self#prim2 (fun t -> (self#at t)#larger)
 	method smaller = self#prim2 (fun t -> (self#at t)#smaller)
+	method max = self#prim2 (fun t -> (self#at t)#max)
+	method min = self#prim2 (fun t -> (self#at t)#min)
 
 	method delay : signal_type -> signal_type =
 	  fun (s : signal_type) ->