X-Git-Url: http://matita.cs.unibo.it/gitweb/?a=blobdiff_plain;f=helm%2Fsoftware%2Fcomponents%2Fng_kernel%2FnCicEnvironment.mli;h=07bd1b51c0e373499034da555569670f128bf4ce;hb=c87ca87169e38a22e7bf7a347238597500964285;hp=76519843950daf401345169620af4e157b64dc83;hpb=05e05dd130ec57395615de286ee50c6729d226ac;p=helm.git diff --git a/helm/software/components/ng_kernel/nCicEnvironment.mli b/helm/software/components/ng_kernel/nCicEnvironment.mli index 765198439..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 : NUri.uri -> 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 *)