---

Step * 1 1 2 of Lemma interior-angles-unique


1. e : EuclideanPlane
2. p : Point
3. a : Point
4. b : Point
5. c : Point
6. d : Point
7. b' : Point
8. c' : Point
9. a # bc
10. out(b dc)
11. out(a bp)
12. out(a cc')
13. B(ppc')
14. p # c'
15. bad < bac
16. bap ≅a bad
17. a # p
18. b # p
19. b' ≡ p
⊢ ¬((¬B(adp)) ∧ (¬B(apd)))
BY
{ (InstLemma `angle-cong-preserves-zero-angle` [⌜e⌝;⌜p⌝;⌜a⌝;⌜d⌝;⌜p⌝;⌜a⌝;⌜p⌝]⋅ THEN EAuto 1) }

1
.....antecedent..... 
1. e : EuclideanPlane
2. p : Point
3. a : Point
4. b : Point
5. c : Point
6. d : Point
7. b' : Point
8. c' : Point
9. a # bc
10. out(b dc)
11. out(a bp)
12. out(a cc')
13. B(ppc')
14. p # c'
15. bad < bac
16. bap ≅a bad
17. a # p
18. b # p
19. b' ≡ p
⊢ pad ≅a pap

2
1. e : EuclideanPlane
2. p : Point
3. a : Point
4. b : Point
5. c : Point
6. d : Point
7. b' : Point
8. c' : Point
9. a # bc
10. out(b dc)
11. out(a bp)
12. out(a cc')
13. B(ppc')
14. p # c'
15. bad < bac
16. bap ≅a bad
17. a # p
18. b # p
19. b' ≡ p
20. out(a pd)
⊢ ¬((¬B(adp)) ∧ (¬B(apd)))

---

Latex:

---

Latex:

1.  e  :  EuclideanPlane
2.  p  :  Point
3.  a  :  Point
4.  b  :  Point
5.  c  :  Point
6.  d  :  Point
7.  b'  :  Point
8.  c'  :  Point
9.  a  \#  bc
10.  out(b  dc)
11.  out(a  bp)
12.  out(a  cc')
13.  B(ppc')
14.  p  \#  c'
15.  bad  <  bac
16.  bap  \mcong{}\msuba{}  bad
17.  a  \#  p
18.  b  \#  p
19.  b'  \mequiv{}  p
\mvdash{}  \mneg{}((\mneg{}B(adp))  \mwedge{}  (\mneg{}B(apd)))


By

---

Latex:
(InstLemma  `angle-cong-preserves-zero-angle`  [\mkleeneopen{}e\mkleeneclose{};\mkleeneopen{}p\mkleeneclose{};\mkleeneopen{}a\mkleeneclose{};\mkleeneopen{}d\mkleeneclose{};\mkleeneopen{}p\mkleeneclose{};\mkleeneopen{}a\mkleeneclose{};\mkleeneopen{}p\mkleeneclose{}]\mcdot{}  THEN  EAuto  1)

---

Home Index