Fixes to how arities are assigned and propagated

[fireball-separation.git] / ocaml / num.mli

diff --git a/ocaml/num.mli b/ocaml/num.mli
index e06a8211f7a99c9d52cbe34bb0751189a1f9954b..c981cff265d6caef63438ef3c806be7ff87513a0 100644 (file)
--- a/ocaml/num.mli
+++ b/ocaml/num.mli
@@ -38,7 +38,7 @@ val mk_app : nf -> nf -> nf
 val mk_appl : nf -> nf list -> nf
 val mk_appx : nf -> nf Listx.listx -> nf
 val mk_match : nf i_num_var_ -> var -> int -> (int * nf) list ref -> nf list -> nf
-val subst : bool -> int -> nf -> nf -> nf
+val subst : bool -> bool -> int -> nf -> nf -> nf
 val parse' : string list -> nf list * string list
 val eta_compare : nf -> nf -> int
 val eta_eq : [< nf ] -> [< nf ] -> bool