X-Git-Url: http://matita.cs.unibo.it/gitweb/?a=blobdiff_plain;f=matitaB%2Fcomponents%2Fng_kernel%2FnCicUtils.mli;h=91bc2fe759f2c548fc1d6e7b4a891b2db14746ba;hb=ae3e8f274a39b9ce5b551163f7fd76f3b8b4ed58;hp=6697e31b5fd402ecbeefd671ff1db47f0d74c576;hpb=cacbe3c6493ddce76c4c13379ade271d8dd172e8;p=helm.git

diff --git a/matitaB/components/ng_kernel/nCicUtils.mli b/matitaB/components/ng_kernel/nCicUtils.mli
index 6697e31b5..91bc2fe75 100644
--- a/matitaB/components/ng_kernel/nCicUtils.mli
+++ b/matitaB/components/ng_kernel/nCicUtils.mli
@@ -25,9 +25,10 @@ val fold:
   (NCic.hypothesis -> 'k -> 'k) -> 'k ->
   ('k -> 'a -> NCic.term -> 'a) -> 'a -> NCic.term -> 'a
 val map:
- #NCic.status ->
+ ?hbr:bool ->
+ #NCicEnvironment.status ->
  (NCic.hypothesis -> 'k -> 'k) -> 'k ->
  ('k -> NCic.term -> NCic.term) -> NCic.term -> NCic.term
 
-val set_head_beta_reduce: (NCic.status -> upto:int -> NCic.term -> NCic.term) -> unit
+val set_head_beta_reduce: (NCicEnvironment.status -> upto:int -> NCic.term -> NCic.term) -> unit