Metamath Proof Explorer |
< Previous
Next >
Nearby theorems |
||
Mirrors > Home > MPE Home > Th. List > predidm | Structured version Visualization version GIF version |
Description: Idempotent law for the predecessor class. (Contributed by Scott Fenton, 29-Mar-2011.) |
Ref | Expression |
---|---|
predidm | ⊢ Pred(𝑅, Pred(𝑅, 𝐴, 𝑋), 𝑋) = Pred(𝑅, 𝐴, 𝑋) |
Step | Hyp | Ref | Expression |
---|---|---|---|
1 | df-pred 6150 | . 2 ⊢ Pred(𝑅, Pred(𝑅, 𝐴, 𝑋), 𝑋) = (Pred(𝑅, 𝐴, 𝑋) ∩ (◡𝑅 “ {𝑋})) | |
2 | df-pred 6150 | . . . . 5 ⊢ Pred(𝑅, 𝐴, 𝑋) = (𝐴 ∩ (◡𝑅 “ {𝑋})) | |
3 | inidm 4197 | . . . . . 6 ⊢ ((◡𝑅 “ {𝑋}) ∩ (◡𝑅 “ {𝑋})) = (◡𝑅 “ {𝑋}) | |
4 | 3 | ineq2i 4188 | . . . . 5 ⊢ (𝐴 ∩ ((◡𝑅 “ {𝑋}) ∩ (◡𝑅 “ {𝑋}))) = (𝐴 ∩ (◡𝑅 “ {𝑋})) |
5 | 2, 4 | eqtr4i 2849 | . . . 4 ⊢ Pred(𝑅, 𝐴, 𝑋) = (𝐴 ∩ ((◡𝑅 “ {𝑋}) ∩ (◡𝑅 “ {𝑋}))) |
6 | inass 4198 | . . . 4 ⊢ ((𝐴 ∩ (◡𝑅 “ {𝑋})) ∩ (◡𝑅 “ {𝑋})) = (𝐴 ∩ ((◡𝑅 “ {𝑋}) ∩ (◡𝑅 “ {𝑋}))) | |
7 | 5, 6 | eqtr4i 2849 | . . 3 ⊢ Pred(𝑅, 𝐴, 𝑋) = ((𝐴 ∩ (◡𝑅 “ {𝑋})) ∩ (◡𝑅 “ {𝑋})) |
8 | 2 | ineq1i 4187 | . . 3 ⊢ (Pred(𝑅, 𝐴, 𝑋) ∩ (◡𝑅 “ {𝑋})) = ((𝐴 ∩ (◡𝑅 “ {𝑋})) ∩ (◡𝑅 “ {𝑋})) |
9 | 7, 8 | eqtr4i 2849 | . 2 ⊢ Pred(𝑅, 𝐴, 𝑋) = (Pred(𝑅, 𝐴, 𝑋) ∩ (◡𝑅 “ {𝑋})) |
10 | 1, 9 | eqtr4i 2849 | 1 ⊢ Pred(𝑅, Pred(𝑅, 𝐴, 𝑋), 𝑋) = Pred(𝑅, 𝐴, 𝑋) |
Colors of variables: wff setvar class |
Syntax hints: = wceq 1537 ∩ cin 3937 {csn 4569 ◡ccnv 5556 “ cima 5560 Predcpred 6149 |
This theorem was proved from axioms: ax-mp 5 ax-1 6 ax-2 7 ax-3 8 ax-gen 1796 ax-4 1810 ax-5 1911 ax-6 1970 ax-7 2015 ax-8 2116 ax-9 2124 ax-10 2145 ax-11 2161 ax-12 2177 ax-ext 2795 |
This theorem depends on definitions: df-bi 209 df-an 399 df-or 844 df-tru 1540 df-ex 1781 df-nf 1785 df-sb 2070 df-clab 2802 df-cleq 2816 df-clel 2895 df-nfc 2965 df-rab 3149 df-v 3498 df-in 3945 df-pred 6150 |
This theorem is referenced by: (None) |
Copyright terms: Public domain | W3C validator |