changeset 79167 | 4fb0723dc5fc |
parent 79114 | 686b7b14d041 |
child 79175 | 04dfecb9343a |
--- a/src/Pure/Proof/extraction.ML Thu Dec 07 10:40:59 2023 +0100 +++ b/src/Pure/Proof/extraction.ML Thu Dec 07 10:46:49 2023 +0100 @@ -567,7 +567,7 @@ in ( if T = nullT then AbsP ("R", SOME (app_rlz_rews Ts vs (rlz $ nullt $ prop)), - Proofterm.prf_subst_bounds [nullt] corr_prf) + Proofterm.subst_bounds [nullt] corr_prf) else Abst (s, SOME T, AbsP ("R", SOME (app_rlz_rews (T :: Ts) vs (rlz $ Bound 0 $ incr_boundvars 1 prop)), corr_prf)), defs')