(* Basic_1: uses: ty3_repellent *)
theorem nta_abst_repellent (h) (a) (p) (G) (K):
∀W,T,U1. ⦃G,K⦄ ⊢ ⓛ{p}W.T :[h,a] U1 →
- â\88\80U2. â¦\83G,K.â\93\9bWâ¦\84 â\8a¢ T :[h,a] U2 â\86\92 â¬\86*[1] U1 ≘ U2 → ⊥.
+ â\88\80U2. â¦\83G,K.â\93\9bWâ¦\84 â\8a¢ T :[h,a] U2 â\86\92 â\87§*[1] U1 ≘ U2 → ⊥.
#h #a #p #G #K #W #T #U1 #H1 #U2 #H2 #HU12
elim (nta_fwd_aaa … H2) -H2 #A2 #H2T #H2U2
elim (nta_fwd_aaa … H1) -H1 #X1 #H1 #HU1