| Step |
Hyp |
Ref |
Expression |
| 1 |
|
simp3 |
|- ( ( K e. NN /\ N e. NN /\ K <_ N ) -> K <_ N ) |
| 2 |
|
nnnn0 |
|- ( K e. NN -> K e. NN0 ) |
| 3 |
|
nnnn0 |
|- ( N e. NN -> N e. NN0 ) |
| 4 |
2 3
|
anim12i |
|- ( ( K e. NN /\ N e. NN ) -> ( K e. NN0 /\ N e. NN0 ) ) |
| 5 |
4
|
3adant3 |
|- ( ( K e. NN /\ N e. NN /\ K <_ N ) -> ( K e. NN0 /\ N e. NN0 ) ) |
| 6 |
|
nn0sub |
|- ( ( K e. NN0 /\ N e. NN0 ) -> ( K <_ N <-> ( N - K ) e. NN0 ) ) |
| 7 |
5 6
|
syl |
|- ( ( K e. NN /\ N e. NN /\ K <_ N ) -> ( K <_ N <-> ( N - K ) e. NN0 ) ) |
| 8 |
1 7
|
mpbid |
|- ( ( K e. NN /\ N e. NN /\ K <_ N ) -> ( N - K ) e. NN0 ) |
| 9 |
|
simp2 |
|- ( ( K e. NN /\ N e. NN /\ K <_ N ) -> N e. NN ) |
| 10 |
|
nngt0 |
|- ( K e. NN -> 0 < K ) |
| 11 |
10
|
3ad2ant1 |
|- ( ( K e. NN /\ N e. NN /\ K <_ N ) -> 0 < K ) |
| 12 |
|
nnre |
|- ( K e. NN -> K e. RR ) |
| 13 |
|
nnre |
|- ( N e. NN -> N e. RR ) |
| 14 |
12 13
|
anim12i |
|- ( ( K e. NN /\ N e. NN ) -> ( K e. RR /\ N e. RR ) ) |
| 15 |
14
|
3adant3 |
|- ( ( K e. NN /\ N e. NN /\ K <_ N ) -> ( K e. RR /\ N e. RR ) ) |
| 16 |
|
ltsubpos |
|- ( ( K e. RR /\ N e. RR ) -> ( 0 < K <-> ( N - K ) < N ) ) |
| 17 |
15 16
|
syl |
|- ( ( K e. NN /\ N e. NN /\ K <_ N ) -> ( 0 < K <-> ( N - K ) < N ) ) |
| 18 |
11 17
|
mpbid |
|- ( ( K e. NN /\ N e. NN /\ K <_ N ) -> ( N - K ) < N ) |
| 19 |
8 9 18
|
3jca |
|- ( ( K e. NN /\ N e. NN /\ K <_ N ) -> ( ( N - K ) e. NN0 /\ N e. NN /\ ( N - K ) < N ) ) |
| 20 |
|
elfz1b |
|- ( K e. ( 1 ... N ) <-> ( K e. NN /\ N e. NN /\ K <_ N ) ) |
| 21 |
|
elfzo0 |
|- ( ( N - K ) e. ( 0 ..^ N ) <-> ( ( N - K ) e. NN0 /\ N e. NN /\ ( N - K ) < N ) ) |
| 22 |
19 20 21
|
3imtr4i |
|- ( K e. ( 1 ... N ) -> ( N - K ) e. ( 0 ..^ N ) ) |