Proof of Theorem grpidval
| Step | Hyp | Ref
| Expression |
| 1 | | fveq2 3835 |
. . . 4
⊢ (G = if(G ∈ Grp, G, { ∅,
∅ , ∅ }) → (Id
‘G) = (Id ‘ if(G ∈ Grp, G, { ∅, ∅ , ∅ }))) |
| 2 | | rneq 3426 |
. . . . . . 7
⊢ (G = if(G ∈ Grp, G, { ∅,
∅ , ∅ }) → ran G = ran if(G
∈ Grp, G,
{ ∅, ∅ , ∅ })) |
| 3 | | rabeq 1855 |
. . . . . . 7
⊢ (ran G = ran if(G
∈ Grp, G,
{ ∅, ∅ , ∅ }) → {u ∈ ran G∣∀x ∈ ran G(uGx) = x} = {u ∈ ran if(G
∈ Grp, G,
{ ∅, ∅ , ∅ })∣∀x ∈ ran G(uGx) = x}) |
| 4 | 2, 3 | syl 10 |
. . . . . 6
⊢ (G = if(G ∈ Grp, G, { ∅,
∅ , ∅ }) → {u ∈ ran G∣∀x ∈ ran G(uGx) = x} = {u ∈ ran if(G
∈ Grp, G,
{ ∅, ∅ , ∅ })∣∀x ∈ ran G(uGx) = x}) |
| 5 | | opreq 4025 |
. . . . . . . . 9
⊢ (G = if(G ∈ Grp, G, { ∅,
∅ , ∅ }) → (uGx) = (u
if(G ∈
Grp, G, { ∅, ∅ , ∅ })x)) |
| 6 | 5 | eqeq1d 1526 |
. . . . . . . 8
⊢ (G = if(G ∈ Grp, G, { ∅,
∅ , ∅ }) → ((uGx) = x ↔
(u if(G
∈ Grp, G,
{ ∅, ∅ , ∅ })x) = x)) |
| 7 | 2, 6 | raleq12d 1840 |
. . . . . . 7
⊢ (G = if(G ∈ Grp, G, { ∅,
∅ , ∅ }) → (∀x ∈ ran G(uGx) = x ↔ ∀x ∈ ran if(G
∈ Grp, G,
{ ∅, ∅ , ∅ })(u if(G ∈ Grp, G, { ∅, ∅ , ∅ })x) = x)) |
| 8 | 7 | rabbisdv 1853 |
. . . . . 6
⊢ (G = if(G ∈ Grp, G, { ∅,
∅ , ∅ }) → {u ∈ ran
if(G ∈
Grp, G, { ∅, ∅ , ∅ })∣∀x ∈ ran G(uGx) = x} = {u ∈ ran if(G
∈ Grp, G,
{ ∅, ∅ , ∅ })∣∀x ∈ ran if(G
∈ Grp, G,
{ ∅, ∅ , ∅ })(u if(G ∈ Grp, G, { ∅, ∅ , ∅ })x) = x}) |
| 9 | 4, 8 | eqtrd 1550 |
. . . . 5
⊢ (G = if(G ∈ Grp, G, { ∅,
∅ , ∅ }) → {u ∈ ran G∣∀x ∈ ran G(uGx) = x} = {u ∈ ran if(G
∈ Grp, G,
{ ∅, ∅ , ∅ })∣∀x ∈ ran if(G
∈ Grp, G,
{ ∅, ∅ , ∅ })(u if(G ∈ Grp, G, { ∅, ∅ , ∅ })x) = x}) |
| 10 | 9 | unieqd 2578 |
. . . 4
⊢ (G = if(G ∈ Grp, G, { ∅,
∅ , ∅ }) → ∪{u ∈ ran G∣∀x ∈ ran G(uGx) = x} = ∪{u ∈ ran
if(G ∈
Grp, G, { ∅, ∅ , ∅ })∣∀x ∈ ran
if(G ∈
Grp, G, { ∅, ∅ , ∅ })(u if(G ∈ Grp, G, { ∅,
∅ , ∅ })x) = x}) |
| 11 | 1, 10 | eqeq12d 1532 |
. . 3
⊢ (G = if(G ∈ Grp, G, { ∅,
∅ , ∅ }) → ((Id
‘G) = ∪{u ∈ ran G∣∀x ∈ ran G(uGx) = x} ↔ (Id ‘ if(G ∈ Grp, G, { ∅, ∅ , ∅ })) = ∪{u ∈ ran if(G
∈ Grp, G,
{ ∅, ∅ , ∅ })∣∀x ∈ ran if(G
∈ Grp, G,
{ ∅, ∅ , ∅ })(u if(G ∈ Grp, G, { ∅, ∅ , ∅ })x) = x})) |
| 12 | | grpidval.2 |
. . . 4
⊢ U = (Id ‘G) |
| 13 | | grpidval.1 |
. . . . . . 7
⊢ X = ran G |
| 14 | | rabeq 1855 |
. . . . . . 7
⊢ (X = ran G →
{u ∈
X∣∀x ∈ X (uGx) = x} =
{u ∈ ran
G∣∀x ∈ X (uGx) = x}) |
| 15 | 13, 14 | ax-mp 7 |
. . . . . 6
⊢ {u ∈ X∣∀x ∈ X (uGx) = x} =
{u ∈ ran
G∣∀x ∈ X (uGx) = x} |
| 16 | | raleq1 1832 |
. . . . . . . . 9
⊢ (X = ran G →
(∀x
∈ X
(uGx) = x ↔ ∀x ∈ ran G(uGx) = x)) |
| 17 | 13, 16 | ax-mp 7 |
. . . . . . . 8
⊢ (∀x ∈ X (uGx) = x ↔
∀x
∈ ran G(uGx) = x) |
| 18 | 17 | a1i 8 |
. . . . . . 7
⊢ (u ∈ ran G → (∀x ∈ X (uGx) = x ↔
∀x
∈ ran G(uGx) = x)) |
| 19 | 18 | rabbii 1851 |
. . . . . 6
⊢ {u ∈ ran G∣∀x ∈ X (uGx) = x} =
{u ∈ ran
G∣∀x ∈ ran G(uGx) = x} |
| 20 | 15, 19 | eqtri 1538 |
. . . . 5
⊢ {u ∈ X∣∀x ∈ X (uGx) = x} =
{u ∈ ran
G∣∀x ∈ ran G(uGx) = x} |
| 21 | 20 | unieqi 2577 |
. . . 4
⊢ ∪{u ∈ X∣∀x ∈ X (uGx) = x} = ∪{u ∈ ran G∣∀x ∈ ran G(uGx) = x} |
| 22 | 12, 21 | eqeq12i 1531 |
. . 3
⊢ (U = ∪{u ∈ X∣∀x ∈ X (uGx) = x} ↔
(Id ‘G) = ∪{u ∈ ran G∣∀x ∈ ran G(uGx) = x}) |
| 23 | 11, 22 | syl5bb 535 |
. 2
⊢ (G = if(G ∈ Grp, G, { ∅,
∅ , ∅ }) → (U = ∪{u ∈ X∣∀x ∈ X (uGx) = x} ↔
(Id ‘ if(G ∈ Grp, G, { ∅,
∅ , ∅ })) = ∪{u ∈ ran if(G
∈ Grp, G,
{ ∅, ∅ , ∅ })∣∀x ∈ ran if(G
∈ Grp, G,
{ ∅, ∅ , ∅ })(u if(G ∈ Grp, G, { ∅, ∅ , ∅ })x) = x})) |
| 24 | | df-gid 8250 |
. . . 4
⊢ Id = { g, y ∣y = ∪{u ∈ ran g∣∀x ∈ ran g((ugx) = x ⋀ (xgu) = x)}} |
| 25 | 24 | fveq1i 3836 |
. . 3
⊢ (Id ‘ if(G ∈ Grp, G, { ∅, ∅ , ∅ })) = ({ g, y ∣y = ∪{u ∈ ran g∣∀x ∈ ran g((ugx) = x ⋀ (xgu) = x)}}
‘ if(G ∈ Grp, G, { ∅,
∅ , ∅ })) |
| 26 | | elisset 1863 |
. . . . . . . . 9
⊢ (G ∈ Grp →
G ∈
V) |
| 27 | 26 | ancli 294 |
. . . . . . . 8
⊢ (G ∈ Grp →
(G ∈ Grp
⋀ G
∈ V)) |
| 28 | 27 | con3i 98 |
. . . . . . 7
⊢ (¬ (G ∈ Grp ⋀ G ∈ V) → ¬ G ∈ Grp) |
| 29 | | snex 2826 |
. . . . . . 7
⊢ { ∅, ∅ , ∅ } ∈ V |
| 30 | 28, 29 | jctir 291 |
. . . . . 6
⊢ (¬ (G ∈ Grp ⋀ G ∈ V) → (¬ G ∈ Grp ⋀ { ∅, ∅ , ∅ } ∈ V)) |
| 31 | 30 | orri 229 |
. . . . 5
⊢ ((G ∈ Grp ⋀ G ∈ V) ⋁
(¬ G ∈ Grp ⋀ { ∅,
∅ , ∅ } ∈ V)) |
| 32 | | ifel 2433 |
. . . . 5
⊢ ( if(G ∈ Grp, G, { ∅, ∅ , ∅ }) ∈ V ↔ ((G ∈ Grp ⋀ G ∈ V) ⋁
(¬ G ∈ Grp ⋀ { ∅,
∅ , ∅ } ∈ V))) |
| 33 | 31, 32 | mpbir 188 |
. . . 4
⊢ if(G ∈ Grp, G, { ∅, ∅ , ∅ }) ∈ V |
| 34 | 33 | rnex 3448 |
. . . . . 6
⊢ ran if(G ∈ Grp, G, { ∅, ∅ , ∅ }) ∈ V |
| 35 | 34 | rabex 2799 |
. . . . 5
⊢ {u ∈ ran
if(G ∈
Grp, G, { ∅, ∅ , ∅ })∣∀x ∈ ran
if(G ∈
Grp, G, { ∅, ∅ , ∅ })(u if(G ∈ Grp, G, { ∅,
∅ , ∅ })x) = x} ∈ V |
| 36 | 35 | uniex 3093 |
. . . 4
⊢ ∪{u ∈ ran if(G
∈ Grp, G,
{ ∅, ∅ , ∅ })∣∀x ∈ ran if(G
∈ Grp, G,
{ ∅, ∅ , ∅ })(u if(G ∈ Grp, G, { ∅, ∅ , ∅ })x) = x} ∈ V |
| 37 | | rneq 3426 |
. . . . . . . 8
⊢ (g = if(G ∈ Grp, G, { ∅,
∅ , ∅ }) → ran g = ran if(G
∈ Grp, G,
{ ∅, ∅ , ∅ })) |
| 38 | | rabeq 1855 |
. . . . . . . 8
⊢ (ran g = ran if(G
∈ Grp, G,
{ ∅, ∅ , ∅ }) → {u ∈ ran g∣∀x ∈ ran g((ugx) = x ⋀ (xgu) = x)} =
{u ∈ ran
if(G ∈
Grp, G, { ∅, ∅ , ∅ })∣∀x ∈ ran g((ugx) = x ⋀ (xgu) = x)}) |
| 39 | 37, 38 | syl 10 |
. . . . . . 7
⊢ (g = if(G ∈ Grp, G, { ∅,
∅ , ∅ }) → {u ∈ ran g∣∀x ∈ ran g((ugx) = x ⋀ (xgu) = x)} =
{u ∈ ran
if(G ∈
Grp, G, { ∅, ∅ , ∅ })∣∀x ∈ ran g((ugx) = x ⋀ (xgu) = x)}) |
| 40 | | opreq 4025 |
. . . . . . . . . . 11
⊢ (g = if(G ∈ Grp, G, { ∅,
∅ , ∅ }) → (ugx) = (u
if(G ∈
Grp, G, { ∅, ∅ , ∅ })x)) |
| 41 | 40 | eqeq1d 1526 |
. . . . . . . . . 10
⊢ (g = if(G ∈ Grp, G, { ∅,
∅ , ∅ }) → ((ugx) = x ↔
(u if(G
∈ Grp, G,
{ ∅, ∅ , ∅ })x) = x)) |
| 42 | | opreq 4025 |
. . . . . . . . . . 11
⊢ (g = if(G ∈ Grp, G, { ∅,
∅ , ∅ }) → (xgu) = (x
if(G ∈
Grp, G, { ∅, ∅ , ∅ })u)) |
| 43 | 42 | eqeq1d 1526 |
. . . . . . . . . 10
⊢ (g = if(G ∈ Grp, G, { ∅,
∅ , ∅ }) → ((xgu) = x ↔
(x if(G
∈ Grp, G,
{ ∅, ∅ , ∅ })u) = x)) |
| 44 | 41, 43 | anbi12d 631 |
. . . . . . . . 9
⊢ (g = if(G ∈ Grp, G, { ∅,
∅ , ∅ }) → (((ugx) = x ⋀ (xgu) = x) ↔ ((u
if(G ∈
Grp, G, { ∅, ∅ , ∅ })x) = x ⋀ (x
if(G ∈
Grp, G, { ∅, ∅ , ∅ })u) = x))) |
| 45 | 37, 44 | raleq12d 1840 |
. . . . . . . 8
⊢ (g = if(G ∈ Grp, G, { ∅,
∅ , ∅ }) → (∀x ∈ ran g((ugx) = x ⋀ (xgu) = x) ↔
∀x
∈ ran if(G ∈ Grp, G, { ∅, ∅ , ∅ })((u if(G ∈ Grp, G, { ∅,
∅ , ∅ })x) = x ⋀ (x
if(G ∈
Grp, G, { ∅, ∅ , ∅ })u) = x))) |
| 46 | 45 | rabbisdv 1853 |
. . . . . . 7
⊢ (g = if(G ∈ Grp, G, { ∅,
∅ , ∅ }) → {u ∈ ran
if(G ∈
Grp, G, { ∅, ∅ , ∅ })∣∀x ∈ ran g((ugx) = x ⋀ (xgu) = x)} =
{u ∈ ran
if(G ∈
Grp, G, { ∅, ∅ , ∅ })∣∀x ∈ ran
if(G ∈
Grp, G, { ∅, ∅ , ∅ })((u if(G ∈ Grp, G, { ∅,
∅ , ∅ })x) = x ⋀ (x
if(G ∈
Grp, G, { ∅, ∅ , ∅ })u) = x)}) |
| 47 | 39, 46 | eqtrd 1550 |
. . . . . 6
⊢ (g = if(G ∈ Grp, G, { ∅,
∅ , ∅ }) → {u ∈ ran g∣∀x ∈ ran g((ugx) = x ⋀ (xgu) = x)} =
{u ∈ ran
if(G ∈
Grp, G, { ∅, ∅ , ∅ })∣∀x ∈ ran
if(G ∈
Grp, G, { ∅, ∅ , ∅ })((u if(G ∈ Grp, G, { ∅,
∅ , ∅ })x) = x ⋀ (x
if(G ∈
Grp, G, { ∅, ∅ , ∅ })u) = x)}) |
| 48 | 47 | unieqd 2578 |
. . . . 5
⊢ (g = if(G ∈ Grp, G, { ∅,
∅ , ∅ }) → ∪{u ∈ ran g∣∀x ∈ ran g((ugx) = x ⋀ (xgu) = x)} = ∪{u ∈ ran if(G
∈ Grp, G,
{ ∅, ∅ , ∅ })∣∀x ∈ ran if(G
∈ Grp, G,
{ ∅, ∅ , ∅ })((u if(G ∈ Grp, G, { ∅, ∅ , ∅ })x) = x ⋀ (x
if(G ∈
Grp, G, { ∅, ∅ , ∅ })u) = x)}) |
| 49 | | 0ex 2785 |
. . . . . . . 8
⊢ ∅ ∈
V |
| 50 | 49 | grpsn 8273 |
. . . . . . 7
⊢ { ∅, ∅ , ∅ } ∈ Grp |
| 51 | 50 | elimel 2451 |
. . . . . 6
⊢ if(G ∈ Grp, G, { ∅, ∅ , ∅ }) ∈ Grp |
| 52 | | eqid 1518 |
. . . . . . 7
⊢ ran if(G ∈ Grp, G, { ∅, ∅ , ∅ }) = ran if(G ∈ Grp, G, { ∅, ∅ , ∅ }) |
| 53 | 52 | grprlidrid 8270 |
. . . . . 6
⊢ ( if(G ∈ Grp, G, { ∅, ∅ , ∅ }) ∈ Grp → ∪{u ∈ ran
if(G ∈
Grp, G, { ∅, ∅ , ∅ })∣∀x ∈ ran
if(G ∈
Grp, G, { ∅, ∅ , ∅ })((u if(G ∈ Grp, G, { ∅,
∅ , ∅ })x) = x ⋀ (x
if(G ∈
Grp, G, { ∅, ∅ , ∅ })u) = x)} = ∪{u ∈ ran if(G
∈ Grp, G,
{ ∅, ∅ , ∅ })∣∀x ∈ ran if(G
∈ Grp, G,
{ ∅, ∅ , ∅ })(u if(G ∈ Grp, G, { ∅, ∅ , ∅ })x) = x}) |
| 54 | 51, 53 | ax-mp 7 |
. . . . 5
⊢ ∪{u ∈ ran if(G
∈ Grp, G,
{ ∅, ∅ , ∅ })∣∀x ∈ ran if(G
∈ Grp, G,
{ ∅, ∅ , ∅ })((u if(G ∈ Grp, G, { ∅, ∅ , ∅ })x) = x ⋀ (x
if(G ∈
Grp, G, { ∅, ∅ , ∅ })u) = x)} = ∪{u ∈ ran if(G
∈ Grp, G,
{ ∅, ∅ , ∅ })∣∀x ∈ ran if(G
∈ Grp, G,
{ ∅, ∅ , ∅ })(u if(G ∈ Grp, G, { ∅, ∅ , ∅ })x) = x} |
| 55 | 48, 54 | syl6eq 1566 |
. . . 4
⊢ (g = if(G ∈ Grp, G, { ∅,
∅ , ∅ }) → ∪{u ∈ ran g∣∀x ∈ ran g((ugx) = x ⋀ (xgu) = x)} = ∪{u ∈ ran if(G
∈ Grp, G,
{ ∅, ∅ , ∅ })∣∀x ∈ ran if(G
∈ Grp, G,
{ ∅, ∅ , ∅ })(u if(G ∈ Grp, G, { ∅, ∅ , ∅ })x) = x}) |
| 56 | 33, 36, 55 | fvopab 3901 |
. . 3
⊢ ({ g,
y ∣y = ∪{u ∈ ran g∣∀x ∈ ran g((ugx) = x ⋀ (xgu) = x)}}
‘ if(G ∈ Grp, G, { ∅,
∅ , ∅ })) = ∪{u ∈ ran if(G
∈ Grp, G,
{ ∅, ∅ , ∅ })∣∀x ∈ ran if(G
∈ Grp, G,
{ ∅, ∅ , ∅ })(u if(G ∈ Grp, G, { ∅, ∅ , ∅ })x) = x} |
| 57 | 25, 56 | eqtri 1538 |
. 2
⊢ (Id ‘ if(G ∈ Grp, G, { ∅, ∅ , ∅ })) = ∪{u ∈ ran if(G
∈ Grp, G,
{ ∅, ∅ , ∅ })∣∀x ∈ ran if(G
∈ Grp, G,
{ ∅, ∅ , ∅ })(u if(G ∈ Grp, G, { ∅, ∅ , ∅ })x) = x} |
| 58 | 23, 57 | dedth 2437 |
1
⊢ (G ∈ Grp →
U = ∪{u ∈ X∣∀x ∈ X (uGx) = x}) |