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