Users' Mathboxes Mathbox for Thierry Arnoux < Previous   Next >
Nearby theorems
Mirrors  >  Home  >  MPE Home  >  Th. List  >   Mathboxes  >  smatrcl Structured version   Visualization version   GIF version

Theorem smatrcl 30676
Description: Closure of the rectangular submatrix. (Contributed by Thierry Arnoux, 19-Aug-2020.)
Hypotheses
Ref Expression
smat.s 𝑆 = (𝐾(subMat1‘𝐴)𝐿)
smat.m (𝜑𝑀 ∈ ℕ)
smat.n (𝜑𝑁 ∈ ℕ)
smat.k (𝜑𝐾 ∈ (1...𝑀))
smat.l (𝜑𝐿 ∈ (1...𝑁))
smat.a (𝜑𝐴 ∈ (𝐵𝑚 ((1...𝑀) × (1...𝑁))))
Assertion
Ref Expression
smatrcl (𝜑𝑆 ∈ (𝐵𝑚 ((1...(𝑀 − 1)) × (1...(𝑁 − 1)))))

Proof of Theorem smatrcl
Dummy variables 𝑖 𝑗 𝑥 are mutually distinct and distinct from all other variables.
StepHypRef Expression
1 smat.a . . . . . . . 8 (𝜑𝐴 ∈ (𝐵𝑚 ((1...𝑀) × (1...𝑁))))
2 elmapi 8278 . . . . . . . 8 (𝐴 ∈ (𝐵𝑚 ((1...𝑀) × (1...𝑁))) → 𝐴:((1...𝑀) × (1...𝑁))⟶𝐵)
3 ffun 6385 . . . . . . . 8 (𝐴:((1...𝑀) × (1...𝑁))⟶𝐵 → Fun 𝐴)
41, 2, 33syl 18 . . . . . . 7 (𝜑 → Fun 𝐴)
5 eqid 2795 . . . . . . . . 9 (𝑖 ∈ ℕ, 𝑗 ∈ ℕ ↦ ⟨if(𝑖 < 𝐾, 𝑖, (𝑖 + 1)), if(𝑗 < 𝐿, 𝑗, (𝑗 + 1))⟩) = (𝑖 ∈ ℕ, 𝑗 ∈ ℕ ↦ ⟨if(𝑖 < 𝐾, 𝑖, (𝑖 + 1)), if(𝑗 < 𝐿, 𝑗, (𝑗 + 1))⟩)
65mpofun 7132 . . . . . . . 8 Fun (𝑖 ∈ ℕ, 𝑗 ∈ ℕ ↦ ⟨if(𝑖 < 𝐾, 𝑖, (𝑖 + 1)), if(𝑗 < 𝐿, 𝑗, (𝑗 + 1))⟩)
76a1i 11 . . . . . . 7 (𝜑 → Fun (𝑖 ∈ ℕ, 𝑗 ∈ ℕ ↦ ⟨if(𝑖 < 𝐾, 𝑖, (𝑖 + 1)), if(𝑗 < 𝐿, 𝑗, (𝑗 + 1))⟩))
8 funco 6265 . . . . . . 7 ((Fun 𝐴 ∧ Fun (𝑖 ∈ ℕ, 𝑗 ∈ ℕ ↦ ⟨if(𝑖 < 𝐾, 𝑖, (𝑖 + 1)), if(𝑗 < 𝐿, 𝑗, (𝑗 + 1))⟩)) → Fun (𝐴 ∘ (𝑖 ∈ ℕ, 𝑗 ∈ ℕ ↦ ⟨if(𝑖 < 𝐾, 𝑖, (𝑖 + 1)), if(𝑗 < 𝐿, 𝑗, (𝑗 + 1))⟩)))
94, 7, 8syl2anc 584 . . . . . 6 (𝜑 → Fun (𝐴 ∘ (𝑖 ∈ ℕ, 𝑗 ∈ ℕ ↦ ⟨if(𝑖 < 𝐾, 𝑖, (𝑖 + 1)), if(𝑗 < 𝐿, 𝑗, (𝑗 + 1))⟩)))
10 smat.s . . . . . . . 8 𝑆 = (𝐾(subMat1‘𝐴)𝐿)
11 fz1ssnn 12788 . . . . . . . . . 10 (1...𝑀) ⊆ ℕ
12 smat.k . . . . . . . . . 10 (𝜑𝐾 ∈ (1...𝑀))
1311, 12sseldi 3887 . . . . . . . . 9 (𝜑𝐾 ∈ ℕ)
14 fz1ssnn 12788 . . . . . . . . . 10 (1...𝑁) ⊆ ℕ
15 smat.l . . . . . . . . . 10 (𝜑𝐿 ∈ (1...𝑁))
1614, 15sseldi 3887 . . . . . . . . 9 (𝜑𝐿 ∈ ℕ)
17 smatfval 30675 . . . . . . . . 9 ((𝐾 ∈ ℕ ∧ 𝐿 ∈ ℕ ∧ 𝐴 ∈ (𝐵𝑚 ((1...𝑀) × (1...𝑁)))) → (𝐾(subMat1‘𝐴)𝐿) = (𝐴 ∘ (𝑖 ∈ ℕ, 𝑗 ∈ ℕ ↦ ⟨if(𝑖 < 𝐾, 𝑖, (𝑖 + 1)), if(𝑗 < 𝐿, 𝑗, (𝑗 + 1))⟩)))
1813, 16, 1, 17syl3anc 1364 . . . . . . . 8 (𝜑 → (𝐾(subMat1‘𝐴)𝐿) = (𝐴 ∘ (𝑖 ∈ ℕ, 𝑗 ∈ ℕ ↦ ⟨if(𝑖 < 𝐾, 𝑖, (𝑖 + 1)), if(𝑗 < 𝐿, 𝑗, (𝑗 + 1))⟩)))
1910, 18syl5eq 2843 . . . . . . 7 (𝜑𝑆 = (𝐴 ∘ (𝑖 ∈ ℕ, 𝑗 ∈ ℕ ↦ ⟨if(𝑖 < 𝐾, 𝑖, (𝑖 + 1)), if(𝑗 < 𝐿, 𝑗, (𝑗 + 1))⟩)))
2019funeqd 6247 . . . . . 6 (𝜑 → (Fun 𝑆 ↔ Fun (𝐴 ∘ (𝑖 ∈ ℕ, 𝑗 ∈ ℕ ↦ ⟨if(𝑖 < 𝐾, 𝑖, (𝑖 + 1)), if(𝑗 < 𝐿, 𝑗, (𝑗 + 1))⟩))))
219, 20mpbird 258 . . . . 5 (𝜑 → Fun 𝑆)
22 fdmrn 6406 . . . . 5 (Fun 𝑆𝑆:dom 𝑆⟶ran 𝑆)
2321, 22sylib 219 . . . 4 (𝜑𝑆:dom 𝑆⟶ran 𝑆)
2419dmeqd 5660 . . . . . 6 (𝜑 → dom 𝑆 = dom (𝐴 ∘ (𝑖 ∈ ℕ, 𝑗 ∈ ℕ ↦ ⟨if(𝑖 < 𝐾, 𝑖, (𝑖 + 1)), if(𝑗 < 𝐿, 𝑗, (𝑗 + 1))⟩)))
25 dmco 5982 . . . . . . 7 dom (𝐴 ∘ (𝑖 ∈ ℕ, 𝑗 ∈ ℕ ↦ ⟨if(𝑖 < 𝐾, 𝑖, (𝑖 + 1)), if(𝑗 < 𝐿, 𝑗, (𝑗 + 1))⟩)) = ((𝑖 ∈ ℕ, 𝑗 ∈ ℕ ↦ ⟨if(𝑖 < 𝐾, 𝑖, (𝑖 + 1)), if(𝑗 < 𝐿, 𝑗, (𝑗 + 1))⟩) “ dom 𝐴)
26 fdm 6390 . . . . . . . . . . . 12 (𝐴:((1...𝑀) × (1...𝑁))⟶𝐵 → dom 𝐴 = ((1...𝑀) × (1...𝑁)))
271, 2, 263syl 18 . . . . . . . . . . 11 (𝜑 → dom 𝐴 = ((1...𝑀) × (1...𝑁)))
2827imaeq2d 5806 . . . . . . . . . 10 (𝜑 → ((𝑖 ∈ ℕ, 𝑗 ∈ ℕ ↦ ⟨if(𝑖 < 𝐾, 𝑖, (𝑖 + 1)), if(𝑗 < 𝐿, 𝑗, (𝑗 + 1))⟩) “ dom 𝐴) = ((𝑖 ∈ ℕ, 𝑗 ∈ ℕ ↦ ⟨if(𝑖 < 𝐾, 𝑖, (𝑖 + 1)), if(𝑗 < 𝐿, 𝑗, (𝑗 + 1))⟩) “ ((1...𝑀) × (1...𝑁))))
2928eleq2d 2868 . . . . . . . . 9 (𝜑 → (𝑥 ∈ ((𝑖 ∈ ℕ, 𝑗 ∈ ℕ ↦ ⟨if(𝑖 < 𝐾, 𝑖, (𝑖 + 1)), if(𝑗 < 𝐿, 𝑗, (𝑗 + 1))⟩) “ dom 𝐴) ↔ 𝑥 ∈ ((𝑖 ∈ ℕ, 𝑗 ∈ ℕ ↦ ⟨if(𝑖 < 𝐾, 𝑖, (𝑖 + 1)), if(𝑗 < 𝐿, 𝑗, (𝑗 + 1))⟩) “ ((1...𝑀) × (1...𝑁)))))
30 opex 5248 . . . . . . . . . . . 12 ⟨if(𝑖 < 𝐾, 𝑖, (𝑖 + 1)), if(𝑗 < 𝐿, 𝑗, (𝑗 + 1))⟩ ∈ V
315, 30fnmpoi 7624 . . . . . . . . . . 11 (𝑖 ∈ ℕ, 𝑗 ∈ ℕ ↦ ⟨if(𝑖 < 𝐾, 𝑖, (𝑖 + 1)), if(𝑗 < 𝐿, 𝑗, (𝑗 + 1))⟩) Fn (ℕ × ℕ)
32 elpreima 6693 . . . . . . . . . . 11 ((𝑖 ∈ ℕ, 𝑗 ∈ ℕ ↦ ⟨if(𝑖 < 𝐾, 𝑖, (𝑖 + 1)), if(𝑗 < 𝐿, 𝑗, (𝑗 + 1))⟩) Fn (ℕ × ℕ) → (𝑥 ∈ ((𝑖 ∈ ℕ, 𝑗 ∈ ℕ ↦ ⟨if(𝑖 < 𝐾, 𝑖, (𝑖 + 1)), if(𝑗 < 𝐿, 𝑗, (𝑗 + 1))⟩) “ ((1...𝑀) × (1...𝑁))) ↔ (𝑥 ∈ (ℕ × ℕ) ∧ ((𝑖 ∈ ℕ, 𝑗 ∈ ℕ ↦ ⟨if(𝑖 < 𝐾, 𝑖, (𝑖 + 1)), if(𝑗 < 𝐿, 𝑗, (𝑗 + 1))⟩)‘𝑥) ∈ ((1...𝑀) × (1...𝑁)))))
3331, 32ax-mp 5 . . . . . . . . . 10 (𝑥 ∈ ((𝑖 ∈ ℕ, 𝑗 ∈ ℕ ↦ ⟨if(𝑖 < 𝐾, 𝑖, (𝑖 + 1)), if(𝑗 < 𝐿, 𝑗, (𝑗 + 1))⟩) “ ((1...𝑀) × (1...𝑁))) ↔ (𝑥 ∈ (ℕ × ℕ) ∧ ((𝑖 ∈ ℕ, 𝑗 ∈ ℕ ↦ ⟨if(𝑖 < 𝐾, 𝑖, (𝑖 + 1)), if(𝑗 < 𝐿, 𝑗, (𝑗 + 1))⟩)‘𝑥) ∈ ((1...𝑀) × (1...𝑁))))
3433a1i 11 . . . . . . . . 9 (𝜑 → (𝑥 ∈ ((𝑖 ∈ ℕ, 𝑗 ∈ ℕ ↦ ⟨if(𝑖 < 𝐾, 𝑖, (𝑖 + 1)), if(𝑗 < 𝐿, 𝑗, (𝑗 + 1))⟩) “ ((1...𝑀) × (1...𝑁))) ↔ (𝑥 ∈ (ℕ × ℕ) ∧ ((𝑖 ∈ ℕ, 𝑗 ∈ ℕ ↦ ⟨if(𝑖 < 𝐾, 𝑖, (𝑖 + 1)), if(𝑗 < 𝐿, 𝑗, (𝑗 + 1))⟩)‘𝑥) ∈ ((1...𝑀) × (1...𝑁)))))
35 simplr 765 . . . . . . . . . . . . . . . . . . 19 (((𝜑𝑥 = ⟨(1st𝑥), (2nd𝑥)⟩) ∧ ((1st𝑥) ∈ ℕ ∧ (2nd𝑥) ∈ ℕ)) → 𝑥 = ⟨(1st𝑥), (2nd𝑥)⟩)
3635fveq2d 6542 . . . . . . . . . . . . . . . . . 18 (((𝜑𝑥 = ⟨(1st𝑥), (2nd𝑥)⟩) ∧ ((1st𝑥) ∈ ℕ ∧ (2nd𝑥) ∈ ℕ)) → ((𝑖 ∈ ℕ, 𝑗 ∈ ℕ ↦ ⟨if(𝑖 < 𝐾, 𝑖, (𝑖 + 1)), if(𝑗 < 𝐿, 𝑗, (𝑗 + 1))⟩)‘𝑥) = ((𝑖 ∈ ℕ, 𝑗 ∈ ℕ ↦ ⟨if(𝑖 < 𝐾, 𝑖, (𝑖 + 1)), if(𝑗 < 𝐿, 𝑗, (𝑗 + 1))⟩)‘⟨(1st𝑥), (2nd𝑥)⟩))
37 df-ov 7019 . . . . . . . . . . . . . . . . . 18 ((1st𝑥)(𝑖 ∈ ℕ, 𝑗 ∈ ℕ ↦ ⟨if(𝑖 < 𝐾, 𝑖, (𝑖 + 1)), if(𝑗 < 𝐿, 𝑗, (𝑗 + 1))⟩)(2nd𝑥)) = ((𝑖 ∈ ℕ, 𝑗 ∈ ℕ ↦ ⟨if(𝑖 < 𝐾, 𝑖, (𝑖 + 1)), if(𝑗 < 𝐿, 𝑗, (𝑗 + 1))⟩)‘⟨(1st𝑥), (2nd𝑥)⟩)
3836, 37syl6eqr 2849 . . . . . . . . . . . . . . . . 17 (((𝜑𝑥 = ⟨(1st𝑥), (2nd𝑥)⟩) ∧ ((1st𝑥) ∈ ℕ ∧ (2nd𝑥) ∈ ℕ)) → ((𝑖 ∈ ℕ, 𝑗 ∈ ℕ ↦ ⟨if(𝑖 < 𝐾, 𝑖, (𝑖 + 1)), if(𝑗 < 𝐿, 𝑗, (𝑗 + 1))⟩)‘𝑥) = ((1st𝑥)(𝑖 ∈ ℕ, 𝑗 ∈ ℕ ↦ ⟨if(𝑖 < 𝐾, 𝑖, (𝑖 + 1)), if(𝑗 < 𝐿, 𝑗, (𝑗 + 1))⟩)(2nd𝑥)))
39 breq1 4965 . . . . . . . . . . . . . . . . . . . . 21 (𝑖 = (1st𝑥) → (𝑖 < 𝐾 ↔ (1st𝑥) < 𝐾))
40 id 22 . . . . . . . . . . . . . . . . . . . . 21 (𝑖 = (1st𝑥) → 𝑖 = (1st𝑥))
41 oveq1 7023 . . . . . . . . . . . . . . . . . . . . 21 (𝑖 = (1st𝑥) → (𝑖 + 1) = ((1st𝑥) + 1))
4239, 40, 41ifbieq12d 4408 . . . . . . . . . . . . . . . . . . . 20 (𝑖 = (1st𝑥) → if(𝑖 < 𝐾, 𝑖, (𝑖 + 1)) = if((1st𝑥) < 𝐾, (1st𝑥), ((1st𝑥) + 1)))
4342opeq1d 4716 . . . . . . . . . . . . . . . . . . 19 (𝑖 = (1st𝑥) → ⟨if(𝑖 < 𝐾, 𝑖, (𝑖 + 1)), if(𝑗 < 𝐿, 𝑗, (𝑗 + 1))⟩ = ⟨if((1st𝑥) < 𝐾, (1st𝑥), ((1st𝑥) + 1)), if(𝑗 < 𝐿, 𝑗, (𝑗 + 1))⟩)
44 breq1 4965 . . . . . . . . . . . . . . . . . . . . 21 (𝑗 = (2nd𝑥) → (𝑗 < 𝐿 ↔ (2nd𝑥) < 𝐿))
45 id 22 . . . . . . . . . . . . . . . . . . . . 21 (𝑗 = (2nd𝑥) → 𝑗 = (2nd𝑥))
46 oveq1 7023 . . . . . . . . . . . . . . . . . . . . 21 (𝑗 = (2nd𝑥) → (𝑗 + 1) = ((2nd𝑥) + 1))
4744, 45, 46ifbieq12d 4408 . . . . . . . . . . . . . . . . . . . 20 (𝑗 = (2nd𝑥) → if(𝑗 < 𝐿, 𝑗, (𝑗 + 1)) = if((2nd𝑥) < 𝐿, (2nd𝑥), ((2nd𝑥) + 1)))
4847opeq2d 4717 . . . . . . . . . . . . . . . . . . 19 (𝑗 = (2nd𝑥) → ⟨if((1st𝑥) < 𝐾, (1st𝑥), ((1st𝑥) + 1)), if(𝑗 < 𝐿, 𝑗, (𝑗 + 1))⟩ = ⟨if((1st𝑥) < 𝐾, (1st𝑥), ((1st𝑥) + 1)), if((2nd𝑥) < 𝐿, (2nd𝑥), ((2nd𝑥) + 1))⟩)
49 opex 5248 . . . . . . . . . . . . . . . . . . 19 ⟨if((1st𝑥) < 𝐾, (1st𝑥), ((1st𝑥) + 1)), if((2nd𝑥) < 𝐿, (2nd𝑥), ((2nd𝑥) + 1))⟩ ∈ V
5043, 48, 5, 49ovmpo 7166 . . . . . . . . . . . . . . . . . 18 (((1st𝑥) ∈ ℕ ∧ (2nd𝑥) ∈ ℕ) → ((1st𝑥)(𝑖 ∈ ℕ, 𝑗 ∈ ℕ ↦ ⟨if(𝑖 < 𝐾, 𝑖, (𝑖 + 1)), if(𝑗 < 𝐿, 𝑗, (𝑗 + 1))⟩)(2nd𝑥)) = ⟨if((1st𝑥) < 𝐾, (1st𝑥), ((1st𝑥) + 1)), if((2nd𝑥) < 𝐿, (2nd𝑥), ((2nd𝑥) + 1))⟩)
5150adantl 482 . . . . . . . . . . . . . . . . 17 (((𝜑𝑥 = ⟨(1st𝑥), (2nd𝑥)⟩) ∧ ((1st𝑥) ∈ ℕ ∧ (2nd𝑥) ∈ ℕ)) → ((1st𝑥)(𝑖 ∈ ℕ, 𝑗 ∈ ℕ ↦ ⟨if(𝑖 < 𝐾, 𝑖, (𝑖 + 1)), if(𝑗 < 𝐿, 𝑗, (𝑗 + 1))⟩)(2nd𝑥)) = ⟨if((1st𝑥) < 𝐾, (1st𝑥), ((1st𝑥) + 1)), if((2nd𝑥) < 𝐿, (2nd𝑥), ((2nd𝑥) + 1))⟩)
5238, 51eqtrd 2831 . . . . . . . . . . . . . . . 16 (((𝜑𝑥 = ⟨(1st𝑥), (2nd𝑥)⟩) ∧ ((1st𝑥) ∈ ℕ ∧ (2nd𝑥) ∈ ℕ)) → ((𝑖 ∈ ℕ, 𝑗 ∈ ℕ ↦ ⟨if(𝑖 < 𝐾, 𝑖, (𝑖 + 1)), if(𝑗 < 𝐿, 𝑗, (𝑗 + 1))⟩)‘𝑥) = ⟨if((1st𝑥) < 𝐾, (1st𝑥), ((1st𝑥) + 1)), if((2nd𝑥) < 𝐿, (2nd𝑥), ((2nd𝑥) + 1))⟩)
5352eleq1d 2867 . . . . . . . . . . . . . . 15 (((𝜑𝑥 = ⟨(1st𝑥), (2nd𝑥)⟩) ∧ ((1st𝑥) ∈ ℕ ∧ (2nd𝑥) ∈ ℕ)) → (((𝑖 ∈ ℕ, 𝑗 ∈ ℕ ↦ ⟨if(𝑖 < 𝐾, 𝑖, (𝑖 + 1)), if(𝑗 < 𝐿, 𝑗, (𝑗 + 1))⟩)‘𝑥) ∈ ((1...𝑀) × (1...𝑁)) ↔ ⟨if((1st𝑥) < 𝐾, (1st𝑥), ((1st𝑥) + 1)), if((2nd𝑥) < 𝐿, (2nd𝑥), ((2nd𝑥) + 1))⟩ ∈ ((1...𝑀) × (1...𝑁))))
54 opelxp 5479 . . . . . . . . . . . . . . 15 (⟨if((1st𝑥) < 𝐾, (1st𝑥), ((1st𝑥) + 1)), if((2nd𝑥) < 𝐿, (2nd𝑥), ((2nd𝑥) + 1))⟩ ∈ ((1...𝑀) × (1...𝑁)) ↔ (if((1st𝑥) < 𝐾, (1st𝑥), ((1st𝑥) + 1)) ∈ (1...𝑀) ∧ if((2nd𝑥) < 𝐿, (2nd𝑥), ((2nd𝑥) + 1)) ∈ (1...𝑁)))
5553, 54syl6bb 288 . . . . . . . . . . . . . 14 (((𝜑𝑥 = ⟨(1st𝑥), (2nd𝑥)⟩) ∧ ((1st𝑥) ∈ ℕ ∧ (2nd𝑥) ∈ ℕ)) → (((𝑖 ∈ ℕ, 𝑗 ∈ ℕ ↦ ⟨if(𝑖 < 𝐾, 𝑖, (𝑖 + 1)), if(𝑗 < 𝐿, 𝑗, (𝑗 + 1))⟩)‘𝑥) ∈ ((1...𝑀) × (1...𝑁)) ↔ (if((1st𝑥) < 𝐾, (1st𝑥), ((1st𝑥) + 1)) ∈ (1...𝑀) ∧ if((2nd𝑥) < 𝐿, (2nd𝑥), ((2nd𝑥) + 1)) ∈ (1...𝑁))))
56 ifel 4424 . . . . . . . . . . . . . . . 16 (if((1st𝑥) < 𝐾, (1st𝑥), ((1st𝑥) + 1)) ∈ (1...𝑀) ↔ (((1st𝑥) < 𝐾 ∧ (1st𝑥) ∈ (1...𝑀)) ∨ (¬ (1st𝑥) < 𝐾 ∧ ((1st𝑥) + 1) ∈ (1...𝑀))))
57 simplrl 773 . . . . . . . . . . . . . . . . . . . . . 22 ((((𝜑𝑥 = ⟨(1st𝑥), (2nd𝑥)⟩) ∧ ((1st𝑥) ∈ ℕ ∧ (2nd𝑥) ∈ ℕ)) ∧ (1st𝑥) < 𝐾) → (1st𝑥) ∈ ℕ)
5857nnred 11501 . . . . . . . . . . . . . . . . . . . . . . 23 ((((𝜑𝑥 = ⟨(1st𝑥), (2nd𝑥)⟩) ∧ ((1st𝑥) ∈ ℕ ∧ (2nd𝑥) ∈ ℕ)) ∧ (1st𝑥) < 𝐾) → (1st𝑥) ∈ ℝ)
5913nnred 11501 . . . . . . . . . . . . . . . . . . . . . . . 24 (𝜑𝐾 ∈ ℝ)
6059ad3antrrr 726 . . . . . . . . . . . . . . . . . . . . . . 23 ((((𝜑𝑥 = ⟨(1st𝑥), (2nd𝑥)⟩) ∧ ((1st𝑥) ∈ ℕ ∧ (2nd𝑥) ∈ ℕ)) ∧ (1st𝑥) < 𝐾) → 𝐾 ∈ ℝ)
61 smat.m . . . . . . . . . . . . . . . . . . . . . . . . 25 (𝜑𝑀 ∈ ℕ)
6261nnred 11501 . . . . . . . . . . . . . . . . . . . . . . . 24 (𝜑𝑀 ∈ ℝ)
6362ad3antrrr 726 . . . . . . . . . . . . . . . . . . . . . . 23 ((((𝜑𝑥 = ⟨(1st𝑥), (2nd𝑥)⟩) ∧ ((1st𝑥) ∈ ℕ ∧ (2nd𝑥) ∈ ℕ)) ∧ (1st𝑥) < 𝐾) → 𝑀 ∈ ℝ)
64 simpr 485 . . . . . . . . . . . . . . . . . . . . . . . 24 ((((𝜑𝑥 = ⟨(1st𝑥), (2nd𝑥)⟩) ∧ ((1st𝑥) ∈ ℕ ∧ (2nd𝑥) ∈ ℕ)) ∧ (1st𝑥) < 𝐾) → (1st𝑥) < 𝐾)
6558, 60, 64ltled 10635 . . . . . . . . . . . . . . . . . . . . . . 23 ((((𝜑𝑥 = ⟨(1st𝑥), (2nd𝑥)⟩) ∧ ((1st𝑥) ∈ ℕ ∧ (2nd𝑥) ∈ ℕ)) ∧ (1st𝑥) < 𝐾) → (1st𝑥) ≤ 𝐾)
66 elfzle2 12761 . . . . . . . . . . . . . . . . . . . . . . . . 25 (𝐾 ∈ (1...𝑀) → 𝐾𝑀)
6712, 66syl 17 . . . . . . . . . . . . . . . . . . . . . . . 24 (𝜑𝐾𝑀)
6867ad3antrrr 726 . . . . . . . . . . . . . . . . . . . . . . 23 ((((𝜑𝑥 = ⟨(1st𝑥), (2nd𝑥)⟩) ∧ ((1st𝑥) ∈ ℕ ∧ (2nd𝑥) ∈ ℕ)) ∧ (1st𝑥) < 𝐾) → 𝐾𝑀)
6958, 60, 63, 65, 68letrd 10644 . . . . . . . . . . . . . . . . . . . . . 22 ((((𝜑𝑥 = ⟨(1st𝑥), (2nd𝑥)⟩) ∧ ((1st𝑥) ∈ ℕ ∧ (2nd𝑥) ∈ ℕ)) ∧ (1st𝑥) < 𝐾) → (1st𝑥) ≤ 𝑀)
7057, 69jca 512 . . . . . . . . . . . . . . . . . . . . 21 ((((𝜑𝑥 = ⟨(1st𝑥), (2nd𝑥)⟩) ∧ ((1st𝑥) ∈ ℕ ∧ (2nd𝑥) ∈ ℕ)) ∧ (1st𝑥) < 𝐾) → ((1st𝑥) ∈ ℕ ∧ (1st𝑥) ≤ 𝑀))
7161nnzd 11935 . . . . . . . . . . . . . . . . . . . . . . 23 (𝜑𝑀 ∈ ℤ)
72 fznn 12825 . . . . . . . . . . . . . . . . . . . . . . 23 (𝑀 ∈ ℤ → ((1st𝑥) ∈ (1...𝑀) ↔ ((1st𝑥) ∈ ℕ ∧ (1st𝑥) ≤ 𝑀)))
7371, 72syl 17 . . . . . . . . . . . . . . . . . . . . . 22 (𝜑 → ((1st𝑥) ∈ (1...𝑀) ↔ ((1st𝑥) ∈ ℕ ∧ (1st𝑥) ≤ 𝑀)))
7473ad3antrrr 726 . . . . . . . . . . . . . . . . . . . . 21 ((((𝜑𝑥 = ⟨(1st𝑥), (2nd𝑥)⟩) ∧ ((1st𝑥) ∈ ℕ ∧ (2nd𝑥) ∈ ℕ)) ∧ (1st𝑥) < 𝐾) → ((1st𝑥) ∈ (1...𝑀) ↔ ((1st𝑥) ∈ ℕ ∧ (1st𝑥) ≤ 𝑀)))
7570, 74mpbird 258 . . . . . . . . . . . . . . . . . . . 20 ((((𝜑𝑥 = ⟨(1st𝑥), (2nd𝑥)⟩) ∧ ((1st𝑥) ∈ ℕ ∧ (2nd𝑥) ∈ ℕ)) ∧ (1st𝑥) < 𝐾) → (1st𝑥) ∈ (1...𝑀))
7658, 60, 63, 64, 68ltletrd 10647 . . . . . . . . . . . . . . . . . . . . 21 ((((𝜑𝑥 = ⟨(1st𝑥), (2nd𝑥)⟩) ∧ ((1st𝑥) ∈ ℕ ∧ (2nd𝑥) ∈ ℕ)) ∧ (1st𝑥) < 𝐾) → (1st𝑥) < 𝑀)
7761ad3antrrr 726 . . . . . . . . . . . . . . . . . . . . . 22 ((((𝜑𝑥 = ⟨(1st𝑥), (2nd𝑥)⟩) ∧ ((1st𝑥) ∈ ℕ ∧ (2nd𝑥) ∈ ℕ)) ∧ (1st𝑥) < 𝐾) → 𝑀 ∈ ℕ)
78 nnltlem1 11898 . . . . . . . . . . . . . . . . . . . . . 22 (((1st𝑥) ∈ ℕ ∧ 𝑀 ∈ ℕ) → ((1st𝑥) < 𝑀 ↔ (1st𝑥) ≤ (𝑀 − 1)))
7957, 77, 78syl2anc 584 . . . . . . . . . . . . . . . . . . . . 21 ((((𝜑𝑥 = ⟨(1st𝑥), (2nd𝑥)⟩) ∧ ((1st𝑥) ∈ ℕ ∧ (2nd𝑥) ∈ ℕ)) ∧ (1st𝑥) < 𝐾) → ((1st𝑥) < 𝑀 ↔ (1st𝑥) ≤ (𝑀 − 1)))
8076, 79mpbid 233 . . . . . . . . . . . . . . . . . . . 20 ((((𝜑𝑥 = ⟨(1st𝑥), (2nd𝑥)⟩) ∧ ((1st𝑥) ∈ ℕ ∧ (2nd𝑥) ∈ ℕ)) ∧ (1st𝑥) < 𝐾) → (1st𝑥) ≤ (𝑀 − 1))
8175, 802thd 266 . . . . . . . . . . . . . . . . . . 19 ((((𝜑𝑥 = ⟨(1st𝑥), (2nd𝑥)⟩) ∧ ((1st𝑥) ∈ ℕ ∧ (2nd𝑥) ∈ ℕ)) ∧ (1st𝑥) < 𝐾) → ((1st𝑥) ∈ (1...𝑀) ↔ (1st𝑥) ≤ (𝑀 − 1)))
8281pm5.32da 579 . . . . . . . . . . . . . . . . . 18 (((𝜑𝑥 = ⟨(1st𝑥), (2nd𝑥)⟩) ∧ ((1st𝑥) ∈ ℕ ∧ (2nd𝑥) ∈ ℕ)) → (((1st𝑥) < 𝐾 ∧ (1st𝑥) ∈ (1...𝑀)) ↔ ((1st𝑥) < 𝐾 ∧ (1st𝑥) ≤ (𝑀 − 1))))
83 fznn 12825 . . . . . . . . . . . . . . . . . . . . . 22 (𝑀 ∈ ℤ → (((1st𝑥) + 1) ∈ (1...𝑀) ↔ (((1st𝑥) + 1) ∈ ℕ ∧ ((1st𝑥) + 1) ≤ 𝑀)))
8471, 83syl 17 . . . . . . . . . . . . . . . . . . . . 21 (𝜑 → (((1st𝑥) + 1) ∈ (1...𝑀) ↔ (((1st𝑥) + 1) ∈ ℕ ∧ ((1st𝑥) + 1) ≤ 𝑀)))
8584ad2antrr 722 . . . . . . . . . . . . . . . . . . . 20 (((𝜑𝑥 = ⟨(1st𝑥), (2nd𝑥)⟩) ∧ ((1st𝑥) ∈ ℕ ∧ (2nd𝑥) ∈ ℕ)) → (((1st𝑥) + 1) ∈ (1...𝑀) ↔ (((1st𝑥) + 1) ∈ ℕ ∧ ((1st𝑥) + 1) ≤ 𝑀)))
86 simprl 767 . . . . . . . . . . . . . . . . . . . . . 22 (((𝜑𝑥 = ⟨(1st𝑥), (2nd𝑥)⟩) ∧ ((1st𝑥) ∈ ℕ ∧ (2nd𝑥) ∈ ℕ)) → (1st𝑥) ∈ ℕ)
8786peano2nnd 11503 . . . . . . . . . . . . . . . . . . . . 21 (((𝜑𝑥 = ⟨(1st𝑥), (2nd𝑥)⟩) ∧ ((1st𝑥) ∈ ℕ ∧ (2nd𝑥) ∈ ℕ)) → ((1st𝑥) + 1) ∈ ℕ)
8887biantrurd 533 . . . . . . . . . . . . . . . . . . . 20 (((𝜑𝑥 = ⟨(1st𝑥), (2nd𝑥)⟩) ∧ ((1st𝑥) ∈ ℕ ∧ (2nd𝑥) ∈ ℕ)) → (((1st𝑥) + 1) ≤ 𝑀 ↔ (((1st𝑥) + 1) ∈ ℕ ∧ ((1st𝑥) + 1) ≤ 𝑀)))
8986nnzd 11935 . . . . . . . . . . . . . . . . . . . . 21 (((𝜑𝑥 = ⟨(1st𝑥), (2nd𝑥)⟩) ∧ ((1st𝑥) ∈ ℕ ∧ (2nd𝑥) ∈ ℕ)) → (1st𝑥) ∈ ℤ)
9071ad2antrr 722 . . . . . . . . . . . . . . . . . . . . 21 (((𝜑𝑥 = ⟨(1st𝑥), (2nd𝑥)⟩) ∧ ((1st𝑥) ∈ ℕ ∧ (2nd𝑥) ∈ ℕ)) → 𝑀 ∈ ℤ)
91 zltp1le 11881 . . . . . . . . . . . . . . . . . . . . . 22 (((1st𝑥) ∈ ℤ ∧ 𝑀 ∈ ℤ) → ((1st𝑥) < 𝑀 ↔ ((1st𝑥) + 1) ≤ 𝑀))
92 zltlem1 11884 . . . . . . . . . . . . . . . . . . . . . 22 (((1st𝑥) ∈ ℤ ∧ 𝑀 ∈ ℤ) → ((1st𝑥) < 𝑀 ↔ (1st𝑥) ≤ (𝑀 − 1)))
9391, 92bitr3d 282 . . . . . . . . . . . . . . . . . . . . 21 (((1st𝑥) ∈ ℤ ∧ 𝑀 ∈ ℤ) → (((1st𝑥) + 1) ≤ 𝑀 ↔ (1st𝑥) ≤ (𝑀 − 1)))
9489, 90, 93syl2anc 584 . . . . . . . . . . . . . . . . . . . 20 (((𝜑𝑥 = ⟨(1st𝑥), (2nd𝑥)⟩) ∧ ((1st𝑥) ∈ ℕ ∧ (2nd𝑥) ∈ ℕ)) → (((1st𝑥) + 1) ≤ 𝑀 ↔ (1st𝑥) ≤ (𝑀 − 1)))
9585, 88, 943bitr2d 308 . . . . . . . . . . . . . . . . . . 19 (((𝜑𝑥 = ⟨(1st𝑥), (2nd𝑥)⟩) ∧ ((1st𝑥) ∈ ℕ ∧ (2nd𝑥) ∈ ℕ)) → (((1st𝑥) + 1) ∈ (1...𝑀) ↔ (1st𝑥) ≤ (𝑀 − 1)))
9695anbi2d 628 . . . . . . . . . . . . . . . . . 18 (((𝜑𝑥 = ⟨(1st𝑥), (2nd𝑥)⟩) ∧ ((1st𝑥) ∈ ℕ ∧ (2nd𝑥) ∈ ℕ)) → ((¬ (1st𝑥) < 𝐾 ∧ ((1st𝑥) + 1) ∈ (1...𝑀)) ↔ (¬ (1st𝑥) < 𝐾 ∧ (1st𝑥) ≤ (𝑀 − 1))))
9782, 96orbi12d 913 . . . . . . . . . . . . . . . . 17 (((𝜑𝑥 = ⟨(1st𝑥), (2nd𝑥)⟩) ∧ ((1st𝑥) ∈ ℕ ∧ (2nd𝑥) ∈ ℕ)) → ((((1st𝑥) < 𝐾 ∧ (1st𝑥) ∈ (1...𝑀)) ∨ (¬ (1st𝑥) < 𝐾 ∧ ((1st𝑥) + 1) ∈ (1...𝑀))) ↔ (((1st𝑥) < 𝐾 ∧ (1st𝑥) ≤ (𝑀 − 1)) ∨ (¬ (1st𝑥) < 𝐾 ∧ (1st𝑥) ≤ (𝑀 − 1)))))
98 pm4.42 1046 . . . . . . . . . . . . . . . . . 18 ((1st𝑥) ≤ (𝑀 − 1) ↔ (((1st𝑥) ≤ (𝑀 − 1) ∧ (1st𝑥) < 𝐾) ∨ ((1st𝑥) ≤ (𝑀 − 1) ∧ ¬ (1st𝑥) < 𝐾)))
99 ancom 461 . . . . . . . . . . . . . . . . . . 19 (((1st𝑥) ≤ (𝑀 − 1) ∧ (1st𝑥) < 𝐾) ↔ ((1st𝑥) < 𝐾 ∧ (1st𝑥) ≤ (𝑀 − 1)))
100 ancom 461 . . . . . . . . . . . . . . . . . . 19 (((1st𝑥) ≤ (𝑀 − 1) ∧ ¬ (1st𝑥) < 𝐾) ↔ (¬ (1st𝑥) < 𝐾 ∧ (1st𝑥) ≤ (𝑀 − 1)))
10199, 100orbi12i 909 . . . . . . . . . . . . . . . . . 18 ((((1st𝑥) ≤ (𝑀 − 1) ∧ (1st𝑥) < 𝐾) ∨ ((1st𝑥) ≤ (𝑀 − 1) ∧ ¬ (1st𝑥) < 𝐾)) ↔ (((1st𝑥) < 𝐾 ∧ (1st𝑥) ≤ (𝑀 − 1)) ∨ (¬ (1st𝑥) < 𝐾 ∧ (1st𝑥) ≤ (𝑀 − 1))))
10298, 101bitri 276 . . . . . . . . . . . . . . . . 17 ((1st𝑥) ≤ (𝑀 − 1) ↔ (((1st𝑥) < 𝐾 ∧ (1st𝑥) ≤ (𝑀 − 1)) ∨ (¬ (1st𝑥) < 𝐾 ∧ (1st𝑥) ≤ (𝑀 − 1))))
10397, 102syl6bbr 290 . . . . . . . . . . . . . . . 16 (((𝜑𝑥 = ⟨(1st𝑥), (2nd𝑥)⟩) ∧ ((1st𝑥) ∈ ℕ ∧ (2nd𝑥) ∈ ℕ)) → ((((1st𝑥) < 𝐾 ∧ (1st𝑥) ∈ (1...𝑀)) ∨ (¬ (1st𝑥) < 𝐾 ∧ ((1st𝑥) + 1) ∈ (1...𝑀))) ↔ (1st𝑥) ≤ (𝑀 − 1)))
10456, 103syl5bb 284 . . . . . . . . . . . . . . 15 (((𝜑𝑥 = ⟨(1st𝑥), (2nd𝑥)⟩) ∧ ((1st𝑥) ∈ ℕ ∧ (2nd𝑥) ∈ ℕ)) → (if((1st𝑥) < 𝐾, (1st𝑥), ((1st𝑥) + 1)) ∈ (1...𝑀) ↔ (1st𝑥) ≤ (𝑀 − 1)))
105 ifel 4424 . . . . . . . . . . . . . . . 16 (if((2nd𝑥) < 𝐿, (2nd𝑥), ((2nd𝑥) + 1)) ∈ (1...𝑁) ↔ (((2nd𝑥) < 𝐿 ∧ (2nd𝑥) ∈ (1...𝑁)) ∨ (¬ (2nd𝑥) < 𝐿 ∧ ((2nd𝑥) + 1) ∈ (1...𝑁))))
106 simplrr 774 . . . . . . . . . . . . . . . . . . . . . 22 ((((𝜑𝑥 = ⟨(1st𝑥), (2nd𝑥)⟩) ∧ ((1st𝑥) ∈ ℕ ∧ (2nd𝑥) ∈ ℕ)) ∧ (2nd𝑥) < 𝐿) → (2nd𝑥) ∈ ℕ)
107106nnred 11501 . . . . . . . . . . . . . . . . . . . . . . 23 ((((𝜑𝑥 = ⟨(1st𝑥), (2nd𝑥)⟩) ∧ ((1st𝑥) ∈ ℕ ∧ (2nd𝑥) ∈ ℕ)) ∧ (2nd𝑥) < 𝐿) → (2nd𝑥) ∈ ℝ)
10816nnred 11501 . . . . . . . . . . . . . . . . . . . . . . . 24 (𝜑𝐿 ∈ ℝ)
109108ad3antrrr 726 . . . . . . . . . . . . . . . . . . . . . . 23 ((((𝜑𝑥 = ⟨(1st𝑥), (2nd𝑥)⟩) ∧ ((1st𝑥) ∈ ℕ ∧ (2nd𝑥) ∈ ℕ)) ∧ (2nd𝑥) < 𝐿) → 𝐿 ∈ ℝ)
110 smat.n . . . . . . . . . . . . . . . . . . . . . . . . 25 (𝜑𝑁 ∈ ℕ)
111110nnred 11501 . . . . . . . . . . . . . . . . . . . . . . . 24 (𝜑𝑁 ∈ ℝ)
112111ad3antrrr 726 . . . . . . . . . . . . . . . . . . . . . . 23 ((((𝜑𝑥 = ⟨(1st𝑥), (2nd𝑥)⟩) ∧ ((1st𝑥) ∈ ℕ ∧ (2nd𝑥) ∈ ℕ)) ∧ (2nd𝑥) < 𝐿) → 𝑁 ∈ ℝ)
113 simpr 485 . . . . . . . . . . . . . . . . . . . . . . . 24 ((((𝜑𝑥 = ⟨(1st𝑥), (2nd𝑥)⟩) ∧ ((1st𝑥) ∈ ℕ ∧ (2nd𝑥) ∈ ℕ)) ∧ (2nd𝑥) < 𝐿) → (2nd𝑥) < 𝐿)
114107, 109, 113ltled 10635 . . . . . . . . . . . . . . . . . . . . . . 23 ((((𝜑𝑥 = ⟨(1st𝑥), (2nd𝑥)⟩) ∧ ((1st𝑥) ∈ ℕ ∧ (2nd𝑥) ∈ ℕ)) ∧ (2nd𝑥) < 𝐿) → (2nd𝑥) ≤ 𝐿)
115 elfzle2 12761 . . . . . . . . . . . . . . . . . . . . . . . . 25 (𝐿 ∈ (1...𝑁) → 𝐿𝑁)
11615, 115syl 17 . . . . . . . . . . . . . . . . . . . . . . . 24 (𝜑𝐿𝑁)
117116ad3antrrr 726 . . . . . . . . . . . . . . . . . . . . . . 23 ((((𝜑𝑥 = ⟨(1st𝑥), (2nd𝑥)⟩) ∧ ((1st𝑥) ∈ ℕ ∧ (2nd𝑥) ∈ ℕ)) ∧ (2nd𝑥) < 𝐿) → 𝐿𝑁)
118107, 109, 112, 114, 117letrd 10644 . . . . . . . . . . . . . . . . . . . . . 22 ((((𝜑𝑥 = ⟨(1st𝑥), (2nd𝑥)⟩) ∧ ((1st𝑥) ∈ ℕ ∧ (2nd𝑥) ∈ ℕ)) ∧ (2nd𝑥) < 𝐿) → (2nd𝑥) ≤ 𝑁)
119106, 118jca 512 . . . . . . . . . . . . . . . . . . . . 21 ((((𝜑𝑥 = ⟨(1st𝑥), (2nd𝑥)⟩) ∧ ((1st𝑥) ∈ ℕ ∧ (2nd𝑥) ∈ ℕ)) ∧ (2nd𝑥) < 𝐿) → ((2nd𝑥) ∈ ℕ ∧ (2nd𝑥) ≤ 𝑁))
120110nnzd 11935 . . . . . . . . . . . . . . . . . . . . . . 23 (𝜑𝑁 ∈ ℤ)
121 fznn 12825 . . . . . . . . . . . . . . . . . . . . . . 23 (𝑁 ∈ ℤ → ((2nd𝑥) ∈ (1...𝑁) ↔ ((2nd𝑥) ∈ ℕ ∧ (2nd𝑥) ≤ 𝑁)))
122120, 121syl 17 . . . . . . . . . . . . . . . . . . . . . 22 (𝜑 → ((2nd𝑥) ∈ (1...𝑁) ↔ ((2nd𝑥) ∈ ℕ ∧ (2nd𝑥) ≤ 𝑁)))
123122ad3antrrr 726 . . . . . . . . . . . . . . . . . . . . 21 ((((𝜑𝑥 = ⟨(1st𝑥), (2nd𝑥)⟩) ∧ ((1st𝑥) ∈ ℕ ∧ (2nd𝑥) ∈ ℕ)) ∧ (2nd𝑥) < 𝐿) → ((2nd𝑥) ∈ (1...𝑁) ↔ ((2nd𝑥) ∈ ℕ ∧ (2nd𝑥) ≤ 𝑁)))
124119, 123mpbird 258 . . . . . . . . . . . . . . . . . . . 20 ((((𝜑𝑥 = ⟨(1st𝑥), (2nd𝑥)⟩) ∧ ((1st𝑥) ∈ ℕ ∧ (2nd𝑥) ∈ ℕ)) ∧ (2nd𝑥) < 𝐿) → (2nd𝑥) ∈ (1...𝑁))
125107, 109, 112, 113, 117ltletrd 10647 . . . . . . . . . . . . . . . . . . . . 21 ((((𝜑𝑥 = ⟨(1st𝑥), (2nd𝑥)⟩) ∧ ((1st𝑥) ∈ ℕ ∧ (2nd𝑥) ∈ ℕ)) ∧ (2nd𝑥) < 𝐿) → (2nd𝑥) < 𝑁)
126110ad3antrrr 726 . . . . . . . . . . . . . . . . . . . . . 22 ((((𝜑𝑥 = ⟨(1st𝑥), (2nd𝑥)⟩) ∧ ((1st𝑥) ∈ ℕ ∧ (2nd𝑥) ∈ ℕ)) ∧ (2nd𝑥) < 𝐿) → 𝑁 ∈ ℕ)
127 nnltlem1 11898 . . . . . . . . . . . . . . . . . . . . . 22 (((2nd𝑥) ∈ ℕ ∧ 𝑁 ∈ ℕ) → ((2nd𝑥) < 𝑁 ↔ (2nd𝑥) ≤ (𝑁 − 1)))
128106, 126, 127syl2anc 584 . . . . . . . . . . . . . . . . . . . . 21 ((((𝜑𝑥 = ⟨(1st𝑥), (2nd𝑥)⟩) ∧ ((1st𝑥) ∈ ℕ ∧ (2nd𝑥) ∈ ℕ)) ∧ (2nd𝑥) < 𝐿) → ((2nd𝑥) < 𝑁 ↔ (2nd𝑥) ≤ (𝑁 − 1)))
129125, 128mpbid 233 . . . . . . . . . . . . . . . . . . . 20 ((((𝜑𝑥 = ⟨(1st𝑥), (2nd𝑥)⟩) ∧ ((1st𝑥) ∈ ℕ ∧ (2nd𝑥) ∈ ℕ)) ∧ (2nd𝑥) < 𝐿) → (2nd𝑥) ≤ (𝑁 − 1))
130124, 1292thd 266 . . . . . . . . . . . . . . . . . . 19 ((((𝜑𝑥 = ⟨(1st𝑥), (2nd𝑥)⟩) ∧ ((1st𝑥) ∈ ℕ ∧ (2nd𝑥) ∈ ℕ)) ∧ (2nd𝑥) < 𝐿) → ((2nd𝑥) ∈ (1...𝑁) ↔ (2nd𝑥) ≤ (𝑁 − 1)))
131130pm5.32da 579 . . . . . . . . . . . . . . . . . 18 (((𝜑𝑥 = ⟨(1st𝑥), (2nd𝑥)⟩) ∧ ((1st𝑥) ∈ ℕ ∧ (2nd𝑥) ∈ ℕ)) → (((2nd𝑥) < 𝐿 ∧ (2nd𝑥) ∈ (1...𝑁)) ↔ ((2nd𝑥) < 𝐿 ∧ (2nd𝑥) ≤ (𝑁 − 1))))
132 fznn 12825 . . . . . . . . . . . . . . . . . . . . . 22 (𝑁 ∈ ℤ → (((2nd𝑥) + 1) ∈ (1...𝑁) ↔ (((2nd𝑥) + 1) ∈ ℕ ∧ ((2nd𝑥) + 1) ≤ 𝑁)))
133120, 132syl 17 . . . . . . . . . . . . . . . . . . . . 21 (𝜑 → (((2nd𝑥) + 1) ∈ (1...𝑁) ↔ (((2nd𝑥) + 1) ∈ ℕ ∧ ((2nd𝑥) + 1) ≤ 𝑁)))
134133ad2antrr 722 . . . . . . . . . . . . . . . . . . . 20 (((𝜑𝑥 = ⟨(1st𝑥), (2nd𝑥)⟩) ∧ ((1st𝑥) ∈ ℕ ∧ (2nd𝑥) ∈ ℕ)) → (((2nd𝑥) + 1) ∈ (1...𝑁) ↔ (((2nd𝑥) + 1) ∈ ℕ ∧ ((2nd𝑥) + 1) ≤ 𝑁)))
135 simprr 769 . . . . . . . . . . . . . . . . . . . . . 22 (((𝜑𝑥 = ⟨(1st𝑥), (2nd𝑥)⟩) ∧ ((1st𝑥) ∈ ℕ ∧ (2nd𝑥) ∈ ℕ)) → (2nd𝑥) ∈ ℕ)
136135peano2nnd 11503 . . . . . . . . . . . . . . . . . . . . 21 (((𝜑𝑥 = ⟨(1st𝑥), (2nd𝑥)⟩) ∧ ((1st𝑥) ∈ ℕ ∧ (2nd𝑥) ∈ ℕ)) → ((2nd𝑥) + 1) ∈ ℕ)
137136biantrurd 533 . . . . . . . . . . . . . . . . . . . 20 (((𝜑𝑥 = ⟨(1st𝑥), (2nd𝑥)⟩) ∧ ((1st𝑥) ∈ ℕ ∧ (2nd𝑥) ∈ ℕ)) → (((2nd𝑥) + 1) ≤ 𝑁 ↔ (((2nd𝑥) + 1) ∈ ℕ ∧ ((2nd𝑥) + 1) ≤ 𝑁)))
138135nnzd 11935 . . . . . . . . . . . . . . . . . . . . 21 (((𝜑𝑥 = ⟨(1st𝑥), (2nd𝑥)⟩) ∧ ((1st𝑥) ∈ ℕ ∧ (2nd𝑥) ∈ ℕ)) → (2nd𝑥) ∈ ℤ)
139120ad2antrr 722 . . . . . . . . . . . . . . . . . . . . 21 (((𝜑𝑥 = ⟨(1st𝑥), (2nd𝑥)⟩) ∧ ((1st𝑥) ∈ ℕ ∧ (2nd𝑥) ∈ ℕ)) → 𝑁 ∈ ℤ)
140 zltp1le 11881 . . . . . . . . . . . . . . . . . . . . . 22 (((2nd𝑥) ∈ ℤ ∧ 𝑁 ∈ ℤ) → ((2nd𝑥) < 𝑁 ↔ ((2nd𝑥) + 1) ≤ 𝑁))
141 zltlem1 11884 . . . . . . . . . . . . . . . . . . . . . 22 (((2nd𝑥) ∈ ℤ ∧ 𝑁 ∈ ℤ) → ((2nd𝑥) < 𝑁 ↔ (2nd𝑥) ≤ (𝑁 − 1)))
142140, 141bitr3d 282 . . . . . . . . . . . . . . . . . . . . 21 (((2nd𝑥) ∈ ℤ ∧ 𝑁 ∈ ℤ) → (((2nd𝑥) + 1) ≤ 𝑁 ↔ (2nd𝑥) ≤ (𝑁 − 1)))
143138, 139, 142syl2anc 584 . . . . . . . . . . . . . . . . . . . 20 (((𝜑𝑥 = ⟨(1st𝑥), (2nd𝑥)⟩) ∧ ((1st𝑥) ∈ ℕ ∧ (2nd𝑥) ∈ ℕ)) → (((2nd𝑥) + 1) ≤ 𝑁 ↔ (2nd𝑥) ≤ (𝑁 − 1)))
144134, 137, 1433bitr2d 308 . . . . . . . . . . . . . . . . . . 19 (((𝜑𝑥 = ⟨(1st𝑥), (2nd𝑥)⟩) ∧ ((1st𝑥) ∈ ℕ ∧ (2nd𝑥) ∈ ℕ)) → (((2nd𝑥) + 1) ∈ (1...𝑁) ↔ (2nd𝑥) ≤ (𝑁 − 1)))
145144anbi2d 628 . . . . . . . . . . . . . . . . . 18 (((𝜑𝑥 = ⟨(1st𝑥), (2nd𝑥)⟩) ∧ ((1st𝑥) ∈ ℕ ∧ (2nd𝑥) ∈ ℕ)) → ((¬ (2nd𝑥) < 𝐿 ∧ ((2nd𝑥) + 1) ∈ (1...𝑁)) ↔ (¬ (2nd𝑥) < 𝐿 ∧ (2nd𝑥) ≤ (𝑁 − 1))))
146131, 145orbi12d 913 . . . . . . . . . . . . . . . . 17 (((𝜑𝑥 = ⟨(1st𝑥), (2nd𝑥)⟩) ∧ ((1st𝑥) ∈ ℕ ∧ (2nd𝑥) ∈ ℕ)) → ((((2nd𝑥) < 𝐿 ∧ (2nd𝑥) ∈ (1...𝑁)) ∨ (¬ (2nd𝑥) < 𝐿 ∧ ((2nd𝑥) + 1) ∈ (1...𝑁))) ↔ (((2nd𝑥) < 𝐿 ∧ (2nd𝑥) ≤ (𝑁 − 1)) ∨ (¬ (2nd𝑥) < 𝐿 ∧ (2nd𝑥) ≤ (𝑁 − 1)))))
147 pm4.42 1046 . . . . . . . . . . . . . . . . . 18 ((2nd𝑥) ≤ (𝑁 − 1) ↔ (((2nd𝑥) ≤ (𝑁 − 1) ∧ (2nd𝑥) < 𝐿) ∨ ((2nd𝑥) ≤ (𝑁 − 1) ∧ ¬ (2nd𝑥) < 𝐿)))
148 ancom 461 . . . . . . . . . . . . . . . . . . 19 (((2nd𝑥) ≤ (𝑁 − 1) ∧ (2nd𝑥) < 𝐿) ↔ ((2nd𝑥) < 𝐿 ∧ (2nd𝑥) ≤ (𝑁 − 1)))
149 ancom 461 . . . . . . . . . . . . . . . . . . 19 (((2nd𝑥) ≤ (𝑁 − 1) ∧ ¬ (2nd𝑥) < 𝐿) ↔ (¬ (2nd𝑥) < 𝐿 ∧ (2nd𝑥) ≤ (𝑁 − 1)))
150148, 149orbi12i 909 . . . . . . . . . . . . . . . . . 18 ((((2nd𝑥) ≤ (𝑁 − 1) ∧ (2nd𝑥) < 𝐿) ∨ ((2nd𝑥) ≤ (𝑁 − 1) ∧ ¬ (2nd𝑥) < 𝐿)) ↔ (((2nd𝑥) < 𝐿 ∧ (2nd𝑥) ≤ (𝑁 − 1)) ∨ (¬ (2nd𝑥) < 𝐿 ∧ (2nd𝑥) ≤ (𝑁 − 1))))
151147, 150bitri 276 . . . . . . . . . . . . . . . . 17 ((2nd𝑥) ≤ (𝑁 − 1) ↔ (((2nd𝑥) < 𝐿 ∧ (2nd𝑥) ≤ (𝑁 − 1)) ∨ (¬ (2nd𝑥) < 𝐿 ∧ (2nd𝑥) ≤ (𝑁 − 1))))
152146, 151syl6bbr 290 . . . . . . . . . . . . . . . 16 (((𝜑𝑥 = ⟨(1st𝑥), (2nd𝑥)⟩) ∧ ((1st𝑥) ∈ ℕ ∧ (2nd𝑥) ∈ ℕ)) → ((((2nd𝑥) < 𝐿 ∧ (2nd𝑥) ∈ (1...𝑁)) ∨ (¬ (2nd𝑥) < 𝐿 ∧ ((2nd𝑥) + 1) ∈ (1...𝑁))) ↔ (2nd𝑥) ≤ (𝑁 − 1)))
153105, 152syl5bb 284 . . . . . . . . . . . . . . 15 (((𝜑𝑥 = ⟨(1st𝑥), (2nd𝑥)⟩) ∧ ((1st𝑥) ∈ ℕ ∧ (2nd𝑥) ∈ ℕ)) → (if((2nd𝑥) < 𝐿, (2nd𝑥), ((2nd𝑥) + 1)) ∈ (1...𝑁) ↔ (2nd𝑥) ≤ (𝑁 − 1)))
154104, 153anbi12d 630 . . . . . . . . . . . . . 14 (((𝜑𝑥 = ⟨(1st𝑥), (2nd𝑥)⟩) ∧ ((1st𝑥) ∈ ℕ ∧ (2nd𝑥) ∈ ℕ)) → ((if((1st𝑥) < 𝐾, (1st𝑥), ((1st𝑥) + 1)) ∈ (1...𝑀) ∧ if((2nd𝑥) < 𝐿, (2nd𝑥), ((2nd𝑥) + 1)) ∈ (1...𝑁)) ↔ ((1st𝑥) ≤ (𝑀 − 1) ∧ (2nd𝑥) ≤ (𝑁 − 1))))
15555, 154bitrd 280 . . . . . . . . . . . . 13 (((𝜑𝑥 = ⟨(1st𝑥), (2nd𝑥)⟩) ∧ ((1st𝑥) ∈ ℕ ∧ (2nd𝑥) ∈ ℕ)) → (((𝑖 ∈ ℕ, 𝑗 ∈ ℕ ↦ ⟨if(𝑖 < 𝐾, 𝑖, (𝑖 + 1)), if(𝑗 < 𝐿, 𝑗, (𝑗 + 1))⟩)‘𝑥) ∈ ((1...𝑀) × (1...𝑁)) ↔ ((1st𝑥) ≤ (𝑀 − 1) ∧ (2nd𝑥) ≤ (𝑁 − 1))))
156155pm5.32da 579 . . . . . . . . . . . 12 ((𝜑𝑥 = ⟨(1st𝑥), (2nd𝑥)⟩) → ((((1st𝑥) ∈ ℕ ∧ (2nd𝑥) ∈ ℕ) ∧ ((𝑖 ∈ ℕ, 𝑗 ∈ ℕ ↦ ⟨if(𝑖 < 𝐾, 𝑖, (𝑖 + 1)), if(𝑗 < 𝐿, 𝑗, (𝑗 + 1))⟩)‘𝑥) ∈ ((1...𝑀) × (1...𝑁))) ↔ (((1st𝑥) ∈ ℕ ∧ (2nd𝑥) ∈ ℕ) ∧ ((1st𝑥) ≤ (𝑀 − 1) ∧ (2nd𝑥) ≤ (𝑁 − 1)))))
157 1zzd 11862 . . . . . . . . . . . . . . . . 17 (𝜑 → 1 ∈ ℤ)
15871, 157zsubcld 11941 . . . . . . . . . . . . . . . 16 (𝜑 → (𝑀 − 1) ∈ ℤ)
159 fznn 12825 . . . . . . . . . . . . . . . 16 ((𝑀 − 1) ∈ ℤ → ((1st𝑥) ∈ (1...(𝑀 − 1)) ↔ ((1st𝑥) ∈ ℕ ∧ (1st𝑥) ≤ (𝑀 − 1))))
160158, 159syl 17 . . . . . . . . . . . . . . 15 (𝜑 → ((1st𝑥) ∈ (1...(𝑀 − 1)) ↔ ((1st𝑥) ∈ ℕ ∧ (1st𝑥) ≤ (𝑀 − 1))))
161120, 157zsubcld 11941 . . . . . . . . . . . . . . . 16 (𝜑 → (𝑁 − 1) ∈ ℤ)
162 fznn 12825 . . . . . . . . . . . . . . . 16 ((𝑁 − 1) ∈ ℤ → ((2nd𝑥) ∈ (1...(𝑁 − 1)) ↔ ((2nd𝑥) ∈ ℕ ∧ (2nd𝑥) ≤ (𝑁 − 1))))
163161, 162syl 17 . . . . . . . . . . . . . . 15 (𝜑 → ((2nd𝑥) ∈ (1...(𝑁 − 1)) ↔ ((2nd𝑥) ∈ ℕ ∧ (2nd𝑥) ≤ (𝑁 − 1))))
164160, 163anbi12d 630 . . . . . . . . . . . . . 14 (𝜑 → (((1st𝑥) ∈ (1...(𝑀 − 1)) ∧ (2nd𝑥) ∈ (1...(𝑁 − 1))) ↔ (((1st𝑥) ∈ ℕ ∧ (1st𝑥) ≤ (𝑀 − 1)) ∧ ((2nd𝑥) ∈ ℕ ∧ (2nd𝑥) ≤ (𝑁 − 1)))))
165 an4 652 . . . . . . . . . . . . . 14 ((((1st𝑥) ∈ ℕ ∧ (1st𝑥) ≤ (𝑀 − 1)) ∧ ((2nd𝑥) ∈ ℕ ∧ (2nd𝑥) ≤ (𝑁 − 1))) ↔ (((1st𝑥) ∈ ℕ ∧ (2nd𝑥) ∈ ℕ) ∧ ((1st𝑥) ≤ (𝑀 − 1) ∧ (2nd𝑥) ≤ (𝑁 − 1))))
166164, 165syl6bb 288 . . . . . . . . . . . . 13 (𝜑 → (((1st𝑥) ∈ (1...(𝑀 − 1)) ∧ (2nd𝑥) ∈ (1...(𝑁 − 1))) ↔ (((1st𝑥) ∈ ℕ ∧ (2nd𝑥) ∈ ℕ) ∧ ((1st𝑥) ≤ (𝑀 − 1) ∧ (2nd𝑥) ≤ (𝑁 − 1)))))
167166adantr 481 . . . . . . . . . . . 12 ((𝜑𝑥 = ⟨(1st𝑥), (2nd𝑥)⟩) → (((1st𝑥) ∈ (1...(𝑀 − 1)) ∧ (2nd𝑥) ∈ (1...(𝑁 − 1))) ↔ (((1st𝑥) ∈ ℕ ∧ (2nd𝑥) ∈ ℕ) ∧ ((1st𝑥) ≤ (𝑀 − 1) ∧ (2nd𝑥) ≤ (𝑁 − 1)))))
168156, 167bitr4d 283 . . . . . . . . . . 11 ((𝜑𝑥 = ⟨(1st𝑥), (2nd𝑥)⟩) → ((((1st𝑥) ∈ ℕ ∧ (2nd𝑥) ∈ ℕ) ∧ ((𝑖 ∈ ℕ, 𝑗 ∈ ℕ ↦ ⟨if(𝑖 < 𝐾, 𝑖, (𝑖 + 1)), if(𝑗 < 𝐿, 𝑗, (𝑗 + 1))⟩)‘𝑥) ∈ ((1...𝑀) × (1...𝑁))) ↔ ((1st𝑥) ∈ (1...(𝑀 − 1)) ∧ (2nd𝑥) ∈ (1...(𝑁 − 1)))))
169168pm5.32da 579 . . . . . . . . . 10 (𝜑 → ((𝑥 = ⟨(1st𝑥), (2nd𝑥)⟩ ∧ (((1st𝑥) ∈ ℕ ∧ (2nd𝑥) ∈ ℕ) ∧ ((𝑖 ∈ ℕ, 𝑗 ∈ ℕ ↦ ⟨if(𝑖 < 𝐾, 𝑖, (𝑖 + 1)), if(𝑗 < 𝐿, 𝑗, (𝑗 + 1))⟩)‘𝑥) ∈ ((1...𝑀) × (1...𝑁)))) ↔ (𝑥 = ⟨(1st𝑥), (2nd𝑥)⟩ ∧ ((1st𝑥) ∈ (1...(𝑀 − 1)) ∧ (2nd𝑥) ∈ (1...(𝑁 − 1))))))
170 elxp6 7579 . . . . . . . . . . . 12 (𝑥 ∈ (ℕ × ℕ) ↔ (𝑥 = ⟨(1st𝑥), (2nd𝑥)⟩ ∧ ((1st𝑥) ∈ ℕ ∧ (2nd𝑥) ∈ ℕ)))
171170anbi1i 623 . . . . . . . . . . 11 ((𝑥 ∈ (ℕ × ℕ) ∧ ((𝑖 ∈ ℕ, 𝑗 ∈ ℕ ↦ ⟨if(𝑖 < 𝐾, 𝑖, (𝑖 + 1)), if(𝑗 < 𝐿, 𝑗, (𝑗 + 1))⟩)‘𝑥) ∈ ((1...𝑀) × (1...𝑁))) ↔ ((𝑥 = ⟨(1st𝑥), (2nd𝑥)⟩ ∧ ((1st𝑥) ∈ ℕ ∧ (2nd𝑥) ∈ ℕ)) ∧ ((𝑖 ∈ ℕ, 𝑗 ∈ ℕ ↦ ⟨if(𝑖 < 𝐾, 𝑖, (𝑖 + 1)), if(𝑗 < 𝐿, 𝑗, (𝑗 + 1))⟩)‘𝑥) ∈ ((1...𝑀) × (1...𝑁))))
172 anass 469 . . . . . . . . . . 11 (((𝑥 = ⟨(1st𝑥), (2nd𝑥)⟩ ∧ ((1st𝑥) ∈ ℕ ∧ (2nd𝑥) ∈ ℕ)) ∧ ((𝑖 ∈ ℕ, 𝑗 ∈ ℕ ↦ ⟨if(𝑖 < 𝐾, 𝑖, (𝑖 + 1)), if(𝑗 < 𝐿, 𝑗, (𝑗 + 1))⟩)‘𝑥) ∈ ((1...𝑀) × (1...𝑁))) ↔ (𝑥 = ⟨(1st𝑥), (2nd𝑥)⟩ ∧ (((1st𝑥) ∈ ℕ ∧ (2nd𝑥) ∈ ℕ) ∧ ((𝑖 ∈ ℕ, 𝑗 ∈ ℕ ↦ ⟨if(𝑖 < 𝐾, 𝑖, (𝑖 + 1)), if(𝑗 < 𝐿, 𝑗, (𝑗 + 1))⟩)‘𝑥) ∈ ((1...𝑀) × (1...𝑁)))))
173171, 172bitri 276 . . . . . . . . . 10 ((𝑥 ∈ (ℕ × ℕ) ∧ ((𝑖 ∈ ℕ, 𝑗 ∈ ℕ ↦ ⟨if(𝑖 < 𝐾, 𝑖, (𝑖 + 1)), if(𝑗 < 𝐿, 𝑗, (𝑗 + 1))⟩)‘𝑥) ∈ ((1...𝑀) × (1...𝑁))) ↔ (𝑥 = ⟨(1st𝑥), (2nd𝑥)⟩ ∧ (((1st𝑥) ∈ ℕ ∧ (2nd𝑥) ∈ ℕ) ∧ ((𝑖 ∈ ℕ, 𝑗 ∈ ℕ ↦ ⟨if(𝑖 < 𝐾, 𝑖, (𝑖 + 1)), if(𝑗 < 𝐿, 𝑗, (𝑗 + 1))⟩)‘𝑥) ∈ ((1...𝑀) × (1...𝑁)))))
174 elxp6 7579 . . . . . . . . . 10 (𝑥 ∈ ((1...(𝑀 − 1)) × (1...(𝑁 − 1))) ↔ (𝑥 = ⟨(1st𝑥), (2nd𝑥)⟩ ∧ ((1st𝑥) ∈ (1...(𝑀 − 1)) ∧ (2nd𝑥) ∈ (1...(𝑁 − 1)))))
175169, 173, 1743bitr4g 315 . . . . . . . . 9 (𝜑 → ((𝑥 ∈ (ℕ × ℕ) ∧ ((𝑖 ∈ ℕ, 𝑗 ∈ ℕ ↦ ⟨if(𝑖 < 𝐾, 𝑖, (𝑖 + 1)), if(𝑗 < 𝐿, 𝑗, (𝑗 + 1))⟩)‘𝑥) ∈ ((1...𝑀) × (1...𝑁))) ↔ 𝑥 ∈ ((1...(𝑀 − 1)) × (1...(𝑁 − 1)))))
17629, 34, 1753bitrd 306 . . . . . . . 8 (𝜑 → (𝑥 ∈ ((𝑖 ∈ ℕ, 𝑗 ∈ ℕ ↦ ⟨if(𝑖 < 𝐾, 𝑖, (𝑖 + 1)), if(𝑗 < 𝐿, 𝑗, (𝑗 + 1))⟩) “ dom 𝐴) ↔ 𝑥 ∈ ((1...(𝑀 − 1)) × (1...(𝑁 − 1)))))
177176eqrdv 2793 . . . . . . 7 (𝜑 → ((𝑖 ∈ ℕ, 𝑗 ∈ ℕ ↦ ⟨if(𝑖 < 𝐾, 𝑖, (𝑖 + 1)), if(𝑗 < 𝐿, 𝑗, (𝑗 + 1))⟩) “ dom 𝐴) = ((1...(𝑀 − 1)) × (1...(𝑁 − 1))))
17825, 177syl5eq 2843 . . . . . 6 (𝜑 → dom (𝐴 ∘ (𝑖 ∈ ℕ, 𝑗 ∈ ℕ ↦ ⟨if(𝑖 < 𝐾, 𝑖, (𝑖 + 1)), if(𝑗 < 𝐿, 𝑗, (𝑗 + 1))⟩)) = ((1...(𝑀 − 1)) × (1...(𝑁 − 1))))
17924, 178eqtrd 2831 . . . . 5 (𝜑 → dom 𝑆 = ((1...(𝑀 − 1)) × (1...(𝑁 − 1))))
180179feq2d 6368 . . . 4 (𝜑 → (𝑆:dom 𝑆⟶ran 𝑆𝑆:((1...(𝑀 − 1)) × (1...(𝑁 − 1)))⟶ran 𝑆))
18123, 180mpbid 233 . . 3 (𝜑𝑆:((1...(𝑀 − 1)) × (1...(𝑁 − 1)))⟶ran 𝑆)
18219rneqd 5690 . . . . 5 (𝜑 → ran 𝑆 = ran (𝐴 ∘ (𝑖 ∈ ℕ, 𝑗 ∈ ℕ ↦ ⟨if(𝑖 < 𝐾, 𝑖, (𝑖 + 1)), if(𝑗 < 𝐿, 𝑗, (𝑗 + 1))⟩)))
183 rncoss 5724 . . . . 5 ran (𝐴 ∘ (𝑖 ∈ ℕ, 𝑗 ∈ ℕ ↦ ⟨if(𝑖 < 𝐾, 𝑖, (𝑖 + 1)), if(𝑗 < 𝐿, 𝑗, (𝑗 + 1))⟩)) ⊆ ran 𝐴
184182, 183syl6eqss 3942 . . . 4 (𝜑 → ran 𝑆 ⊆ ran 𝐴)
185 frn 6388 . . . . 5 (𝐴:((1...𝑀) × (1...𝑁))⟶𝐵 → ran 𝐴𝐵)
1861, 2, 1853syl 18 . . . 4 (𝜑 → ran 𝐴𝐵)
187184, 186sstrd 3899 . . 3 (𝜑 → ran 𝑆𝐵)
188 fss 6395 . . 3 ((𝑆:((1...(𝑀 − 1)) × (1...(𝑁 − 1)))⟶ran 𝑆 ∧ ran 𝑆𝐵) → 𝑆:((1...(𝑀 − 1)) × (1...(𝑁 − 1)))⟶𝐵)
189181, 187, 188syl2anc 584 . 2 (𝜑𝑆:((1...(𝑀 − 1)) × (1...(𝑁 − 1)))⟶𝐵)
190 reldmmap 8265 . . . . . 6 Rel dom ↑𝑚
191190ovrcl 7056 . . . . 5 (𝐴 ∈ (𝐵𝑚 ((1...𝑀) × (1...𝑁))) → (𝐵 ∈ V ∧ ((1...𝑀) × (1...𝑁)) ∈ V))
1921, 191syl 17 . . . 4 (𝜑 → (𝐵 ∈ V ∧ ((1...𝑀) × (1...𝑁)) ∈ V))
193192simpld 495 . . 3 (𝜑𝐵 ∈ V)
194 ovex 7048 . . . 4 (1...(𝑀 − 1)) ∈ V
195 ovex 7048 . . . 4 (1...(𝑁 − 1)) ∈ V
196194, 195xpex 7333 . . 3 ((1...(𝑀 − 1)) × (1...(𝑁 − 1))) ∈ V
197 elmapg 8269 . . 3 ((𝐵 ∈ V ∧ ((1...(𝑀 − 1)) × (1...(𝑁 − 1))) ∈ V) → (𝑆 ∈ (𝐵𝑚 ((1...(𝑀 − 1)) × (1...(𝑁 − 1)))) ↔ 𝑆:((1...(𝑀 − 1)) × (1...(𝑁 − 1)))⟶𝐵))
198193, 196, 197sylancl 586 . 2 (𝜑 → (𝑆 ∈ (𝐵𝑚 ((1...(𝑀 − 1)) × (1...(𝑁 − 1)))) ↔ 𝑆:((1...(𝑀 − 1)) × (1...(𝑁 − 1)))⟶𝐵))
199189, 198mpbird 258 1 (𝜑𝑆 ∈ (𝐵𝑚 ((1...(𝑀 − 1)) × (1...(𝑁 − 1)))))
Colors of variables: wff setvar class
Syntax hints:  ¬ wn 3  wi 4  wb 207  wa 396  wo 842   = wceq 1522  wcel 2081  Vcvv 3437  wss 3859  ifcif 4381  cop 4478   class class class wbr 4962   × cxp 5441  ccnv 5442  dom cdm 5443  ran crn 5444  cima 5446  ccom 5447  Fun wfun 6219   Fn wfn 6220  wf 6221  cfv 6225  (class class class)co 7016  cmpo 7018  1st c1st 7543  2nd c2nd 7544  𝑚 cmap 8256  cr 10382  1c1 10384   + caddc 10386   < clt 10521  cle 10522  cmin 10717  cn 11486  cz 11829  ...cfz 12742  subMat1csmat 30673
This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1777  ax-4 1791  ax-5 1888  ax-6 1947  ax-7 1992  ax-8 2083  ax-9 2091  ax-10 2112  ax-11 2126  ax-12 2141  ax-13 2344  ax-ext 2769  ax-rep 5081  ax-sep 5094  ax-nul 5101  ax-pow 5157  ax-pr 5221  ax-un 7319  ax-cnex 10439  ax-resscn 10440  ax-1cn 10441  ax-icn 10442  ax-addcl 10443  ax-addrcl 10444  ax-mulcl 10445  ax-mulrcl 10446  ax-mulcom 10447  ax-addass 10448  ax-mulass 10449  ax-distr 10450  ax-i2m1 10451  ax-1ne0 10452  ax-1rid 10453  ax-rnegex 10454  ax-rrecex 10455  ax-cnre 10456  ax-pre-lttri 10457  ax-pre-lttrn 10458  ax-pre-ltadd 10459  ax-pre-mulgt0 10460
This theorem depends on definitions:  df-bi 208  df-an 397  df-or 843  df-3or 1081  df-3an 1082  df-tru 1525  df-ex 1762  df-nf 1766  df-sb 2043  df-mo 2576  df-eu 2612  df-clab 2776  df-cleq 2788  df-clel 2863  df-nfc 2935  df-ne 2985  df-nel 3091  df-ral 3110  df-rex 3111  df-reu 3112  df-rab 3114  df-v 3439  df-sbc 3707  df-csb 3812  df-dif 3862  df-un 3864  df-in 3866  df-ss 3874  df-pss 3876  df-nul 4212  df-if 4382  df-pw 4455  df-sn 4473  df-pr 4475  df-tp 4477  df-op 4479  df-uni 4746  df-iun 4827  df-br 4963  df-opab 5025  df-mpt 5042  df-tr 5064  df-id 5348  df-eprel 5353  df-po 5362  df-so 5363  df-fr 5402  df-we 5404  df-xp 5449  df-rel 5450  df-cnv 5451  df-co 5452  df-dm 5453  df-rn 5454  df-res 5455  df-ima 5456  df-pred 6023  df-ord 6069  df-on 6070  df-lim 6071  df-suc 6072  df-iota 6189  df-fun 6227  df-fn 6228  df-f 6229  df-f1 6230  df-fo 6231  df-f1o 6232  df-fv 6233  df-riota 6977  df-ov 7019  df-oprab 7020  df-mpo 7021  df-om 7437  df-1st 7545  df-2nd 7546  df-wrecs 7798  df-recs 7860  df-rdg 7898  df-er 8139  df-map 8258  df-en 8358  df-dom 8359  df-sdom 8360  df-pnf 10523  df-mnf 10524  df-xr 10525  df-ltxr 10526  df-le 10527  df-sub 10719  df-neg 10720  df-nn 11487  df-n0 11746  df-z 11830  df-uz 12094  df-fz 12743  df-smat 30674
This theorem is referenced by:  smatcl  30682  1smat1  30684
  Copyright terms: Public domain W3C validator