X-Git-Url: http://matita.cs.unibo.it/gitweb/?a=blobdiff_plain;f=helm%2Fsoftware%2Fcomponents%2Fng_kernel%2FnCicEnvironment.mli;h=07bd1b51c0e373499034da555569670f128bf4ce;hb=206dd7a0508b73fd3c18747f4997dddc0a12fc3a;hp=20945d08d4479bd5d8fb367458e074a9aafeb623;hpb=085cfc8bc4f775e8879a31c6de35d08aed500332;p=helm.git diff --git a/helm/software/components/ng_kernel/nCicEnvironment.mli b/helm/software/components/ng_kernel/nCicEnvironment.mli index 20945d08d..07bd1b51c 100644 --- a/helm/software/components/ng_kernel/nCicEnvironment.mli +++ b/helm/software/components/ng_kernel/nCicEnvironment.mli @@ -26,6 +26,31 @@ (* NG: minimal wrapper on the old cicEnvironment, should provide only the * functions strictly necessary to the typechecking algorithm *) -val get_checked_obj : NReference.reference -> NCic.obj +val get_checked_obj: NUri.uri -> NCic.obj +val get_obj: NUri.uri -> bool * NCic.obj +val add_obj: NCic.obj -> unit + +val get_checked_def: + NReference.reference -> + NCic.relevance * string * NCic.term * NCic.term * NCic.c_attr * int + +(* the last integer is the index of the inductive type in the reference *) +val get_checked_indtys: + NReference.reference -> + bool * int * NCic.inductiveType list * NCic.i_attr * int + +val get_checked_fixes: + NReference.reference -> + NCic.inductiveFun list * NCic.f_attr * int + +val get_checked_cofixes: + NReference.reference -> + NCic.inductiveFun list * NCic.f_attr * int + +val get_indty_leftno: NReference.reference -> int + +val invalidate: unit -> unit +val load_graph: UriManager.uri -> unit +val get_graph: unit -> CicUniv.universe_graph (* EOF *)