vdwlem9 - Metamath Proof Explorer

	Metamath Proof Explorer		< Previous Next > Nearby theorems
Mirrors > Home > MPE Home > Th. List > vdwlem9		Structured version Visualization version GIF version

Theorem vdwlem9 16690

Description: Lemma for vdw 16695. (Contributed by Mario Carneiro, 12-Sep-2014.)

**Hypotheses**
Ref	Expression
vdw.r	⊢ (𝜑 → 𝑅 ∈ Fin)
vdwlem9.k	⊢ (𝜑 → 𝐾 ∈ (ℤ_≥‘2))
vdwlem9.s	⊢ (𝜑 → ∀𝑠 ∈ Fin ∃𝑛 ∈ ℕ ∀𝑓 ∈ (𝑠 ↑_m (1...𝑛))𝐾 MonoAP 𝑓)
vdwlem9.m	⊢ (𝜑 → 𝑀 ∈ ℕ)
vdwlem9.w	⊢ (𝜑 → 𝑊 ∈ ℕ)
vdwlem9.g	⊢ (𝜑 → ∀𝑔 ∈ (𝑅 ↑_m (1...𝑊))(⟨𝑀, 𝐾⟩ PolyAP 𝑔 ∨ (𝐾 + 1) MonoAP 𝑔))
vdwlem9.v	⊢ (𝜑 → 𝑉 ∈ ℕ)
vdwlem9.a	⊢ (𝜑 → ∀𝑓 ∈ ((𝑅 ↑_m (1...𝑊)) ↑_m (1...𝑉))𝐾 MonoAP 𝑓)
vdwlem9.h	⊢ (𝜑 → 𝐻:(1...(𝑊 · (2 · 𝑉)))⟶𝑅)
vdwlem9.f	⊢ 𝐹 = (𝑥 ∈ (1...𝑉) ↦ (𝑦 ∈ (1...𝑊) ↦ (𝐻‘(𝑦 + (𝑊 · ((𝑥 − 1) + 𝑉))))))

**Assertion**
Ref	Expression
vdwlem9	⊢ (𝜑 → (⟨(𝑀 + 1), 𝐾⟩ PolyAP 𝐻 ∨ (𝐾 + 1) MonoAP 𝐻))

Distinct variable groups: 𝑔,𝑛,𝑥,𝑦,𝜑 𝑥,𝑓,𝑦,𝑉 𝑓,𝑊,𝑥,𝑦 𝑓,𝑔,𝐹,𝑥,𝑦 𝑓,𝑛,𝑠,𝐾,𝑔,𝑥,𝑦 𝑓,𝑀,𝑔,𝑛,𝑥,𝑦 𝑅,𝑓,𝑔,𝑛,𝑠,𝑥,𝑦 𝑔,𝐻,𝑥,𝑦 Allowed substitution hints: 𝜑(𝑓,𝑠) 𝐹(𝑛,𝑠) 𝐻(𝑓,𝑛,𝑠) 𝑀(𝑠) 𝑉(𝑔,𝑛,𝑠) 𝑊(𝑔,𝑛,𝑠)

Proof of Theorem vdwlem9 Dummy variables 𝑎 𝑑 𝑧 are mutually distinct and distinct from all other variables.

Step	Hyp	Ref	Expression
1		breq2 5078	. . 3 ⊢ (𝑓 = 𝐹 → (𝐾 MonoAP 𝑓 ↔ 𝐾 MonoAP 𝐹))
2		vdwlem9.a	. . 3 ⊢ (𝜑 → ∀𝑓 ∈ ((𝑅 ↑_m (1...𝑊)) ↑_m (1...𝑉))𝐾 MonoAP 𝑓)
3		vdwlem9.v	. . . . 5 ⊢ (𝜑 → 𝑉 ∈ ℕ)
4		vdwlem9.w	. . . . 5 ⊢ (𝜑 → 𝑊 ∈ ℕ)
5		vdw.r	. . . . 5 ⊢ (𝜑 → 𝑅 ∈ Fin)
6		vdwlem9.h	. . . . 5 ⊢ (𝜑 → 𝐻:(1...(𝑊 · (2 · 𝑉)))⟶𝑅)
7		vdwlem9.f	. . . . 5 ⊢ 𝐹 = (𝑥 ∈ (1...𝑉) ↦ (𝑦 ∈ (1...𝑊) ↦ (𝐻‘(𝑦 + (𝑊 · ((𝑥 − 1) + 𝑉))))))
8	3, 4, 5, 6, 7	vdwlem4 16685	. . . 4 ⊢ (𝜑 → 𝐹:(1...𝑉)⟶(𝑅 ↑_m (1...𝑊)))
9		ovex 7308	. . . . 5 ⊢ (𝑅 ↑_m (1...𝑊)) ∈ V
10		ovex 7308	. . . . 5 ⊢ (1...𝑉) ∈ V
11	9, 10	elmap 8659	. . . 4 ⊢ (𝐹 ∈ ((𝑅 ↑_m (1...𝑊)) ↑_m (1...𝑉)) ↔ 𝐹:(1...𝑉)⟶(𝑅 ↑_m (1...𝑊)))
12	8, 11	sylibr 233	. . 3 ⊢ (𝜑 → 𝐹 ∈ ((𝑅 ↑_m (1...𝑊)) ↑_m (1...𝑉)))
13	1, 2, 12	rspcdva 3562	. 2 ⊢ (𝜑 → 𝐾 MonoAP 𝐹)
14		vdwlem9.k	. . . . . 6 ⊢ (𝜑 → 𝐾 ∈ (ℤ_≥‘2))
15		eluz2nn 12624	. . . . . 6 ⊢ (𝐾 ∈ (ℤ_≥‘2) → 𝐾 ∈ ℕ)
16	14, 15	syl 17	. . . . 5 ⊢ (𝜑 → 𝐾 ∈ ℕ)
17	16	nnnn0d 12293	. . . 4 ⊢ (𝜑 → 𝐾 ∈ ℕ₀)
18	10, 17, 8	vdwmc 16679	. . 3 ⊢ (𝜑 → (𝐾 MonoAP 𝐹 ↔ ∃𝑔∃𝑎 ∈ ℕ ∃𝑑 ∈ ℕ (𝑎(AP‘𝐾)𝑑) ⊆ (^◡𝐹 “ {𝑔})))
19		vdwlem9.g	. . . . . . . . 9 ⊢ (𝜑 → ∀𝑔 ∈ (𝑅 ↑_m (1...𝑊))(⟨𝑀, 𝐾⟩ PolyAP 𝑔 ∨ (𝐾 + 1) MonoAP 𝑔))
20	19	adantr 481	. . . . . . . 8 ⊢ ((𝜑 ∧ ((𝑎 ∈ ℕ ∧ 𝑑 ∈ ℕ) ∧ (𝑎(AP‘𝐾)𝑑) ⊆ (^◡𝐹 “ {𝑔}))) → ∀𝑔 ∈ (𝑅 ↑_m (1...𝑊))(⟨𝑀, 𝐾⟩ PolyAP 𝑔 ∨ (𝐾 + 1) MonoAP 𝑔))
21		simprr 770	. . . . . . . . . . . 12 ⊢ ((𝜑 ∧ ((𝑎 ∈ ℕ ∧ 𝑑 ∈ ℕ) ∧ (𝑎(AP‘𝐾)𝑑) ⊆ (^◡𝐹 “ {𝑔}))) → (𝑎(AP‘𝐾)𝑑) ⊆ (^◡𝐹 “ {𝑔}))
22	16	adantr 481	. . . . . . . . . . . . 13 ⊢ ((𝜑 ∧ ((𝑎 ∈ ℕ ∧ 𝑑 ∈ ℕ) ∧ (𝑎(AP‘𝐾)𝑑) ⊆ (^◡𝐹 “ {𝑔}))) → 𝐾 ∈ ℕ)
23		simprll 776	. . . . . . . . . . . . 13 ⊢ ((𝜑 ∧ ((𝑎 ∈ ℕ ∧ 𝑑 ∈ ℕ) ∧ (𝑎(AP‘𝐾)𝑑) ⊆ (^◡𝐹 “ {𝑔}))) → 𝑎 ∈ ℕ)
24		simprlr 777	. . . . . . . . . . . . 13 ⊢ ((𝜑 ∧ ((𝑎 ∈ ℕ ∧ 𝑑 ∈ ℕ) ∧ (𝑎(AP‘𝐾)𝑑) ⊆ (^◡𝐹 “ {𝑔}))) → 𝑑 ∈ ℕ)
25		vdwapid1 16676	. . . . . . . . . . . . 13 ⊢ ((𝐾 ∈ ℕ ∧ 𝑎 ∈ ℕ ∧ 𝑑 ∈ ℕ) → 𝑎 ∈ (𝑎(AP‘𝐾)𝑑))
26	22, 23, 24, 25	syl3anc 1370	. . . . . . . . . . . 12 ⊢ ((𝜑 ∧ ((𝑎 ∈ ℕ ∧ 𝑑 ∈ ℕ) ∧ (𝑎(AP‘𝐾)𝑑) ⊆ (^◡𝐹 “ {𝑔}))) → 𝑎 ∈ (𝑎(AP‘𝐾)𝑑))
27	21, 26	sseldd 3922	. . . . . . . . . . 11 ⊢ ((𝜑 ∧ ((𝑎 ∈ ℕ ∧ 𝑑 ∈ ℕ) ∧ (𝑎(AP‘𝐾)𝑑) ⊆ (^◡𝐹 “ {𝑔}))) → 𝑎 ∈ (^◡𝐹 “ {𝑔}))
28	8	ffnd 6601	. . . . . . . . . . . . 13 ⊢ (𝜑 → 𝐹 Fn (1...𝑉))
29	28	adantr 481	. . . . . . . . . . . 12 ⊢ ((𝜑 ∧ ((𝑎 ∈ ℕ ∧ 𝑑 ∈ ℕ) ∧ (𝑎(AP‘𝐾)𝑑) ⊆ (^◡𝐹 “ {𝑔}))) → 𝐹 Fn (1...𝑉))
30		fniniseg 6937	. . . . . . . . . . . 12 ⊢ (𝐹 Fn (1...𝑉) → (𝑎 ∈ (^◡𝐹 “ {𝑔}) ↔ (𝑎 ∈ (1...𝑉) ∧ (𝐹‘𝑎) = 𝑔)))
31	29, 30	syl 17	. . . . . . . . . . 11 ⊢ ((𝜑 ∧ ((𝑎 ∈ ℕ ∧ 𝑑 ∈ ℕ) ∧ (𝑎(AP‘𝐾)𝑑) ⊆ (^◡𝐹 “ {𝑔}))) → (𝑎 ∈ (^◡𝐹 “ {𝑔}) ↔ (𝑎 ∈ (1...𝑉) ∧ (𝐹‘𝑎) = 𝑔)))
32	27, 31	mpbid 231	. . . . . . . . . 10 ⊢ ((𝜑 ∧ ((𝑎 ∈ ℕ ∧ 𝑑 ∈ ℕ) ∧ (𝑎(AP‘𝐾)𝑑) ⊆ (^◡𝐹 “ {𝑔}))) → (𝑎 ∈ (1...𝑉) ∧ (𝐹‘𝑎) = 𝑔))
33	32	simprd 496	. . . . . . . . 9 ⊢ ((𝜑 ∧ ((𝑎 ∈ ℕ ∧ 𝑑 ∈ ℕ) ∧ (𝑎(AP‘𝐾)𝑑) ⊆ (^◡𝐹 “ {𝑔}))) → (𝐹‘𝑎) = 𝑔)
34	8	adantr 481	. . . . . . . . . 10 ⊢ ((𝜑 ∧ ((𝑎 ∈ ℕ ∧ 𝑑 ∈ ℕ) ∧ (𝑎(AP‘𝐾)𝑑) ⊆ (^◡𝐹 “ {𝑔}))) → 𝐹:(1...𝑉)⟶(𝑅 ↑_m (1...𝑊)))
35	32	simpld 495	. . . . . . . . . 10 ⊢ ((𝜑 ∧ ((𝑎 ∈ ℕ ∧ 𝑑 ∈ ℕ) ∧ (𝑎(AP‘𝐾)𝑑) ⊆ (^◡𝐹 “ {𝑔}))) → 𝑎 ∈ (1...𝑉))
36	34, 35	ffvelrnd 6962	. . . . . . . . 9 ⊢ ((𝜑 ∧ ((𝑎 ∈ ℕ ∧ 𝑑 ∈ ℕ) ∧ (𝑎(AP‘𝐾)𝑑) ⊆ (^◡𝐹 “ {𝑔}))) → (𝐹‘𝑎) ∈ (𝑅 ↑_m (1...𝑊)))
37	33, 36	eqeltrrd 2840	. . . . . . . 8 ⊢ ((𝜑 ∧ ((𝑎 ∈ ℕ ∧ 𝑑 ∈ ℕ) ∧ (𝑎(AP‘𝐾)𝑑) ⊆ (^◡𝐹 “ {𝑔}))) → 𝑔 ∈ (𝑅 ↑_m (1...𝑊)))
38		rsp 3131	. . . . . . . 8 ⊢ (∀𝑔 ∈ (𝑅 ↑_m (1...𝑊))(⟨𝑀, 𝐾⟩ PolyAP 𝑔 ∨ (𝐾 + 1) MonoAP 𝑔) → (𝑔 ∈ (𝑅 ↑_m (1...𝑊)) → (⟨𝑀, 𝐾⟩ PolyAP 𝑔 ∨ (𝐾 + 1) MonoAP 𝑔)))
39	20, 37, 38	sylc 65	. . . . . . 7 ⊢ ((𝜑 ∧ ((𝑎 ∈ ℕ ∧ 𝑑 ∈ ℕ) ∧ (𝑎(AP‘𝐾)𝑑) ⊆ (^◡𝐹 “ {𝑔}))) → (⟨𝑀, 𝐾⟩ PolyAP 𝑔 ∨ (𝐾 + 1) MonoAP 𝑔))
40	3	adantr 481	. . . . . . . . . 10 ⊢ ((𝜑 ∧ ((𝑎 ∈ ℕ ∧ 𝑑 ∈ ℕ) ∧ (𝑎(AP‘𝐾)𝑑) ⊆ (^◡𝐹 “ {𝑔}))) → 𝑉 ∈ ℕ)
41	4	adantr 481	. . . . . . . . . 10 ⊢ ((𝜑 ∧ ((𝑎 ∈ ℕ ∧ 𝑑 ∈ ℕ) ∧ (𝑎(AP‘𝐾)𝑑) ⊆ (^◡𝐹 “ {𝑔}))) → 𝑊 ∈ ℕ)
42	5	adantr 481	. . . . . . . . . 10 ⊢ ((𝜑 ∧ ((𝑎 ∈ ℕ ∧ 𝑑 ∈ ℕ) ∧ (𝑎(AP‘𝐾)𝑑) ⊆ (^◡𝐹 “ {𝑔}))) → 𝑅 ∈ Fin)
43	6	adantr 481	. . . . . . . . . 10 ⊢ ((𝜑 ∧ ((𝑎 ∈ ℕ ∧ 𝑑 ∈ ℕ) ∧ (𝑎(AP‘𝐾)𝑑) ⊆ (^◡𝐹 “ {𝑔}))) → 𝐻:(1...(𝑊 · (2 · 𝑉)))⟶𝑅)
44		vdwlem9.m	. . . . . . . . . . 11 ⊢ (𝜑 → 𝑀 ∈ ℕ)
45	44	adantr 481	. . . . . . . . . 10 ⊢ ((𝜑 ∧ ((𝑎 ∈ ℕ ∧ 𝑑 ∈ ℕ) ∧ (𝑎(AP‘𝐾)𝑑) ⊆ (^◡𝐹 “ {𝑔}))) → 𝑀 ∈ ℕ)
46		ovex 7308	. . . . . . . . . . . 12 ⊢ (1...𝑊) ∈ V
47		elmapg 8628	. . . . . . . . . . . 12 ⊢ ((𝑅 ∈ Fin ∧ (1...𝑊) ∈ V) → (𝑔 ∈ (𝑅 ↑_m (1...𝑊)) ↔ 𝑔:(1...𝑊)⟶𝑅))
48	42, 46, 47	sylancl 586	. . . . . . . . . . 11 ⊢ ((𝜑 ∧ ((𝑎 ∈ ℕ ∧ 𝑑 ∈ ℕ) ∧ (𝑎(AP‘𝐾)𝑑) ⊆ (^◡𝐹 “ {𝑔}))) → (𝑔 ∈ (𝑅 ↑_m (1...𝑊)) ↔ 𝑔:(1...𝑊)⟶𝑅))
49	37, 48	mpbid 231	. . . . . . . . . 10 ⊢ ((𝜑 ∧ ((𝑎 ∈ ℕ ∧ 𝑑 ∈ ℕ) ∧ (𝑎(AP‘𝐾)𝑑) ⊆ (^◡𝐹 “ {𝑔}))) → 𝑔:(1...𝑊)⟶𝑅)
50	14	adantr 481	. . . . . . . . . 10 ⊢ ((𝜑 ∧ ((𝑎 ∈ ℕ ∧ 𝑑 ∈ ℕ) ∧ (𝑎(AP‘𝐾)𝑑) ⊆ (^◡𝐹 “ {𝑔}))) → 𝐾 ∈ (ℤ_≥‘2))
51	40, 41, 42, 43, 7, 45, 49, 50, 23, 24, 21	vdwlem7 16688	. . . . . . . . 9 ⊢ ((𝜑 ∧ ((𝑎 ∈ ℕ ∧ 𝑑 ∈ ℕ) ∧ (𝑎(AP‘𝐾)𝑑) ⊆ (^◡𝐹 “ {𝑔}))) → (⟨𝑀, 𝐾⟩ PolyAP 𝑔 → (⟨(𝑀 + 1), 𝐾⟩ PolyAP 𝐻 ∨ (𝐾 + 1) MonoAP 𝑔)))
52		olc 865	. . . . . . . . . 10 ⊢ ((𝐾 + 1) MonoAP 𝑔 → (⟨(𝑀 + 1), 𝐾⟩ PolyAP 𝐻 ∨ (𝐾 + 1) MonoAP 𝑔))
53	52	a1i 11	. . . . . . . . 9 ⊢ ((𝜑 ∧ ((𝑎 ∈ ℕ ∧ 𝑑 ∈ ℕ) ∧ (𝑎(AP‘𝐾)𝑑) ⊆ (^◡𝐹 “ {𝑔}))) → ((𝐾 + 1) MonoAP 𝑔 → (⟨(𝑀 + 1), 𝐾⟩ PolyAP 𝐻 ∨ (𝐾 + 1) MonoAP 𝑔)))
54	51, 53	jaod 856	. . . . . . . 8 ⊢ ((𝜑 ∧ ((𝑎 ∈ ℕ ∧ 𝑑 ∈ ℕ) ∧ (𝑎(AP‘𝐾)𝑑) ⊆ (^◡𝐹 “ {𝑔}))) → ((⟨𝑀, 𝐾⟩ PolyAP 𝑔 ∨ (𝐾 + 1) MonoAP 𝑔) → (⟨(𝑀 + 1), 𝐾⟩ PolyAP 𝐻 ∨ (𝐾 + 1) MonoAP 𝑔)))
55		oveq1 7282	. . . . . . . . . . . . . . . . . . 19 ⊢ (𝑥 = 𝑎 → (𝑥 − 1) = (𝑎 − 1))
56	55	oveq1d 7290	. . . . . . . . . . . . . . . . . 18 ⊢ (𝑥 = 𝑎 → ((𝑥 − 1) + 𝑉) = ((𝑎 − 1) + 𝑉))
57	56	oveq2d 7291	. . . . . . . . . . . . . . . . 17 ⊢ (𝑥 = 𝑎 → (𝑊 · ((𝑥 − 1) + 𝑉)) = (𝑊 · ((𝑎 − 1) + 𝑉)))
58	57	oveq2d 7291	. . . . . . . . . . . . . . . 16 ⊢ (𝑥 = 𝑎 → (𝑦 + (𝑊 · ((𝑥 − 1) + 𝑉))) = (𝑦 + (𝑊 · ((𝑎 − 1) + 𝑉))))
59	58	fveq2d 6778	. . . . . . . . . . . . . . 15 ⊢ (𝑥 = 𝑎 → (𝐻‘(𝑦 + (𝑊 · ((𝑥 − 1) + 𝑉)))) = (𝐻‘(𝑦 + (𝑊 · ((𝑎 − 1) + 𝑉)))))
60	59	mpteq2dv 5176	. . . . . . . . . . . . . 14 ⊢ (𝑥 = 𝑎 → (𝑦 ∈ (1...𝑊) ↦ (𝐻‘(𝑦 + (𝑊 · ((𝑥 − 1) + 𝑉))))) = (𝑦 ∈ (1...𝑊) ↦ (𝐻‘(𝑦 + (𝑊 · ((𝑎 − 1) + 𝑉))))))
61	46	mptex 7099	. . . . . . . . . . . . . 14 ⊢ (𝑦 ∈ (1...𝑊) ↦ (𝐻‘(𝑦 + (𝑊 · ((𝑎 − 1) + 𝑉))))) ∈ V
62	60, 7, 61	fvmpt 6875	. . . . . . . . . . . . 13 ⊢ (𝑎 ∈ (1...𝑉) → (𝐹‘𝑎) = (𝑦 ∈ (1...𝑊) ↦ (𝐻‘(𝑦 + (𝑊 · ((𝑎 − 1) + 𝑉))))))
63	35, 62	syl 17	. . . . . . . . . . . 12 ⊢ ((𝜑 ∧ ((𝑎 ∈ ℕ ∧ 𝑑 ∈ ℕ) ∧ (𝑎(AP‘𝐾)𝑑) ⊆ (^◡𝐹 “ {𝑔}))) → (𝐹‘𝑎) = (𝑦 ∈ (1...𝑊) ↦ (𝐻‘(𝑦 + (𝑊 · ((𝑎 − 1) + 𝑉))))))
64	63, 33	eqtr3d 2780	. . . . . . . . . . 11 ⊢ ((𝜑 ∧ ((𝑎 ∈ ℕ ∧ 𝑑 ∈ ℕ) ∧ (𝑎(AP‘𝐾)𝑑) ⊆ (^◡𝐹 “ {𝑔}))) → (𝑦 ∈ (1...𝑊) ↦ (𝐻‘(𝑦 + (𝑊 · ((𝑎 − 1) + 𝑉))))) = 𝑔)
65	64	breq2d 5086	. . . . . . . . . 10 ⊢ ((𝜑 ∧ ((𝑎 ∈ ℕ ∧ 𝑑 ∈ ℕ) ∧ (𝑎(AP‘𝐾)𝑑) ⊆ (^◡𝐹 “ {𝑔}))) → ((𝐾 + 1) MonoAP (𝑦 ∈ (1...𝑊) ↦ (𝐻‘(𝑦 + (𝑊 · ((𝑎 − 1) + 𝑉))))) ↔ (𝐾 + 1) MonoAP 𝑔))
66	17	adantr 481	. . . . . . . . . . . 12 ⊢ ((𝜑 ∧ ((𝑎 ∈ ℕ ∧ 𝑑 ∈ ℕ) ∧ (𝑎(AP‘𝐾)𝑑) ⊆ (^◡𝐹 “ {𝑔}))) → 𝐾 ∈ ℕ₀)
67		peano2nn0 12273	. . . . . . . . . . . 12 ⊢ (𝐾 ∈ ℕ₀ → (𝐾 + 1) ∈ ℕ₀)
68	66, 67	syl 17	. . . . . . . . . . 11 ⊢ ((𝜑 ∧ ((𝑎 ∈ ℕ ∧ 𝑑 ∈ ℕ) ∧ (𝑎(AP‘𝐾)𝑑) ⊆ (^◡𝐹 “ {𝑔}))) → (𝐾 + 1) ∈ ℕ₀)
69		nnm1nn0 12274	. . . . . . . . . . . . . 14 ⊢ (𝑎 ∈ ℕ → (𝑎 − 1) ∈ ℕ₀)
70	23, 69	syl 17	. . . . . . . . . . . . 13 ⊢ ((𝜑 ∧ ((𝑎 ∈ ℕ ∧ 𝑑 ∈ ℕ) ∧ (𝑎(AP‘𝐾)𝑑) ⊆ (^◡𝐹 “ {𝑔}))) → (𝑎 − 1) ∈ ℕ₀)
71		nn0nnaddcl 12264	. . . . . . . . . . . . 13 ⊢ (((𝑎 − 1) ∈ ℕ₀ ∧ 𝑉 ∈ ℕ) → ((𝑎 − 1) + 𝑉) ∈ ℕ)
72	70, 40, 71	syl2anc 584	. . . . . . . . . . . 12 ⊢ ((𝜑 ∧ ((𝑎 ∈ ℕ ∧ 𝑑 ∈ ℕ) ∧ (𝑎(AP‘𝐾)𝑑) ⊆ (^◡𝐹 “ {𝑔}))) → ((𝑎 − 1) + 𝑉) ∈ ℕ)
73	41, 72	nnmulcld 12026	. . . . . . . . . . 11 ⊢ ((𝜑 ∧ ((𝑎 ∈ ℕ ∧ 𝑑 ∈ ℕ) ∧ (𝑎(AP‘𝐾)𝑑) ⊆ (^◡𝐹 “ {𝑔}))) → (𝑊 · ((𝑎 − 1) + 𝑉)) ∈ ℕ)
74	23, 40	nnaddcld 12025	. . . . . . . . . . . . . . 15 ⊢ ((𝜑 ∧ ((𝑎 ∈ ℕ ∧ 𝑑 ∈ ℕ) ∧ (𝑎(AP‘𝐾)𝑑) ⊆ (^◡𝐹 “ {𝑔}))) → (𝑎 + 𝑉) ∈ ℕ)
75	41, 74	nnmulcld 12026	. . . . . . . . . . . . . 14 ⊢ ((𝜑 ∧ ((𝑎 ∈ ℕ ∧ 𝑑 ∈ ℕ) ∧ (𝑎(AP‘𝐾)𝑑) ⊆ (^◡𝐹 “ {𝑔}))) → (𝑊 · (𝑎 + 𝑉)) ∈ ℕ)
76	75	nnzd 12425	. . . . . . . . . . . . 13 ⊢ ((𝜑 ∧ ((𝑎 ∈ ℕ ∧ 𝑑 ∈ ℕ) ∧ (𝑎(AP‘𝐾)𝑑) ⊆ (^◡𝐹 “ {𝑔}))) → (𝑊 · (𝑎 + 𝑉)) ∈ ℤ)
77		2nn 12046	. . . . . . . . . . . . . . . . 17 ⊢ 2 ∈ ℕ
78		nnmulcl 11997	. . . . . . . . . . . . . . . . 17 ⊢ ((2 ∈ ℕ ∧ 𝑉 ∈ ℕ) → (2 · 𝑉) ∈ ℕ)
79	77, 3, 78	sylancr 587	. . . . . . . . . . . . . . . 16 ⊢ (𝜑 → (2 · 𝑉) ∈ ℕ)
80	4, 79	nnmulcld 12026	. . . . . . . . . . . . . . 15 ⊢ (𝜑 → (𝑊 · (2 · 𝑉)) ∈ ℕ)
81	80	nnzd 12425	. . . . . . . . . . . . . 14 ⊢ (𝜑 → (𝑊 · (2 · 𝑉)) ∈ ℤ)
82	81	adantr 481	. . . . . . . . . . . . 13 ⊢ ((𝜑 ∧ ((𝑎 ∈ ℕ ∧ 𝑑 ∈ ℕ) ∧ (𝑎(AP‘𝐾)𝑑) ⊆ (^◡𝐹 “ {𝑔}))) → (𝑊 · (2 · 𝑉)) ∈ ℤ)
83	23	nnred 11988	. . . . . . . . . . . . . . . 16 ⊢ ((𝜑 ∧ ((𝑎 ∈ ℕ ∧ 𝑑 ∈ ℕ) ∧ (𝑎(AP‘𝐾)𝑑) ⊆ (^◡𝐹 “ {𝑔}))) → 𝑎 ∈ ℝ)
84	40	nnred 11988	. . . . . . . . . . . . . . . 16 ⊢ ((𝜑 ∧ ((𝑎 ∈ ℕ ∧ 𝑑 ∈ ℕ) ∧ (𝑎(AP‘𝐾)𝑑) ⊆ (^◡𝐹 “ {𝑔}))) → 𝑉 ∈ ℝ)
85		elfzle2 13260	. . . . . . . . . . . . . . . . 17 ⊢ (𝑎 ∈ (1...𝑉) → 𝑎 ≤ 𝑉)
86	35, 85	syl 17	. . . . . . . . . . . . . . . 16 ⊢ ((𝜑 ∧ ((𝑎 ∈ ℕ ∧ 𝑑 ∈ ℕ) ∧ (𝑎(AP‘𝐾)𝑑) ⊆ (^◡𝐹 “ {𝑔}))) → 𝑎 ≤ 𝑉)
87	83, 84, 84, 86	leadd1dd 11589	. . . . . . . . . . . . . . 15 ⊢ ((𝜑 ∧ ((𝑎 ∈ ℕ ∧ 𝑑 ∈ ℕ) ∧ (𝑎(AP‘𝐾)𝑑) ⊆ (^◡𝐹 “ {𝑔}))) → (𝑎 + 𝑉) ≤ (𝑉 + 𝑉))
88	40	nncnd 11989	. . . . . . . . . . . . . . . 16 ⊢ ((𝜑 ∧ ((𝑎 ∈ ℕ ∧ 𝑑 ∈ ℕ) ∧ (𝑎(AP‘𝐾)𝑑) ⊆ (^◡𝐹 “ {𝑔}))) → 𝑉 ∈ ℂ)
89	88	2timesd 12216	. . . . . . . . . . . . . . 15 ⊢ ((𝜑 ∧ ((𝑎 ∈ ℕ ∧ 𝑑 ∈ ℕ) ∧ (𝑎(AP‘𝐾)𝑑) ⊆ (^◡𝐹 “ {𝑔}))) → (2 · 𝑉) = (𝑉 + 𝑉))
90	87, 89	breqtrrd 5102	. . . . . . . . . . . . . 14 ⊢ ((𝜑 ∧ ((𝑎 ∈ ℕ ∧ 𝑑 ∈ ℕ) ∧ (𝑎(AP‘𝐾)𝑑) ⊆ (^◡𝐹 “ {𝑔}))) → (𝑎 + 𝑉) ≤ (2 · 𝑉))
91	74	nnred 11988	. . . . . . . . . . . . . . 15 ⊢ ((𝜑 ∧ ((𝑎 ∈ ℕ ∧ 𝑑 ∈ ℕ) ∧ (𝑎(AP‘𝐾)𝑑) ⊆ (^◡𝐹 “ {𝑔}))) → (𝑎 + 𝑉) ∈ ℝ)
92	79	nnred 11988	. . . . . . . . . . . . . . . 16 ⊢ (𝜑 → (2 · 𝑉) ∈ ℝ)
93	92	adantr 481	. . . . . . . . . . . . . . 15 ⊢ ((𝜑 ∧ ((𝑎 ∈ ℕ ∧ 𝑑 ∈ ℕ) ∧ (𝑎(AP‘𝐾)𝑑) ⊆ (^◡𝐹 “ {𝑔}))) → (2 · 𝑉) ∈ ℝ)
94	41	nnred 11988	. . . . . . . . . . . . . . 15 ⊢ ((𝜑 ∧ ((𝑎 ∈ ℕ ∧ 𝑑 ∈ ℕ) ∧ (𝑎(AP‘𝐾)𝑑) ⊆ (^◡𝐹 “ {𝑔}))) → 𝑊 ∈ ℝ)
95	41	nngt0d 12022	. . . . . . . . . . . . . . 15 ⊢ ((𝜑 ∧ ((𝑎 ∈ ℕ ∧ 𝑑 ∈ ℕ) ∧ (𝑎(AP‘𝐾)𝑑) ⊆ (^◡𝐹 “ {𝑔}))) → 0 < 𝑊)
96		lemul2 11828	. . . . . . . . . . . . . . 15 ⊢ (((𝑎 + 𝑉) ∈ ℝ ∧ (2 · 𝑉) ∈ ℝ ∧ (𝑊 ∈ ℝ ∧ 0 < 𝑊)) → ((𝑎 + 𝑉) ≤ (2 · 𝑉) ↔ (𝑊 · (𝑎 + 𝑉)) ≤ (𝑊 · (2 · 𝑉))))
97	91, 93, 94, 95, 96	syl112anc 1373	. . . . . . . . . . . . . 14 ⊢ ((𝜑 ∧ ((𝑎 ∈ ℕ ∧ 𝑑 ∈ ℕ) ∧ (𝑎(AP‘𝐾)𝑑) ⊆ (^◡𝐹 “ {𝑔}))) → ((𝑎 + 𝑉) ≤ (2 · 𝑉) ↔ (𝑊 · (𝑎 + 𝑉)) ≤ (𝑊 · (2 · 𝑉))))
98	90, 97	mpbid 231	. . . . . . . . . . . . 13 ⊢ ((𝜑 ∧ ((𝑎 ∈ ℕ ∧ 𝑑 ∈ ℕ) ∧ (𝑎(AP‘𝐾)𝑑) ⊆ (^◡𝐹 “ {𝑔}))) → (𝑊 · (𝑎 + 𝑉)) ≤ (𝑊 · (2 · 𝑉)))
99		eluz2 12588	. . . . . . . . . . . . 13 ⊢ ((𝑊 · (2 · 𝑉)) ∈ (ℤ_≥‘(𝑊 · (𝑎 + 𝑉))) ↔ ((𝑊 · (𝑎 + 𝑉)) ∈ ℤ ∧ (𝑊 · (2 · 𝑉)) ∈ ℤ ∧ (𝑊 · (𝑎 + 𝑉)) ≤ (𝑊 · (2 · 𝑉))))
100	76, 82, 98, 99	syl3anbrc 1342	. . . . . . . . . . . 12 ⊢ ((𝜑 ∧ ((𝑎 ∈ ℕ ∧ 𝑑 ∈ ℕ) ∧ (𝑎(AP‘𝐾)𝑑) ⊆ (^◡𝐹 “ {𝑔}))) → (𝑊 · (2 · 𝑉)) ∈ (ℤ_≥‘(𝑊 · (𝑎 + 𝑉))))
101	41	nncnd 11989	. . . . . . . . . . . . . . 15 ⊢ ((𝜑 ∧ ((𝑎 ∈ ℕ ∧ 𝑑 ∈ ℕ) ∧ (𝑎(AP‘𝐾)𝑑) ⊆ (^◡𝐹 “ {𝑔}))) → 𝑊 ∈ ℂ)
102		1cnd 10970	. . . . . . . . . . . . . . 15 ⊢ ((𝜑 ∧ ((𝑎 ∈ ℕ ∧ 𝑑 ∈ ℕ) ∧ (𝑎(AP‘𝐾)𝑑) ⊆ (^◡𝐹 “ {𝑔}))) → 1 ∈ ℂ)
103	70	nn0cnd 12295	. . . . . . . . . . . . . . . 16 ⊢ ((𝜑 ∧ ((𝑎 ∈ ℕ ∧ 𝑑 ∈ ℕ) ∧ (𝑎(AP‘𝐾)𝑑) ⊆ (^◡𝐹 “ {𝑔}))) → (𝑎 − 1) ∈ ℂ)
104	103, 88	addcld 10994	. . . . . . . . . . . . . . 15 ⊢ ((𝜑 ∧ ((𝑎 ∈ ℕ ∧ 𝑑 ∈ ℕ) ∧ (𝑎(AP‘𝐾)𝑑) ⊆ (^◡𝐹 “ {𝑔}))) → ((𝑎 − 1) + 𝑉) ∈ ℂ)
105	101, 102, 104	adddid 10999	. . . . . . . . . . . . . 14 ⊢ ((𝜑 ∧ ((𝑎 ∈ ℕ ∧ 𝑑 ∈ ℕ) ∧ (𝑎(AP‘𝐾)𝑑) ⊆ (^◡𝐹 “ {𝑔}))) → (𝑊 · (1 + ((𝑎 − 1) + 𝑉))) = ((𝑊 · 1) + (𝑊 · ((𝑎 − 1) + 𝑉))))
106	102, 103, 88	addassd 10997	. . . . . . . . . . . . . . . 16 ⊢ ((𝜑 ∧ ((𝑎 ∈ ℕ ∧ 𝑑 ∈ ℕ) ∧ (𝑎(AP‘𝐾)𝑑) ⊆ (^◡𝐹 “ {𝑔}))) → ((1 + (𝑎 − 1)) + 𝑉) = (1 + ((𝑎 − 1) + 𝑉)))
107		ax-1cn 10929	. . . . . . . . . . . . . . . . . 18 ⊢ 1 ∈ ℂ
108	23	nncnd 11989	. . . . . . . . . . . . . . . . . 18 ⊢ ((𝜑 ∧ ((𝑎 ∈ ℕ ∧ 𝑑 ∈ ℕ) ∧ (𝑎(AP‘𝐾)𝑑) ⊆ (^◡𝐹 “ {𝑔}))) → 𝑎 ∈ ℂ)
109		pncan3 11229	. . . . . . . . . . . . . . . . . 18 ⊢ ((1 ∈ ℂ ∧ 𝑎 ∈ ℂ) → (1 + (𝑎 − 1)) = 𝑎)
110	107, 108, 109	sylancr 587	. . . . . . . . . . . . . . . . 17 ⊢ ((𝜑 ∧ ((𝑎 ∈ ℕ ∧ 𝑑 ∈ ℕ) ∧ (𝑎(AP‘𝐾)𝑑) ⊆ (^◡𝐹 “ {𝑔}))) → (1 + (𝑎 − 1)) = 𝑎)
111	110	oveq1d 7290	. . . . . . . . . . . . . . . 16 ⊢ ((𝜑 ∧ ((𝑎 ∈ ℕ ∧ 𝑑 ∈ ℕ) ∧ (𝑎(AP‘𝐾)𝑑) ⊆ (^◡𝐹 “ {𝑔}))) → ((1 + (𝑎 − 1)) + 𝑉) = (𝑎 + 𝑉))
112	106, 111	eqtr3d 2780	. . . . . . . . . . . . . . 15 ⊢ ((𝜑 ∧ ((𝑎 ∈ ℕ ∧ 𝑑 ∈ ℕ) ∧ (𝑎(AP‘𝐾)𝑑) ⊆ (^◡𝐹 “ {𝑔}))) → (1 + ((𝑎 − 1) + 𝑉)) = (𝑎 + 𝑉))
113	112	oveq2d 7291	. . . . . . . . . . . . . 14 ⊢ ((𝜑 ∧ ((𝑎 ∈ ℕ ∧ 𝑑 ∈ ℕ) ∧ (𝑎(AP‘𝐾)𝑑) ⊆ (^◡𝐹 “ {𝑔}))) → (𝑊 · (1 + ((𝑎 − 1) + 𝑉))) = (𝑊 · (𝑎 + 𝑉)))
114	101	mulid1d 10992	. . . . . . . . . . . . . . 15 ⊢ ((𝜑 ∧ ((𝑎 ∈ ℕ ∧ 𝑑 ∈ ℕ) ∧ (𝑎(AP‘𝐾)𝑑) ⊆ (^◡𝐹 “ {𝑔}))) → (𝑊 · 1) = 𝑊)
115	114	oveq1d 7290	. . . . . . . . . . . . . 14 ⊢ ((𝜑 ∧ ((𝑎 ∈ ℕ ∧ 𝑑 ∈ ℕ) ∧ (𝑎(AP‘𝐾)𝑑) ⊆ (^◡𝐹 “ {𝑔}))) → ((𝑊 · 1) + (𝑊 · ((𝑎 − 1) + 𝑉))) = (𝑊 + (𝑊 · ((𝑎 − 1) + 𝑉))))
116	105, 113, 115	3eqtr3d 2786	. . . . . . . . . . . . 13 ⊢ ((𝜑 ∧ ((𝑎 ∈ ℕ ∧ 𝑑 ∈ ℕ) ∧ (𝑎(AP‘𝐾)𝑑) ⊆ (^◡𝐹 “ {𝑔}))) → (𝑊 · (𝑎 + 𝑉)) = (𝑊 + (𝑊 · ((𝑎 − 1) + 𝑉))))
117	116	fveq2d 6778	. . . . . . . . . . . 12 ⊢ ((𝜑 ∧ ((𝑎 ∈ ℕ ∧ 𝑑 ∈ ℕ) ∧ (𝑎(AP‘𝐾)𝑑) ⊆ (^◡𝐹 “ {𝑔}))) → (ℤ_≥‘(𝑊 · (𝑎 + 𝑉))) = (ℤ_≥‘(𝑊 + (𝑊 · ((𝑎 − 1) + 𝑉)))))
118	100, 117	eleqtrd 2841	. . . . . . . . . . 11 ⊢ ((𝜑 ∧ ((𝑎 ∈ ℕ ∧ 𝑑 ∈ ℕ) ∧ (𝑎(AP‘𝐾)𝑑) ⊆ (^◡𝐹 “ {𝑔}))) → (𝑊 · (2 · 𝑉)) ∈ (ℤ_≥‘(𝑊 + (𝑊 · ((𝑎 − 1) + 𝑉)))))
119		fvoveq1 7298	. . . . . . . . . . . 12 ⊢ (𝑦 = 𝑧 → (𝐻‘(𝑦 + (𝑊 · ((𝑎 − 1) + 𝑉)))) = (𝐻‘(𝑧 + (𝑊 · ((𝑎 − 1) + 𝑉)))))
120	119	cbvmptv 5187	. . . . . . . . . . 11 ⊢ (𝑦 ∈ (1...𝑊) ↦ (𝐻‘(𝑦 + (𝑊 · ((𝑎 − 1) + 𝑉))))) = (𝑧 ∈ (1...𝑊) ↦ (𝐻‘(𝑧 + (𝑊 · ((𝑎 − 1) + 𝑉)))))
121	42, 68, 41, 73, 43, 118, 120	vdwlem2 16683	. . . . . . . . . 10 ⊢ ((𝜑 ∧ ((𝑎 ∈ ℕ ∧ 𝑑 ∈ ℕ) ∧ (𝑎(AP‘𝐾)𝑑) ⊆ (^◡𝐹 “ {𝑔}))) → ((𝐾 + 1) MonoAP (𝑦 ∈ (1...𝑊) ↦ (𝐻‘(𝑦 + (𝑊 · ((𝑎 − 1) + 𝑉))))) → (𝐾 + 1) MonoAP 𝐻))
122	65, 121	sylbird 259	. . . . . . . . 9 ⊢ ((𝜑 ∧ ((𝑎 ∈ ℕ ∧ 𝑑 ∈ ℕ) ∧ (𝑎(AP‘𝐾)𝑑) ⊆ (^◡𝐹 “ {𝑔}))) → ((𝐾 + 1) MonoAP 𝑔 → (𝐾 + 1) MonoAP 𝐻))
123	122	orim2d 964	. . . . . . . 8 ⊢ ((𝜑 ∧ ((𝑎 ∈ ℕ ∧ 𝑑 ∈ ℕ) ∧ (𝑎(AP‘𝐾)𝑑) ⊆ (^◡𝐹 “ {𝑔}))) → ((⟨(𝑀 + 1), 𝐾⟩ PolyAP 𝐻 ∨ (𝐾 + 1) MonoAP 𝑔) → (⟨(𝑀 + 1), 𝐾⟩ PolyAP 𝐻 ∨ (𝐾 + 1) MonoAP 𝐻)))
124	54, 123	syld 47	. . . . . . 7 ⊢ ((𝜑 ∧ ((𝑎 ∈ ℕ ∧ 𝑑 ∈ ℕ) ∧ (𝑎(AP‘𝐾)𝑑) ⊆ (^◡𝐹 “ {𝑔}))) → ((⟨𝑀, 𝐾⟩ PolyAP 𝑔 ∨ (𝐾 + 1) MonoAP 𝑔) → (⟨(𝑀 + 1), 𝐾⟩ PolyAP 𝐻 ∨ (𝐾 + 1) MonoAP 𝐻)))
125	39, 124	mpd 15	. . . . . 6 ⊢ ((𝜑 ∧ ((𝑎 ∈ ℕ ∧ 𝑑 ∈ ℕ) ∧ (𝑎(AP‘𝐾)𝑑) ⊆ (^◡𝐹 “ {𝑔}))) → (⟨(𝑀 + 1), 𝐾⟩ PolyAP 𝐻 ∨ (𝐾 + 1) MonoAP 𝐻))
126	125	expr 457	. . . . 5 ⊢ ((𝜑 ∧ (𝑎 ∈ ℕ ∧ 𝑑 ∈ ℕ)) → ((𝑎(AP‘𝐾)𝑑) ⊆ (^◡𝐹 “ {𝑔}) → (⟨(𝑀 + 1), 𝐾⟩ PolyAP 𝐻 ∨ (𝐾 + 1) MonoAP 𝐻)))
127	126	rexlimdvva 3223	. . . 4 ⊢ (𝜑 → (∃𝑎 ∈ ℕ ∃𝑑 ∈ ℕ (𝑎(AP‘𝐾)𝑑) ⊆ (^◡𝐹 “ {𝑔}) → (⟨(𝑀 + 1), 𝐾⟩ PolyAP 𝐻 ∨ (𝐾 + 1) MonoAP 𝐻)))
128	127	exlimdv 1936	. . 3 ⊢ (𝜑 → (∃𝑔∃𝑎 ∈ ℕ ∃𝑑 ∈ ℕ (𝑎(AP‘𝐾)𝑑) ⊆ (^◡𝐹 “ {𝑔}) → (⟨(𝑀 + 1), 𝐾⟩ PolyAP 𝐻 ∨ (𝐾 + 1) MonoAP 𝐻)))
129	18, 128	sylbid 239	. 2 ⊢ (𝜑 → (𝐾 MonoAP 𝐹 → (⟨(𝑀 + 1), 𝐾⟩ PolyAP 𝐻 ∨ (𝐾 + 1) MonoAP 𝐻)))
130	13, 129	mpd 15	1 ⊢ (𝜑 → (⟨(𝑀 + 1), 𝐾⟩ PolyAP 𝐻 ∨ (𝐾 + 1) MonoAP 𝐻))

Colors of variables: wff setvar class

Syntax hints: → wi 4 ↔ wb 205 ∧ wa 396 ∨ wo 844 = wceq 1539 ∃wex 1782 ∈ wcel 2106 ∀wral 3064 ∃wrex 3065 Vcvv 3432 ⊆ wss 3887 {csn 4561 ⟨cop 4567 class class class wbr 5074 ↦ cmpt 5157 ^◡ccnv 5588 “ cima 5592 Fn wfn 6428 ⟶wf 6429 ‘cfv 6433 (class class class)co 7275 ↑_m cmap 8615 Fincfn 8733 ℂcc 10869 ℝcr 10870 0cc0 10871 1c1 10872 + caddc 10874 · cmul 10876 < clt 11009 ≤ cle 11010 − cmin 11205 ℕcn 11973 2c2 12028 ℕ₀cn0 12233 ℤcz 12319 ℤ_≥cuz 12582 ...cfz 13239 APcvdwa 16666 MonoAP cvdwm 16667 PolyAP cvdwp 16668

This theorem was proved from axioms: ax-mp 5 ax-1 6 ax-2 7 ax-3 8 ax-gen 1798 ax-4 1812 ax-5 1913 ax-6 1971 ax-7 2011 ax-8 2108 ax-9 2116 ax-10 2137 ax-11 2154 ax-12 2171 ax-ext 2709 ax-rep 5209 ax-sep 5223 ax-nul 5230 ax-pow 5288 ax-pr 5352 ax-un 7588 ax-cnex 10927 ax-resscn 10928 ax-1cn 10929 ax-icn 10930 ax-addcl 10931 ax-addrcl 10932 ax-mulcl 10933 ax-mulrcl 10934 ax-mulcom 10935 ax-addass 10936 ax-mulass 10937 ax-distr 10938 ax-i2m1 10939 ax-1ne0 10940 ax-1rid 10941 ax-rnegex 10942 ax-rrecex 10943 ax-cnre 10944 ax-pre-lttri 10945 ax-pre-lttrn 10946 ax-pre-ltadd 10947 ax-pre-mulgt0 10948

This theorem depends on definitions: df-bi 206 df-an 397 df-or 845 df-3or 1087 df-3an 1088 df-tru 1542 df-fal 1552 df-ex 1783 df-nf 1787 df-sb 2068 df-mo 2540 df-eu 2569 df-clab 2716 df-cleq 2730 df-clel 2816 df-nfc 2889 df-ne 2944 df-nel 3050 df-ral 3069 df-rex 3070 df-reu 3072 df-rab 3073 df-v 3434 df-sbc 3717 df-csb 3833 df-dif 3890 df-un 3892 df-in 3894 df-ss 3904 df-pss 3906 df-nul 4257 df-if 4460 df-pw 4535 df-sn 4562 df-pr 4564 df-op 4568 df-uni 4840 df-int 4880 df-iun 4926 df-br 5075 df-opab 5137 df-mpt 5158 df-tr 5192 df-id 5489 df-eprel 5495 df-po 5503 df-so 5504 df-fr 5544 df-we 5546 df-xp 5595 df-rel 5596 df-cnv 5597 df-co 5598 df-dm 5599 df-rn 5600 df-res 5601 df-ima 5602 df-pred 6202 df-ord 6269 df-on 6270 df-lim 6271 df-suc 6272 df-iota 6391 df-fun 6435 df-fn 6436 df-f 6437 df-f1 6438 df-fo 6439 df-f1o 6440 df-fv 6441 df-riota 7232 df-ov 7278 df-oprab 7279 df-mpo 7280 df-om 7713 df-1st 7831 df-2nd 7832 df-frecs 8097 df-wrecs 8128 df-recs 8202 df-rdg 8241 df-1o 8297 df-oadd 8301 df-er 8498 df-map 8617 df-en 8734 df-dom 8735 df-sdom 8736 df-fin 8737 df-dju 9659 df-card 9697 df-pnf 11011 df-mnf 11012 df-xr 11013 df-ltxr 11014 df-le 11015 df-sub 11207 df-neg 11208 df-nn 11974 df-2 12036 df-n0 12234 df-z 12320 df-uz 12583 df-rp 12731 df-fz 13240 df-hash 14045 df-vdwap 16669 df-vdwmc 16670 df-vdwpc 16671

This theorem is referenced by: vdwlem10 16691

W3C validator