X-Git-Url: http://matita.cs.unibo.it/gitweb/?a=blobdiff_plain;f=helm%2Focaml%2Fcic_proof_checking%2FcicReduction.mli;h=e3619053d0d2163add738b5ebe8039f0cc9b1fbe;hb=4167cea65ca58897d1a3dbb81ff95de5074700cc;hp=cd48a025b9b86937fa6f79e2ee4b25e26d103ac4;hpb=5530db2f72548a8c579ae5f9868cbd38290eb065;p=helm.git

diff --git a/helm/ocaml/cic_proof_checking/cicReduction.mli b/helm/ocaml/cic_proof_checking/cicReduction.mli
index cd48a025b..e3619053d 100644
--- a/helm/ocaml/cic_proof_checking/cicReduction.mli
+++ b/helm/ocaml/cic_proof_checking/cicReduction.mli
@@ -38,3 +38,5 @@ val are_convertible :
 val normalize:
   ?delta:bool -> ?subst:Cic.substitution -> Cic.context -> Cic.term -> Cic.term
  
+(* performs an head beta/cast reduction *)
+val head_beta_reduce: Cic.term -> Cic.term