(* Note: one of these U is the inferred type of T *)
lemma aaa_cpm_SO (h) (G) (L) (A):
- â\88\80T. â\9dªG,Lâ\9d« â\8a¢ T â\81\9d A â\86\92 â\88\83U. â\9dªG,Lâ\9d« ⊢ T ➡[h,1] U.
+ â\88\80T. â\9d¨G,Lâ\9d© â\8a¢ T â\81\9d A â\86\92 â\88\83U. â\9d¨G,Lâ\9d© ⊢ T ➡[h,1] U.
#h #G #L #A #T #H elim H -G -L -T -A
[ /3 width=2 by ex_intro/
| * #G #L #V #B #_ * #V0 #HV0