Metamath Proof Explorer


Theorem pfxccatin12lem1

Description: Lemma 1 for pfxccatin12 . (Contributed by AV, 30-Mar-2018) (Revised by AV, 9-May-2020)

Ref Expression
Assertion pfxccatin12lem1 ⊢ M ∈ 0 … L ∧ N ∈ L … X → K ∈ 0 ..^ N − M ∧ ¬ K ∈ 0 ..^ L − M → K − L − M ∈ 0 ..^ N − L

Proof

Step Hyp Ref Expression
1 elfz2 ⊢ M ∈ 0 … L ↔ 0 ∈ ℤ ∧ L ∈ ℤ ∧ M ∈ ℤ ∧ 0 ≤ M ∧ M ≤ L
2 zsubcl ⊢ L ∈ ℤ ∧ M ∈ ℤ → L − M ∈ ℤ
3 2 3adant1 ⊢ 0 ∈ ℤ ∧ L ∈ ℤ ∧ M ∈ ℤ → L − M ∈ ℤ
4 3 adantr ⊢ 0 ∈ ℤ ∧ L ∈ ℤ ∧ M ∈ ℤ ∧ 0 ≤ M ∧ M ≤ L → L − M ∈ ℤ
5 1 4 sylbi ⊢ M ∈ 0 … L → L − M ∈ ℤ
6 5 adantr ⊢ M ∈ 0 … L ∧ N ∈ L … X → L − M ∈ ℤ
7 elfzonelfzo ⊢ L − M ∈ ℤ → K ∈ 0 ..^ N − M ∧ ¬ K ∈ 0 ..^ L − M → K ∈ L − M ..^ N − M
8 6 7 syl ⊢ M ∈ 0 … L ∧ N ∈ L … X → K ∈ 0 ..^ N − M ∧ ¬ K ∈ 0 ..^ L − M → K ∈ L − M ..^ N − M
9 elfz2nn0 ⊢ M ∈ 0 … L ↔ M ∈ ℕ 0 ∧ L ∈ ℕ 0 ∧ M ≤ L
10 nn0cn ⊢ M ∈ ℕ 0 → M ∈ ℂ
11 nn0cn ⊢ L ∈ ℕ 0 → L ∈ ℂ
12 elfzelz ⊢ N ∈ L … X → N ∈ ℤ
13 zcn ⊢ N ∈ ℤ → N ∈ ℂ
14 subcl ⊢ L ∈ ℂ ∧ M ∈ ℂ → L − M ∈ ℂ
15 14 ancoms ⊢ M ∈ ℂ ∧ L ∈ ℂ → L − M ∈ ℂ
16 15 addridd ⊢ M ∈ ℂ ∧ L ∈ ℂ → L - M + 0 = L − M
17 16 eqcomd ⊢ M ∈ ℂ ∧ L ∈ ℂ → L − M = L - M + 0
18 17 adantl ⊢ N ∈ ℂ ∧ M ∈ ℂ ∧ L ∈ ℂ → L − M = L - M + 0
19 simprr ⊢ N ∈ ℂ ∧ M ∈ ℂ ∧ L ∈ ℂ → L ∈ ℂ
20 simpl ⊢ M ∈ ℂ ∧ L ∈ ℂ → M ∈ ℂ
21 20 adantl ⊢ N ∈ ℂ ∧ M ∈ ℂ ∧ L ∈ ℂ → M ∈ ℂ
22 simpl ⊢ N ∈ ℂ ∧ M ∈ ℂ ∧ L ∈ ℂ → N ∈ ℂ
23 19 21 22 npncan3d ⊢ N ∈ ℂ ∧ M ∈ ℂ ∧ L ∈ ℂ → L − M + N - L = N − M
24 23 eqcomd ⊢ N ∈ ℂ ∧ M ∈ ℂ ∧ L ∈ ℂ → N − M = L − M + N - L
25 18 24 oveq12d ⊢ N ∈ ℂ ∧ M ∈ ℂ ∧ L ∈ ℂ → L − M ..^ N − M = L - M + 0 ..^ L − M + N - L
26 25 ex ⊢ N ∈ ℂ → M ∈ ℂ ∧ L ∈ ℂ → L − M ..^ N − M = L - M + 0 ..^ L − M + N - L
27 12 13 26 3syl ⊢ N ∈ L … X → M ∈ ℂ ∧ L ∈ ℂ → L − M ..^ N − M = L - M + 0 ..^ L − M + N - L
28 27 com12 ⊢ M ∈ ℂ ∧ L ∈ ℂ → N ∈ L … X → L − M ..^ N − M = L - M + 0 ..^ L − M + N - L
29 10 11 28 syl2an ⊢ M ∈ ℕ 0 ∧ L ∈ ℕ 0 → N ∈ L … X → L − M ..^ N − M = L - M + 0 ..^ L − M + N - L
30 29 3adant3 ⊢ M ∈ ℕ 0 ∧ L ∈ ℕ 0 ∧ M ≤ L → N ∈ L … X → L − M ..^ N − M = L - M + 0 ..^ L − M + N - L
31 9 30 sylbi ⊢ M ∈ 0 … L → N ∈ L … X → L − M ..^ N − M = L - M + 0 ..^ L − M + N - L
32 31 imp ⊢ M ∈ 0 … L ∧ N ∈ L … X → L − M ..^ N − M = L - M + 0 ..^ L − M + N - L
33 32 eleq2d ⊢ M ∈ 0 … L ∧ N ∈ L … X → K ∈ L − M ..^ N − M ↔ K ∈ L - M + 0 ..^ L − M + N - L
34 33 biimpa ⊢ M ∈ 0 … L ∧ N ∈ L … X ∧ K ∈ L − M ..^ N − M → K ∈ L - M + 0 ..^ L − M + N - L
35 0zd ⊢ M ∈ 0 … L ∧ N ∈ L … X → 0 ∈ ℤ
36 elfz2 ⊢ N ∈ L … X ↔ L ∈ ℤ ∧ X ∈ ℤ ∧ N ∈ ℤ ∧ L ≤ N ∧ N ≤ X
37 zsubcl ⊢ N ∈ ℤ ∧ L ∈ ℤ → N − L ∈ ℤ
38 37 ancoms ⊢ L ∈ ℤ ∧ N ∈ ℤ → N − L ∈ ℤ
39 38 3adant2 ⊢ L ∈ ℤ ∧ X ∈ ℤ ∧ N ∈ ℤ → N − L ∈ ℤ
40 39 adantr ⊢ L ∈ ℤ ∧ X ∈ ℤ ∧ N ∈ ℤ ∧ L ≤ N ∧ N ≤ X → N − L ∈ ℤ
41 36 40 sylbi ⊢ N ∈ L … X → N − L ∈ ℤ
42 41 adantl ⊢ M ∈ 0 … L ∧ N ∈ L … X → N − L ∈ ℤ
43 6 35 42 3jca ⊢ M ∈ 0 … L ∧ N ∈ L … X → L − M ∈ ℤ ∧ 0 ∈ ℤ ∧ N − L ∈ ℤ
44 43 adantr ⊢ M ∈ 0 … L ∧ N ∈ L … X ∧ K ∈ L − M ..^ N − M → L − M ∈ ℤ ∧ 0 ∈ ℤ ∧ N − L ∈ ℤ
45 fzosubel2 ⊢ K ∈ L - M + 0 ..^ L − M + N - L ∧ L − M ∈ ℤ ∧ 0 ∈ ℤ ∧ N − L ∈ ℤ → K − L − M ∈ 0 ..^ N − L
46 34 44 45 syl2anc ⊢ M ∈ 0 … L ∧ N ∈ L … X ∧ K ∈ L − M ..^ N − M → K − L − M ∈ 0 ..^ N − L
47 46 ex ⊢ M ∈ 0 … L ∧ N ∈ L … X → K ∈ L − M ..^ N − M → K − L − M ∈ 0 ..^ N − L
48 8 47 syld ⊢ M ∈ 0 … L ∧ N ∈ L … X → K ∈ 0 ..^ N − M ∧ ¬ K ∈ 0 ..^ L − M → K − L − M ∈ 0 ..^ N − L