X-Git-Url: http://matita.cs.unibo.it/gitweb/?a=blobdiff_plain;f=helm%2Fsoftware%2Fcomponents%2Fcic_unification%2FcicRefine.mli;h=924020cbb39f771bc4bdea179240fd6b7e858432;hb=683978a2627cf1ce15673360f26806593d22f7b5;hp=30b264455246890438191bc2a1a0a9757db652fa;hpb=21a10d0abc0636a49f12fc066f91270cec4d63d1;p=helm.git diff --git a/helm/software/components/cic_unification/cicRefine.mli b/helm/software/components/cic_unification/cicRefine.mli index 30b264455..924020cbb 100644 --- a/helm/software/components/cic_unification/cicRefine.mli +++ b/helm/software/components/cic_unification/cicRefine.mli @@ -31,7 +31,7 @@ exception AssertFailure of string Lazy.t;; (* refines [term] and returns the refined form of [term], *) (* its type, the new metasenv and universe graph. *) val type_of_aux': - ?localization_tbl:Token.flocation Cic.CicHash.t -> + ?localization_tbl:Stdpp.location Cic.CicHash.t -> Cic.metasenv -> Cic.context -> Cic.term -> CicUniv.universe_graph -> Cic.term * Cic.term * Cic.metasenv * CicUniv.universe_graph @@ -40,7 +40,7 @@ val type_of_aux': (* the new metasenv and universe graph. *) (* the [uri] is required only for inductive definitions *) val typecheck : - localization_tbl:Token.flocation Cic.CicHash.t -> + localization_tbl:Stdpp.location Cic.CicHash.t -> Cic.metasenv -> UriManager.uri option -> Cic.obj -> Cic.obj * Cic.metasenv * CicUniv.universe_graph