type db
-val set_convert_term:
- (UriManager.uri -> Cic.term -> NCic.term * NCic.obj list) -> unit
-
class type g_status =
object
inherit NCicUnifHint.g_status
class status :
object ('self)
- inherit NCicUnifHint.status
inherit g_status
- method coerc_db: db
+ inherit NCicUnifHint.status
method set_coerc_db: db -> 'self
method set_coercion_status: #g_status -> 'self
end
#status as 'status -> string ->
NCic.term -> NCic.term -> NCic.term -> int -> int -> 'status
- (* gets the old imperative coercion DB (list format) *)
-val index_old_db: CoercDb.coerc_db -> (#status as 'status) -> 'status
-
val look_for_coercion:
#status ->
NCic.metasenv -> NCic.substitution -> NCic.context ->