in
if real then do_it obj else
let newuri = discharge_uri style uri in
- let _lemmas = LS.add_obj GE.refinement_toolkit newuri obj in
+ let _lemmas = LS.add_obj ~pack_coercion_obj:CicRefine.pack_coercion_obj newuri obj in
do_it obj
with
| TC.TypeCheckerFailure s ->