arithmetics for λδ

[helm.git] / matitaB / components / ng_cic_content / interpretations.mli

diff --git a/matitaB/components/ng_cic_content/interpretations.mli b/matitaB/components/ng_cic_content/interpretations.mli
index b2c59b9c9b63e04ca2faa8af3dcb0e723525d250..122096799c83f90a8bc98f5725c0a00b02194dce 100644 (file)
--- a/matitaB/components/ng_cic_content/interpretations.mli
+++ b/matitaB/components/ng_cic_content/interpretations.mli
@@ -37,6 +37,7 @@ class type g_status =
   end
 
 class virtual status :
+  string option ->
   object ('self)
     inherit g_status
     inherit NCicCoercion.status
@@ -92,6 +93,4 @@ val nmap_sequent:
    NotationPt.sequent 
 
 val nmap_obj:
- #status -> NCic.obj ->
-  NotationPt.term Content.cobj *
-   (Content.id, NReference.reference) Hashtbl.t    (* id -> reference *)
+ #status -> NCic.obj -> NotationPt.term NotationPt.obj