*)
val add_obj:
- UriManager.uri -> Cic.obj ->
+ UriManager.uri -> Cic.obj -> UriManager.uri list ->
GrafiteTypes.status -> GrafiteTypes.status
val add_coercion:
- GrafiteTypes.status -> add_composites:bool -> UriManager.uri ->
+ GrafiteTypes.status -> UriManager.uri -> UriManager.uri list ->
GrafiteTypes.status
val time_travel:
GrafiteTypes.status ->
(DisambiguateTypes.domain_item * DisambiguateTypes.codomain_item) list ->
GrafiteTypes.status
+
+ (* also resets the imperative part of the status *)
+val init: unit -> GrafiteTypes.status
+
+