X-Git-Url: http://matita.cs.unibo.it/gitweb/?a=blobdiff_plain;ds=sidebyside;f=helm%2Fsoftware%2Fcomponents%2Fng_kernel%2FnCicReduction.mli;h=ba32fe15dd18f2cb38c6af0dc055fae94d72bbe5;hb=235d5cc96af46d0406bdd28222f56b3ee2bf827e;hp=1455abd8d05cd52c60afb0b99e378a0ed27a71fa;hpb=0542386e10041791982e7240f281299677b1997b;p=helm.git

diff --git a/helm/software/components/ng_kernel/nCicReduction.mli b/helm/software/components/ng_kernel/nCicReduction.mli
index 1455abd8d..ba32fe15d 100644
--- a/helm/software/components/ng_kernel/nCicReduction.mli
+++ b/helm/software/components/ng_kernel/nCicReduction.mli
@@ -47,3 +47,8 @@ val unwind : machine -> NCic.term
 val split_prods:
  subst:NCic.substitution -> NCic.context -> int -> NCic.term ->
   NCic.context * NCic.term
+
+(* to be used outside the kernel *)
+val alpha_eq:
+ NCic.metasenv -> NCic.substitution ->
+  NCic.context -> NCic.term -> NCic.term -> bool