]> matita.cs.unibo.it Git - helm.git/commit
Ugly solution to the "we proved T that is equivalent to T" problem:
authorClaudio Sacerdoti Coen <claudio.sacerdoticoen@unibo.it>
Thu, 13 Apr 2006 11:17:10 +0000 (11:17 +0000)
committerClaudio Sacerdoti Coen <claudio.sacerdoticoen@unibo.it>
Thu, 13 Apr 2006 11:17:10 +0000 (11:17 +0000)
commit3f00ce2e2e2f2d443e942d86c394200554ba2496
tree7942bb435a14b512f73b68d5f93f46c352e99ea5
parent225f16202d7b5bfa834788544848f783dc7cc781
Ugly solution to the "we proved T that is equivalent to T" problem:
we use pack_coercion (defined into cicRefine) inside doubleTypeInference
(that is well below in the module hierarchy :-(

This is also supposed to be quite expensive (since pack_coercion uses
the refiner and coercion packing is applied to every expected/synthesized
type).
components/cic_acic/doubleTypeInference.ml
components/cic_acic/doubleTypeInference.mli
components/cic_unification/cicRefine.ml
components/cic_unification/cicRefine.mli