Metamath Proof Explorer


Theorem isirred2

Description: Expand out the class difference from isirred . (Contributed by Mario Carneiro, 4-Dec-2014)

Ref Expression
Hypotheses isirred2.1 ⊢ B = Base R
isirred2.2 ⊢ U = Unit ⁡ R
isirred2.3 ⊢ I = Irred ⁡ R
isirred2.4 ⊢ · ˙ = ⋅ R
Assertion isirred2 ⊢ X ∈ I ↔ X ∈ B ∧ ¬ X ∈ U ∧ ∀ x ∈ B ∀ y ∈ B x · ˙ y = X → x ∈ U ∨ y ∈ U

Proof

Step Hyp Ref Expression
1 isirred2.1 ⊢ B = Base R
2 isirred2.2 ⊢ U = Unit ⁡ R
3 isirred2.3 ⊢ I = Irred ⁡ R
4 isirred2.4 ⊢ · ˙ = ⋅ R
5 eldif ⊢ X ∈ B ∖ U ↔ X ∈ B ∧ ¬ X ∈ U
6 eldif ⊢ x ∈ B ∖ U ↔ x ∈ B ∧ ¬ x ∈ U
7 eldif ⊢ y ∈ B ∖ U ↔ y ∈ B ∧ ¬ y ∈ U
8 6 7 anbi12i ⊢ x ∈ B ∖ U ∧ y ∈ B ∖ U ↔ x ∈ B ∧ ¬ x ∈ U ∧ y ∈ B ∧ ¬ y ∈ U
9 an4 ⊢ x ∈ B ∧ ¬ x ∈ U ∧ y ∈ B ∧ ¬ y ∈ U ↔ x ∈ B ∧ y ∈ B ∧ ¬ x ∈ U ∧ ¬ y ∈ U
10 8 9 bitri ⊢ x ∈ B ∖ U ∧ y ∈ B ∖ U ↔ x ∈ B ∧ y ∈ B ∧ ¬ x ∈ U ∧ ¬ y ∈ U
11 10 imbi1i ⊢ x ∈ B ∖ U ∧ y ∈ B ∖ U → x · ˙ y ≠ X ↔ x ∈ B ∧ y ∈ B ∧ ¬ x ∈ U ∧ ¬ y ∈ U → x · ˙ y ≠ X
12 impexp ⊢ x ∈ B ∧ y ∈ B ∧ ¬ x ∈ U ∧ ¬ y ∈ U → x · ˙ y ≠ X ↔ x ∈ B ∧ y ∈ B → ¬ x ∈ U ∧ ¬ y ∈ U → x · ˙ y ≠ X
13 pm4.56 ⊢ ¬ x ∈ U ∧ ¬ y ∈ U ↔ ¬ x ∈ U ∨ y ∈ U
14 df-ne ⊢ x · ˙ y ≠ X ↔ ¬ x · ˙ y = X
15 13 14 imbi12i ⊢ ¬ x ∈ U ∧ ¬ y ∈ U → x · ˙ y ≠ X ↔ ¬ x ∈ U ∨ y ∈ U → ¬ x · ˙ y = X
16 con34b ⊢ x · ˙ y = X → x ∈ U ∨ y ∈ U ↔ ¬ x ∈ U ∨ y ∈ U → ¬ x · ˙ y = X
17 15 16 bitr4i ⊢ ¬ x ∈ U ∧ ¬ y ∈ U → x · ˙ y ≠ X ↔ x · ˙ y = X → x ∈ U ∨ y ∈ U
18 17 imbi2i ⊢ x ∈ B ∧ y ∈ B → ¬ x ∈ U ∧ ¬ y ∈ U → x · ˙ y ≠ X ↔ x ∈ B ∧ y ∈ B → x · ˙ y = X → x ∈ U ∨ y ∈ U
19 12 18 bitri ⊢ x ∈ B ∧ y ∈ B ∧ ¬ x ∈ U ∧ ¬ y ∈ U → x · ˙ y ≠ X ↔ x ∈ B ∧ y ∈ B → x · ˙ y = X → x ∈ U ∨ y ∈ U
20 11 19 bitri ⊢ x ∈ B ∖ U ∧ y ∈ B ∖ U → x · ˙ y ≠ X ↔ x ∈ B ∧ y ∈ B → x · ˙ y = X → x ∈ U ∨ y ∈ U
21 20 2albii ⊢ ∀ x ∀ y x ∈ B ∖ U ∧ y ∈ B ∖ U → x · ˙ y ≠ X ↔ ∀ x ∀ y x ∈ B ∧ y ∈ B → x · ˙ y = X → x ∈ U ∨ y ∈ U
22 r2al ⊢ ∀ x ∈ B ∖ U ∀ y ∈ B ∖ U x · ˙ y ≠ X ↔ ∀ x ∀ y x ∈ B ∖ U ∧ y ∈ B ∖ U → x · ˙ y ≠ X
23 r2al ⊢ ∀ x ∈ B ∀ y ∈ B x · ˙ y = X → x ∈ U ∨ y ∈ U ↔ ∀ x ∀ y x ∈ B ∧ y ∈ B → x · ˙ y = X → x ∈ U ∨ y ∈ U
24 21 22 23 3bitr4i ⊢ ∀ x ∈ B ∖ U ∀ y ∈ B ∖ U x · ˙ y ≠ X ↔ ∀ x ∈ B ∀ y ∈ B x · ˙ y = X → x ∈ U ∨ y ∈ U
25 5 24 anbi12i ⊢ X ∈ B ∖ U ∧ ∀ x ∈ B ∖ U ∀ y ∈ B ∖ U x · ˙ y ≠ X ↔ X ∈ B ∧ ¬ X ∈ U ∧ ∀ x ∈ B ∀ y ∈ B x · ˙ y = X → x ∈ U ∨ y ∈ U
26 eqid ⊢ B ∖ U = B ∖ U
27 1 2 3 26 4 isirred ⊢ X ∈ I ↔ X ∈ B ∖ U ∧ ∀ x ∈ B ∖ U ∀ y ∈ B ∖ U x · ˙ y ≠ X
28 df-3an ⊢ X ∈ B ∧ ¬ X ∈ U ∧ ∀ x ∈ B ∀ y ∈ B x · ˙ y = X → x ∈ U ∨ y ∈ U ↔ X ∈ B ∧ ¬ X ∈ U ∧ ∀ x ∈ B ∀ y ∈ B x · ˙ y = X → x ∈ U ∨ y ∈ U
29 25 27 28 3bitr4i ⊢ X ∈ I ↔ X ∈ B ∧ ¬ X ∈ U ∧ ∀ x ∈ B ∀ y ∈ B x · ˙ y = X → x ∈ U ∨ y ∈ U