Metamath Proof Explorer


Theorem metakunt34

Description: D is a permutation. (Contributed by metakunt, 18-Jul-2024)

Ref Expression
Hypotheses metakunt34.1 φ M
metakunt34.2 φ I
metakunt34.3 φ I M
metakunt34.4 D = w 1 M if w = I w if w < I w + M I + if I w + M - I 1 0 w - I + if I w I 1 0
Assertion metakunt34 φ D : 1 M 1-1 onto 1 M

Proof

Step Hyp Ref Expression
1 metakunt34.1 φ M
2 metakunt34.2 φ I
3 metakunt34.3 φ I M
4 metakunt34.4 D = w 1 M if w = I w if w < I w + M I + if I w + M - I 1 0 w - I + if I w I 1 0
5 eqid x 1 M if x = I M if x < I x x 1 = x 1 M if x = I M if x < I x x 1
6 eqid z 1 M if z = M I if z < I z z + 1 = z 1 M if z = M I if z < I z z + 1
7 1 2 3 5 6 metakunt14 φ x 1 M if x = I M if x < I x x 1 : 1 M 1-1 onto 1 M x 1 M if x = I M if x < I x x 1 -1 = z 1 M if z = M I if z < I z z + 1
8 7 simpld φ x 1 M if x = I M if x < I x x 1 : 1 M 1-1 onto 1 M
9 f1ocnv x 1 M if x = I M if x < I x x 1 : 1 M 1-1 onto 1 M x 1 M if x = I M if x < I x x 1 -1 : 1 M 1-1 onto 1 M
10 8 9 syl φ x 1 M if x = I M if x < I x x 1 -1 : 1 M 1-1 onto 1 M
11 7 simprd φ x 1 M if x = I M if x < I x x 1 -1 = z 1 M if z = M I if z < I z z + 1
12 11 f1oeq1d φ x 1 M if x = I M if x < I x x 1 -1 : 1 M 1-1 onto 1 M z 1 M if z = M I if z < I z z + 1 : 1 M 1-1 onto 1 M
13 10 12 mpbid φ z 1 M if z = M I if z < I z z + 1 : 1 M 1-1 onto 1 M
14 eqid y 1 M if y = M M if y < I y + M - I y + 1 - I = y 1 M if y = M M if y < I y + M - I y + 1 - I
15 1 2 3 14 metakunt25 φ y 1 M if y = M M if y < I y + M - I y + 1 - I : 1 M 1-1 onto 1 M
16 f1oco y 1 M if y = M M if y < I y + M - I y + 1 - I : 1 M 1-1 onto 1 M x 1 M if x = I M if x < I x x 1 : 1 M 1-1 onto 1 M y 1 M if y = M M if y < I y + M - I y + 1 - I x 1 M if x = I M if x < I x x 1 : 1 M 1-1 onto 1 M
17 15 8 16 syl2anc φ y 1 M if y = M M if y < I y + M - I y + 1 - I x 1 M if x = I M if x < I x x 1 : 1 M 1-1 onto 1 M
18 f1oco z 1 M if z = M I if z < I z z + 1 : 1 M 1-1 onto 1 M y 1 M if y = M M if y < I y + M - I y + 1 - I x 1 M if x = I M if x < I x x 1 : 1 M 1-1 onto 1 M z 1 M if z = M I if z < I z z + 1 y 1 M if y = M M if y < I y + M - I y + 1 - I x 1 M if x = I M if x < I x x 1 : 1 M 1-1 onto 1 M
19 13 17 18 syl2anc φ z 1 M if z = M I if z < I z z + 1 y 1 M if y = M M if y < I y + M - I y + 1 - I x 1 M if x = I M if x < I x x 1 : 1 M 1-1 onto 1 M
20 1 2 3 5 14 6 4 metakunt33 φ z 1 M if z = M I if z < I z z + 1 y 1 M if y = M M if y < I y + M - I y + 1 - I x 1 M if x = I M if x < I x x 1 = D
21 20 f1oeq1d φ z 1 M if z = M I if z < I z z + 1 y 1 M if y = M M if y < I y + M - I y + 1 - I x 1 M if x = I M if x < I x x 1 : 1 M 1-1 onto 1 M D : 1 M 1-1 onto 1 M
22 19 21 mpbid φ D : 1 M 1-1 onto 1 M