X-Git-Url: http://matita.cs.unibo.it/gitweb/?a=blobdiff_plain;ds=sidebyside;f=matita%2Fcomponents%2Fng_refiner%2FnCicCoercion.mli;h=d85484a2a4d02959f2451bea524972c56b5fc152;hb=a675ecc0a27920e2ce7d7058506f259a5c06dede;hp=ff6b439974c12f5dfc7b0eea9942629da09d9b93;hpb=2c01ff6094173915e7023076ea48b5804dca7778;p=helm.git diff --git a/matita/components/ng_refiner/nCicCoercion.mli b/matita/components/ng_refiner/nCicCoercion.mli index ff6b43997..d85484a2a 100644 --- a/matita/components/ng_refiner/nCicCoercion.mli +++ b/matita/components/ng_refiner/nCicCoercion.mli @@ -13,9 +13,6 @@ 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 @@ -24,9 +21,8 @@ class type 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 @@ -40,9 +36,6 @@ val index_coercion: #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 ->