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 16915

Description: Lemma for vdw 16920. (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 5100	. . 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 16910	. . . 4 ⊢ (𝜑 → 𝐹:(1...𝑉)⟶(𝑅 ↑_m (1...𝑊)))
9		ovex 7389	. . . . 5 ⊢ (𝑅 ↑_m (1...𝑊)) ∈ V
10		ovex 7389	. . . . 5 ⊢ (1...𝑉) ∈ V
11	9, 10	elmap 8807	. . . 4 ⊢ (𝐹 ∈ ((𝑅 ↑_m (1...𝑊)) ↑_m (1...𝑉)) ↔ 𝐹:(1...𝑉)⟶(𝑅 ↑_m (1...𝑊)))
12	8, 11	sylibr 234	. . 3 ⊢ (𝜑 → 𝐹 ∈ ((𝑅 ↑_m (1...𝑊)) ↑_m (1...𝑉)))
13	1, 2, 12	rspcdva 3575	. 2 ⊢ (𝜑 → 𝐾 MonoAP 𝐹)
14		vdwlem9.k	. . . . . 6 ⊢ (𝜑 → 𝐾 ∈ (ℤ_≥‘2))
15		eluz2nn 12799	. . . . . 6 ⊢ (𝐾 ∈ (ℤ_≥‘2) → 𝐾 ∈ ℕ)
16	14, 15	syl 17	. . . . 5 ⊢ (𝜑 → 𝐾 ∈ ℕ)
17	16	nnnn0d 12460	. . . 4 ⊢ (𝜑 → 𝐾 ∈ ℕ₀)
18	10, 17, 8	vdwmc 16904	. . 3 ⊢ (𝜑 → (𝐾 MonoAP 𝐹 ↔ ∃𝑔∃𝑎 ∈ ℕ ∃𝑑 ∈ ℕ (𝑎(AP‘𝐾)𝑑) ⊆ (^◡𝐹 “ {𝑔})))
19		vdwlem9.g	. . . . . . . . 9 ⊢ (𝜑 → ∀𝑔 ∈ (𝑅 ↑_m (1...𝑊))(⟨𝑀, 𝐾⟩ PolyAP 𝑔 ∨ (𝐾 + 1) MonoAP 𝑔))
20	19	adantr 480	. . . . . . . 8 ⊢ ((𝜑 ∧ ((𝑎 ∈ ℕ ∧ 𝑑 ∈ ℕ) ∧ (𝑎(AP‘𝐾)𝑑) ⊆ (^◡𝐹 “ {𝑔}))) → ∀𝑔 ∈ (𝑅 ↑_m (1...𝑊))(⟨𝑀, 𝐾⟩ PolyAP 𝑔 ∨ (𝐾 + 1) MonoAP 𝑔))
21		simprr 772	. . . . . . . . . . . 12 ⊢ ((𝜑 ∧ ((𝑎 ∈ ℕ ∧ 𝑑 ∈ ℕ) ∧ (𝑎(AP‘𝐾)𝑑) ⊆ (^◡𝐹 “ {𝑔}))) → (𝑎(AP‘𝐾)𝑑) ⊆ (^◡𝐹 “ {𝑔}))
22	16	adantr 480	. . . . . . . . . . . . 13 ⊢ ((𝜑 ∧ ((𝑎 ∈ ℕ ∧ 𝑑 ∈ ℕ) ∧ (𝑎(AP‘𝐾)𝑑) ⊆ (^◡𝐹 “ {𝑔}))) → 𝐾 ∈ ℕ)
23		simprll 778	. . . . . . . . . . . . 13 ⊢ ((𝜑 ∧ ((𝑎 ∈ ℕ ∧ 𝑑 ∈ ℕ) ∧ (𝑎(AP‘𝐾)𝑑) ⊆ (^◡𝐹 “ {𝑔}))) → 𝑎 ∈ ℕ)
24		simprlr 779	. . . . . . . . . . . . 13 ⊢ ((𝜑 ∧ ((𝑎 ∈ ℕ ∧ 𝑑 ∈ ℕ) ∧ (𝑎(AP‘𝐾)𝑑) ⊆ (^◡𝐹 “ {𝑔}))) → 𝑑 ∈ ℕ)
25		vdwapid1 16901	. . . . . . . . . . . . 13 ⊢ ((𝐾 ∈ ℕ ∧ 𝑎 ∈ ℕ ∧ 𝑑 ∈ ℕ) → 𝑎 ∈ (𝑎(AP‘𝐾)𝑑))
26	22, 23, 24, 25	syl3anc 1373	. . . . . . . . . . . 12 ⊢ ((𝜑 ∧ ((𝑎 ∈ ℕ ∧ 𝑑 ∈ ℕ) ∧ (𝑎(AP‘𝐾)𝑑) ⊆ (^◡𝐹 “ {𝑔}))) → 𝑎 ∈ (𝑎(AP‘𝐾)𝑑))
27	21, 26	sseldd 3932	. . . . . . . . . . 11 ⊢ ((𝜑 ∧ ((𝑎 ∈ ℕ ∧ 𝑑 ∈ ℕ) ∧ (𝑎(AP‘𝐾)𝑑) ⊆ (^◡𝐹 “ {𝑔}))) → 𝑎 ∈ (^◡𝐹 “ {𝑔}))
28	8	ffnd 6661	. . . . . . . . . . . . 13 ⊢ (𝜑 → 𝐹 Fn (1...𝑉))
29	28	adantr 480	. . . . . . . . . . . 12 ⊢ ((𝜑 ∧ ((𝑎 ∈ ℕ ∧ 𝑑 ∈ ℕ) ∧ (𝑎(AP‘𝐾)𝑑) ⊆ (^◡𝐹 “ {𝑔}))) → 𝐹 Fn (1...𝑉))
30		fniniseg 7003	. . . . . . . . . . . 12 ⊢ (𝐹 Fn (1...𝑉) → (𝑎 ∈ (^◡𝐹 “ {𝑔}) ↔ (𝑎 ∈ (1...𝑉) ∧ (𝐹‘𝑎) = 𝑔)))
31	29, 30	syl 17	. . . . . . . . . . 11 ⊢ ((𝜑 ∧ ((𝑎 ∈ ℕ ∧ 𝑑 ∈ ℕ) ∧ (𝑎(AP‘𝐾)𝑑) ⊆ (^◡𝐹 “ {𝑔}))) → (𝑎 ∈ (^◡𝐹 “ {𝑔}) ↔ (𝑎 ∈ (1...𝑉) ∧ (𝐹‘𝑎) = 𝑔)))
32	27, 31	mpbid 232	. . . . . . . . . 10 ⊢ ((𝜑 ∧ ((𝑎 ∈ ℕ ∧ 𝑑 ∈ ℕ) ∧ (𝑎(AP‘𝐾)𝑑) ⊆ (^◡𝐹 “ {𝑔}))) → (𝑎 ∈ (1...𝑉) ∧ (𝐹‘𝑎) = 𝑔))
33	32	simprd 495	. . . . . . . . 9 ⊢ ((𝜑 ∧ ((𝑎 ∈ ℕ ∧ 𝑑 ∈ ℕ) ∧ (𝑎(AP‘𝐾)𝑑) ⊆ (^◡𝐹 “ {𝑔}))) → (𝐹‘𝑎) = 𝑔)
34	8	adantr 480	. . . . . . . . . 10 ⊢ ((𝜑 ∧ ((𝑎 ∈ ℕ ∧ 𝑑 ∈ ℕ) ∧ (𝑎(AP‘𝐾)𝑑) ⊆ (^◡𝐹 “ {𝑔}))) → 𝐹:(1...𝑉)⟶(𝑅 ↑_m (1...𝑊)))
35	32	simpld 494	. . . . . . . . . 10 ⊢ ((𝜑 ∧ ((𝑎 ∈ ℕ ∧ 𝑑 ∈ ℕ) ∧ (𝑎(AP‘𝐾)𝑑) ⊆ (^◡𝐹 “ {𝑔}))) → 𝑎 ∈ (1...𝑉))
36	34, 35	ffvelcdmd 7028	. . . . . . . . 9 ⊢ ((𝜑 ∧ ((𝑎 ∈ ℕ ∧ 𝑑 ∈ ℕ) ∧ (𝑎(AP‘𝐾)𝑑) ⊆ (^◡𝐹 “ {𝑔}))) → (𝐹‘𝑎) ∈ (𝑅 ↑_m (1...𝑊)))
37	33, 36	eqeltrrd 2835	. . . . . . . 8 ⊢ ((𝜑 ∧ ((𝑎 ∈ ℕ ∧ 𝑑 ∈ ℕ) ∧ (𝑎(AP‘𝐾)𝑑) ⊆ (^◡𝐹 “ {𝑔}))) → 𝑔 ∈ (𝑅 ↑_m (1...𝑊)))
38		rsp 3222	. . . . . . . 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 480	. . . . . . . . . 10 ⊢ ((𝜑 ∧ ((𝑎 ∈ ℕ ∧ 𝑑 ∈ ℕ) ∧ (𝑎(AP‘𝐾)𝑑) ⊆ (^◡𝐹 “ {𝑔}))) → 𝑉 ∈ ℕ)
41	4	adantr 480	. . . . . . . . . 10 ⊢ ((𝜑 ∧ ((𝑎 ∈ ℕ ∧ 𝑑 ∈ ℕ) ∧ (𝑎(AP‘𝐾)𝑑) ⊆ (^◡𝐹 “ {𝑔}))) → 𝑊 ∈ ℕ)
42	5	adantr 480	. . . . . . . . . 10 ⊢ ((𝜑 ∧ ((𝑎 ∈ ℕ ∧ 𝑑 ∈ ℕ) ∧ (𝑎(AP‘𝐾)𝑑) ⊆ (^◡𝐹 “ {𝑔}))) → 𝑅 ∈ Fin)
43	6	adantr 480	. . . . . . . . . 10 ⊢ ((𝜑 ∧ ((𝑎 ∈ ℕ ∧ 𝑑 ∈ ℕ) ∧ (𝑎(AP‘𝐾)𝑑) ⊆ (^◡𝐹 “ {𝑔}))) → 𝐻:(1...(𝑊 · (2 · 𝑉)))⟶𝑅)
44		vdwlem9.m	. . . . . . . . . . 11 ⊢ (𝜑 → 𝑀 ∈ ℕ)
45	44	adantr 480	. . . . . . . . . 10 ⊢ ((𝜑 ∧ ((𝑎 ∈ ℕ ∧ 𝑑 ∈ ℕ) ∧ (𝑎(AP‘𝐾)𝑑) ⊆ (^◡𝐹 “ {𝑔}))) → 𝑀 ∈ ℕ)
46		ovex 7389	. . . . . . . . . . . 12 ⊢ (1...𝑊) ∈ V
47		elmapg 8774	. . . . . . . . . . . 12 ⊢ ((𝑅 ∈ Fin ∧ (1...𝑊) ∈ V) → (𝑔 ∈ (𝑅 ↑_m (1...𝑊)) ↔ 𝑔:(1...𝑊)⟶𝑅))
48	42, 46, 47	sylancl 586	. . . . . . . . . . 11 ⊢ ((𝜑 ∧ ((𝑎 ∈ ℕ ∧ 𝑑 ∈ ℕ) ∧ (𝑎(AP‘𝐾)𝑑) ⊆ (^◡𝐹 “ {𝑔}))) → (𝑔 ∈ (𝑅 ↑_m (1...𝑊)) ↔ 𝑔:(1...𝑊)⟶𝑅))
49	37, 48	mpbid 232	. . . . . . . . . 10 ⊢ ((𝜑 ∧ ((𝑎 ∈ ℕ ∧ 𝑑 ∈ ℕ) ∧ (𝑎(AP‘𝐾)𝑑) ⊆ (^◡𝐹 “ {𝑔}))) → 𝑔:(1...𝑊)⟶𝑅)
50	14	adantr 480	. . . . . . . . . 10 ⊢ ((𝜑 ∧ ((𝑎 ∈ ℕ ∧ 𝑑 ∈ ℕ) ∧ (𝑎(AP‘𝐾)𝑑) ⊆ (^◡𝐹 “ {𝑔}))) → 𝐾 ∈ (ℤ_≥‘2))
51	40, 41, 42, 43, 7, 45, 49, 50, 23, 24, 21	vdwlem7 16913	. . . . . . . . 9 ⊢ ((𝜑 ∧ ((𝑎 ∈ ℕ ∧ 𝑑 ∈ ℕ) ∧ (𝑎(AP‘𝐾)𝑑) ⊆ (^◡𝐹 “ {𝑔}))) → (⟨𝑀, 𝐾⟩ PolyAP 𝑔 → (⟨(𝑀 + 1), 𝐾⟩ PolyAP 𝐻 ∨ (𝐾 + 1) MonoAP 𝑔)))
52		olc 868	. . . . . . . . . 10 ⊢ ((𝐾 + 1) MonoAP 𝑔 → (⟨(𝑀 + 1), 𝐾⟩ PolyAP 𝐻 ∨ (𝐾 + 1) MonoAP 𝑔))
53	52	a1i 11	. . . . . . . . 9 ⊢ ((𝜑 ∧ ((𝑎 ∈ ℕ ∧ 𝑑 ∈ ℕ) ∧ (𝑎(AP‘𝐾)𝑑) ⊆ (^◡𝐹 “ {𝑔}))) → ((𝐾 + 1) MonoAP 𝑔 → (⟨(𝑀 + 1), 𝐾⟩ PolyAP 𝐻 ∨ (𝐾 + 1) MonoAP 𝑔)))
54	51, 53	jaod 859	. . . . . . . 8 ⊢ ((𝜑 ∧ ((𝑎 ∈ ℕ ∧ 𝑑 ∈ ℕ) ∧ (𝑎(AP‘𝐾)𝑑) ⊆ (^◡𝐹 “ {𝑔}))) → ((⟨𝑀, 𝐾⟩ PolyAP 𝑔 ∨ (𝐾 + 1) MonoAP 𝑔) → (⟨(𝑀 + 1), 𝐾⟩ PolyAP 𝐻 ∨ (𝐾 + 1) MonoAP 𝑔)))
55		oveq1 7363	. . . . . . . . . . . . . . . . . . 19 ⊢ (𝑥 = 𝑎 → (𝑥 − 1) = (𝑎 − 1))
56	55	oveq1d 7371	. . . . . . . . . . . . . . . . . 18 ⊢ (𝑥 = 𝑎 → ((𝑥 − 1) + 𝑉) = ((𝑎 − 1) + 𝑉))
57	56	oveq2d 7372	. . . . . . . . . . . . . . . . 17 ⊢ (𝑥 = 𝑎 → (𝑊 · ((𝑥 − 1) + 𝑉)) = (𝑊 · ((𝑎 − 1) + 𝑉)))
58	57	oveq2d 7372	. . . . . . . . . . . . . . . 16 ⊢ (𝑥 = 𝑎 → (𝑦 + (𝑊 · ((𝑥 − 1) + 𝑉))) = (𝑦 + (𝑊 · ((𝑎 − 1) + 𝑉))))
59	58	fveq2d 6836	. . . . . . . . . . . . . . 15 ⊢ (𝑥 = 𝑎 → (𝐻‘(𝑦 + (𝑊 · ((𝑥 − 1) + 𝑉)))) = (𝐻‘(𝑦 + (𝑊 · ((𝑎 − 1) + 𝑉)))))
60	59	mpteq2dv 5190	. . . . . . . . . . . . . 14 ⊢ (𝑥 = 𝑎 → (𝑦 ∈ (1...𝑊) ↦ (𝐻‘(𝑦 + (𝑊 · ((𝑥 − 1) + 𝑉))))) = (𝑦 ∈ (1...𝑊) ↦ (𝐻‘(𝑦 + (𝑊 · ((𝑎 − 1) + 𝑉))))))
61	46	mptex 7167	. . . . . . . . . . . . . 14 ⊢ (𝑦 ∈ (1...𝑊) ↦ (𝐻‘(𝑦 + (𝑊 · ((𝑎 − 1) + 𝑉))))) ∈ V
62	60, 7, 61	fvmpt 6939	. . . . . . . . . . . . 13 ⊢ (𝑎 ∈ (1...𝑉) → (𝐹‘𝑎) = (𝑦 ∈ (1...𝑊) ↦ (𝐻‘(𝑦 + (𝑊 · ((𝑎 − 1) + 𝑉))))))
63	35, 62	syl 17	. . . . . . . . . . . 12 ⊢ ((𝜑 ∧ ((𝑎 ∈ ℕ ∧ 𝑑 ∈ ℕ) ∧ (𝑎(AP‘𝐾)𝑑) ⊆ (^◡𝐹 “ {𝑔}))) → (𝐹‘𝑎) = (𝑦 ∈ (1...𝑊) ↦ (𝐻‘(𝑦 + (𝑊 · ((𝑎 − 1) + 𝑉))))))
64	63, 33	eqtr3d 2771	. . . . . . . . . . 11 ⊢ ((𝜑 ∧ ((𝑎 ∈ ℕ ∧ 𝑑 ∈ ℕ) ∧ (𝑎(AP‘𝐾)𝑑) ⊆ (^◡𝐹 “ {𝑔}))) → (𝑦 ∈ (1...𝑊) ↦ (𝐻‘(𝑦 + (𝑊 · ((𝑎 − 1) + 𝑉))))) = 𝑔)
65	64	breq2d 5108	. . . . . . . . . 10 ⊢ ((𝜑 ∧ ((𝑎 ∈ ℕ ∧ 𝑑 ∈ ℕ) ∧ (𝑎(AP‘𝐾)𝑑) ⊆ (^◡𝐹 “ {𝑔}))) → ((𝐾 + 1) MonoAP (𝑦 ∈ (1...𝑊) ↦ (𝐻‘(𝑦 + (𝑊 · ((𝑎 − 1) + 𝑉))))) ↔ (𝐾 + 1) MonoAP 𝑔))
66	17	adantr 480	. . . . . . . . . . . 12 ⊢ ((𝜑 ∧ ((𝑎 ∈ ℕ ∧ 𝑑 ∈ ℕ) ∧ (𝑎(AP‘𝐾)𝑑) ⊆ (^◡𝐹 “ {𝑔}))) → 𝐾 ∈ ℕ₀)
67		peano2nn0 12439	. . . . . . . . . . . 12 ⊢ (𝐾 ∈ ℕ₀ → (𝐾 + 1) ∈ ℕ₀)
68	66, 67	syl 17	. . . . . . . . . . 11 ⊢ ((𝜑 ∧ ((𝑎 ∈ ℕ ∧ 𝑑 ∈ ℕ) ∧ (𝑎(AP‘𝐾)𝑑) ⊆ (^◡𝐹 “ {𝑔}))) → (𝐾 + 1) ∈ ℕ₀)
69		nnm1nn0 12440	. . . . . . . . . . . . . 14 ⊢ (𝑎 ∈ ℕ → (𝑎 − 1) ∈ ℕ₀)
70	23, 69	syl 17	. . . . . . . . . . . . 13 ⊢ ((𝜑 ∧ ((𝑎 ∈ ℕ ∧ 𝑑 ∈ ℕ) ∧ (𝑎(AP‘𝐾)𝑑) ⊆ (^◡𝐹 “ {𝑔}))) → (𝑎 − 1) ∈ ℕ₀)
71		nn0nnaddcl 12430	. . . . . . . . . . . . 13 ⊢ (((𝑎 − 1) ∈ ℕ₀ ∧ 𝑉 ∈ ℕ) → ((𝑎 − 1) + 𝑉) ∈ ℕ)
72	70, 40, 71	syl2anc 584	. . . . . . . . . . . 12 ⊢ ((𝜑 ∧ ((𝑎 ∈ ℕ ∧ 𝑑 ∈ ℕ) ∧ (𝑎(AP‘𝐾)𝑑) ⊆ (^◡𝐹 “ {𝑔}))) → ((𝑎 − 1) + 𝑉) ∈ ℕ)
73	41, 72	nnmulcld 12196	. . . . . . . . . . 11 ⊢ ((𝜑 ∧ ((𝑎 ∈ ℕ ∧ 𝑑 ∈ ℕ) ∧ (𝑎(AP‘𝐾)𝑑) ⊆ (^◡𝐹 “ {𝑔}))) → (𝑊 · ((𝑎 − 1) + 𝑉)) ∈ ℕ)
74	23, 40	nnaddcld 12195	. . . . . . . . . . . . . . 15 ⊢ ((𝜑 ∧ ((𝑎 ∈ ℕ ∧ 𝑑 ∈ ℕ) ∧ (𝑎(AP‘𝐾)𝑑) ⊆ (^◡𝐹 “ {𝑔}))) → (𝑎 + 𝑉) ∈ ℕ)
75	41, 74	nnmulcld 12196	. . . . . . . . . . . . . 14 ⊢ ((𝜑 ∧ ((𝑎 ∈ ℕ ∧ 𝑑 ∈ ℕ) ∧ (𝑎(AP‘𝐾)𝑑) ⊆ (^◡𝐹 “ {𝑔}))) → (𝑊 · (𝑎 + 𝑉)) ∈ ℕ)
76	75	nnzd 12512	. . . . . . . . . . . . 13 ⊢ ((𝜑 ∧ ((𝑎 ∈ ℕ ∧ 𝑑 ∈ ℕ) ∧ (𝑎(AP‘𝐾)𝑑) ⊆ (^◡𝐹 “ {𝑔}))) → (𝑊 · (𝑎 + 𝑉)) ∈ ℤ)
77		2nn 12216	. . . . . . . . . . . . . . . . 17 ⊢ 2 ∈ ℕ
78		nnmulcl 12167	. . . . . . . . . . . . . . . . 17 ⊢ ((2 ∈ ℕ ∧ 𝑉 ∈ ℕ) → (2 · 𝑉) ∈ ℕ)
79	77, 3, 78	sylancr 587	. . . . . . . . . . . . . . . 16 ⊢ (𝜑 → (2 · 𝑉) ∈ ℕ)
80	4, 79	nnmulcld 12196	. . . . . . . . . . . . . . 15 ⊢ (𝜑 → (𝑊 · (2 · 𝑉)) ∈ ℕ)
81	80	nnzd 12512	. . . . . . . . . . . . . 14 ⊢ (𝜑 → (𝑊 · (2 · 𝑉)) ∈ ℤ)
82	81	adantr 480	. . . . . . . . . . . . 13 ⊢ ((𝜑 ∧ ((𝑎 ∈ ℕ ∧ 𝑑 ∈ ℕ) ∧ (𝑎(AP‘𝐾)𝑑) ⊆ (^◡𝐹 “ {𝑔}))) → (𝑊 · (2 · 𝑉)) ∈ ℤ)
83	23	nnred 12158	. . . . . . . . . . . . . . . 16 ⊢ ((𝜑 ∧ ((𝑎 ∈ ℕ ∧ 𝑑 ∈ ℕ) ∧ (𝑎(AP‘𝐾)𝑑) ⊆ (^◡𝐹 “ {𝑔}))) → 𝑎 ∈ ℝ)
84	40	nnred 12158	. . . . . . . . . . . . . . . 16 ⊢ ((𝜑 ∧ ((𝑎 ∈ ℕ ∧ 𝑑 ∈ ℕ) ∧ (𝑎(AP‘𝐾)𝑑) ⊆ (^◡𝐹 “ {𝑔}))) → 𝑉 ∈ ℝ)
85		elfzle2 13442	. . . . . . . . . . . . . . . . 17 ⊢ (𝑎 ∈ (1...𝑉) → 𝑎 ≤ 𝑉)
86	35, 85	syl 17	. . . . . . . . . . . . . . . 16 ⊢ ((𝜑 ∧ ((𝑎 ∈ ℕ ∧ 𝑑 ∈ ℕ) ∧ (𝑎(AP‘𝐾)𝑑) ⊆ (^◡𝐹 “ {𝑔}))) → 𝑎 ≤ 𝑉)
87	83, 84, 84, 86	leadd1dd 11749	. . . . . . . . . . . . . . 15 ⊢ ((𝜑 ∧ ((𝑎 ∈ ℕ ∧ 𝑑 ∈ ℕ) ∧ (𝑎(AP‘𝐾)𝑑) ⊆ (^◡𝐹 “ {𝑔}))) → (𝑎 + 𝑉) ≤ (𝑉 + 𝑉))
88	40	nncnd 12159	. . . . . . . . . . . . . . . 16 ⊢ ((𝜑 ∧ ((𝑎 ∈ ℕ ∧ 𝑑 ∈ ℕ) ∧ (𝑎(AP‘𝐾)𝑑) ⊆ (^◡𝐹 “ {𝑔}))) → 𝑉 ∈ ℂ)
89	88	2timesd 12382	. . . . . . . . . . . . . . 15 ⊢ ((𝜑 ∧ ((𝑎 ∈ ℕ ∧ 𝑑 ∈ ℕ) ∧ (𝑎(AP‘𝐾)𝑑) ⊆ (^◡𝐹 “ {𝑔}))) → (2 · 𝑉) = (𝑉 + 𝑉))
90	87, 89	breqtrrd 5124	. . . . . . . . . . . . . 14 ⊢ ((𝜑 ∧ ((𝑎 ∈ ℕ ∧ 𝑑 ∈ ℕ) ∧ (𝑎(AP‘𝐾)𝑑) ⊆ (^◡𝐹 “ {𝑔}))) → (𝑎 + 𝑉) ≤ (2 · 𝑉))
91	74	nnred 12158	. . . . . . . . . . . . . . 15 ⊢ ((𝜑 ∧ ((𝑎 ∈ ℕ ∧ 𝑑 ∈ ℕ) ∧ (𝑎(AP‘𝐾)𝑑) ⊆ (^◡𝐹 “ {𝑔}))) → (𝑎 + 𝑉) ∈ ℝ)
92	79	nnred 12158	. . . . . . . . . . . . . . . 16 ⊢ (𝜑 → (2 · 𝑉) ∈ ℝ)
93	92	adantr 480	. . . . . . . . . . . . . . 15 ⊢ ((𝜑 ∧ ((𝑎 ∈ ℕ ∧ 𝑑 ∈ ℕ) ∧ (𝑎(AP‘𝐾)𝑑) ⊆ (^◡𝐹 “ {𝑔}))) → (2 · 𝑉) ∈ ℝ)
94	41	nnred 12158	. . . . . . . . . . . . . . 15 ⊢ ((𝜑 ∧ ((𝑎 ∈ ℕ ∧ 𝑑 ∈ ℕ) ∧ (𝑎(AP‘𝐾)𝑑) ⊆ (^◡𝐹 “ {𝑔}))) → 𝑊 ∈ ℝ)
95	41	nngt0d 12192	. . . . . . . . . . . . . . 15 ⊢ ((𝜑 ∧ ((𝑎 ∈ ℕ ∧ 𝑑 ∈ ℕ) ∧ (𝑎(AP‘𝐾)𝑑) ⊆ (^◡𝐹 “ {𝑔}))) → 0 < 𝑊)
96		lemul2 11992	. . . . . . . . . . . . . . 15 ⊢ (((𝑎 + 𝑉) ∈ ℝ ∧ (2 · 𝑉) ∈ ℝ ∧ (𝑊 ∈ ℝ ∧ 0 < 𝑊)) → ((𝑎 + 𝑉) ≤ (2 · 𝑉) ↔ (𝑊 · (𝑎 + 𝑉)) ≤ (𝑊 · (2 · 𝑉))))
97	91, 93, 94, 95, 96	syl112anc 1376	. . . . . . . . . . . . . 14 ⊢ ((𝜑 ∧ ((𝑎 ∈ ℕ ∧ 𝑑 ∈ ℕ) ∧ (𝑎(AP‘𝐾)𝑑) ⊆ (^◡𝐹 “ {𝑔}))) → ((𝑎 + 𝑉) ≤ (2 · 𝑉) ↔ (𝑊 · (𝑎 + 𝑉)) ≤ (𝑊 · (2 · 𝑉))))
98	90, 97	mpbid 232	. . . . . . . . . . . . 13 ⊢ ((𝜑 ∧ ((𝑎 ∈ ℕ ∧ 𝑑 ∈ ℕ) ∧ (𝑎(AP‘𝐾)𝑑) ⊆ (^◡𝐹 “ {𝑔}))) → (𝑊 · (𝑎 + 𝑉)) ≤ (𝑊 · (2 · 𝑉)))
99		eluz2 12755	. . . . . . . . . . . . 13 ⊢ ((𝑊 · (2 · 𝑉)) ∈ (ℤ_≥‘(𝑊 · (𝑎 + 𝑉))) ↔ ((𝑊 · (𝑎 + 𝑉)) ∈ ℤ ∧ (𝑊 · (2 · 𝑉)) ∈ ℤ ∧ (𝑊 · (𝑎 + 𝑉)) ≤ (𝑊 · (2 · 𝑉))))
100	76, 82, 98, 99	syl3anbrc 1344	. . . . . . . . . . . 12 ⊢ ((𝜑 ∧ ((𝑎 ∈ ℕ ∧ 𝑑 ∈ ℕ) ∧ (𝑎(AP‘𝐾)𝑑) ⊆ (^◡𝐹 “ {𝑔}))) → (𝑊 · (2 · 𝑉)) ∈ (ℤ_≥‘(𝑊 · (𝑎 + 𝑉))))
101	41	nncnd 12159	. . . . . . . . . . . . . . 15 ⊢ ((𝜑 ∧ ((𝑎 ∈ ℕ ∧ 𝑑 ∈ ℕ) ∧ (𝑎(AP‘𝐾)𝑑) ⊆ (^◡𝐹 “ {𝑔}))) → 𝑊 ∈ ℂ)
102		1cnd 11125	. . . . . . . . . . . . . . 15 ⊢ ((𝜑 ∧ ((𝑎 ∈ ℕ ∧ 𝑑 ∈ ℕ) ∧ (𝑎(AP‘𝐾)𝑑) ⊆ (^◡𝐹 “ {𝑔}))) → 1 ∈ ℂ)
103	70	nn0cnd 12462	. . . . . . . . . . . . . . . 16 ⊢ ((𝜑 ∧ ((𝑎 ∈ ℕ ∧ 𝑑 ∈ ℕ) ∧ (𝑎(AP‘𝐾)𝑑) ⊆ (^◡𝐹 “ {𝑔}))) → (𝑎 − 1) ∈ ℂ)
104	103, 88	addcld 11149	. . . . . . . . . . . . . . 15 ⊢ ((𝜑 ∧ ((𝑎 ∈ ℕ ∧ 𝑑 ∈ ℕ) ∧ (𝑎(AP‘𝐾)𝑑) ⊆ (^◡𝐹 “ {𝑔}))) → ((𝑎 − 1) + 𝑉) ∈ ℂ)
105	101, 102, 104	adddid 11154	. . . . . . . . . . . . . 14 ⊢ ((𝜑 ∧ ((𝑎 ∈ ℕ ∧ 𝑑 ∈ ℕ) ∧ (𝑎(AP‘𝐾)𝑑) ⊆ (^◡𝐹 “ {𝑔}))) → (𝑊 · (1 + ((𝑎 − 1) + 𝑉))) = ((𝑊 · 1) + (𝑊 · ((𝑎 − 1) + 𝑉))))
106	102, 103, 88	addassd 11152	. . . . . . . . . . . . . . . 16 ⊢ ((𝜑 ∧ ((𝑎 ∈ ℕ ∧ 𝑑 ∈ ℕ) ∧ (𝑎(AP‘𝐾)𝑑) ⊆ (^◡𝐹 “ {𝑔}))) → ((1 + (𝑎 − 1)) + 𝑉) = (1 + ((𝑎 − 1) + 𝑉)))
107		ax-1cn 11082	. . . . . . . . . . . . . . . . . 18 ⊢ 1 ∈ ℂ
108	23	nncnd 12159	. . . . . . . . . . . . . . . . . 18 ⊢ ((𝜑 ∧ ((𝑎 ∈ ℕ ∧ 𝑑 ∈ ℕ) ∧ (𝑎(AP‘𝐾)𝑑) ⊆ (^◡𝐹 “ {𝑔}))) → 𝑎 ∈ ℂ)
109		pncan3 11386	. . . . . . . . . . . . . . . . . 18 ⊢ ((1 ∈ ℂ ∧ 𝑎 ∈ ℂ) → (1 + (𝑎 − 1)) = 𝑎)
110	107, 108, 109	sylancr 587	. . . . . . . . . . . . . . . . 17 ⊢ ((𝜑 ∧ ((𝑎 ∈ ℕ ∧ 𝑑 ∈ ℕ) ∧ (𝑎(AP‘𝐾)𝑑) ⊆ (^◡𝐹 “ {𝑔}))) → (1 + (𝑎 − 1)) = 𝑎)
111	110	oveq1d 7371	. . . . . . . . . . . . . . . 16 ⊢ ((𝜑 ∧ ((𝑎 ∈ ℕ ∧ 𝑑 ∈ ℕ) ∧ (𝑎(AP‘𝐾)𝑑) ⊆ (^◡𝐹 “ {𝑔}))) → ((1 + (𝑎 − 1)) + 𝑉) = (𝑎 + 𝑉))
112	106, 111	eqtr3d 2771	. . . . . . . . . . . . . . 15 ⊢ ((𝜑 ∧ ((𝑎 ∈ ℕ ∧ 𝑑 ∈ ℕ) ∧ (𝑎(AP‘𝐾)𝑑) ⊆ (^◡𝐹 “ {𝑔}))) → (1 + ((𝑎 − 1) + 𝑉)) = (𝑎 + 𝑉))
113	112	oveq2d 7372	. . . . . . . . . . . . . 14 ⊢ ((𝜑 ∧ ((𝑎 ∈ ℕ ∧ 𝑑 ∈ ℕ) ∧ (𝑎(AP‘𝐾)𝑑) ⊆ (^◡𝐹 “ {𝑔}))) → (𝑊 · (1 + ((𝑎 − 1) + 𝑉))) = (𝑊 · (𝑎 + 𝑉)))
114	101	mulridd 11147	. . . . . . . . . . . . . . 15 ⊢ ((𝜑 ∧ ((𝑎 ∈ ℕ ∧ 𝑑 ∈ ℕ) ∧ (𝑎(AP‘𝐾)𝑑) ⊆ (^◡𝐹 “ {𝑔}))) → (𝑊 · 1) = 𝑊)
115	114	oveq1d 7371	. . . . . . . . . . . . . 14 ⊢ ((𝜑 ∧ ((𝑎 ∈ ℕ ∧ 𝑑 ∈ ℕ) ∧ (𝑎(AP‘𝐾)𝑑) ⊆ (^◡𝐹 “ {𝑔}))) → ((𝑊 · 1) + (𝑊 · ((𝑎 − 1) + 𝑉))) = (𝑊 + (𝑊 · ((𝑎 − 1) + 𝑉))))
116	105, 113, 115	3eqtr3d 2777	. . . . . . . . . . . . 13 ⊢ ((𝜑 ∧ ((𝑎 ∈ ℕ ∧ 𝑑 ∈ ℕ) ∧ (𝑎(AP‘𝐾)𝑑) ⊆ (^◡𝐹 “ {𝑔}))) → (𝑊 · (𝑎 + 𝑉)) = (𝑊 + (𝑊 · ((𝑎 − 1) + 𝑉))))
117	116	fveq2d 6836	. . . . . . . . . . . 12 ⊢ ((𝜑 ∧ ((𝑎 ∈ ℕ ∧ 𝑑 ∈ ℕ) ∧ (𝑎(AP‘𝐾)𝑑) ⊆ (^◡𝐹 “ {𝑔}))) → (ℤ_≥‘(𝑊 · (𝑎 + 𝑉))) = (ℤ_≥‘(𝑊 + (𝑊 · ((𝑎 − 1) + 𝑉)))))
118	100, 117	eleqtrd 2836	. . . . . . . . . . 11 ⊢ ((𝜑 ∧ ((𝑎 ∈ ℕ ∧ 𝑑 ∈ ℕ) ∧ (𝑎(AP‘𝐾)𝑑) ⊆ (^◡𝐹 “ {𝑔}))) → (𝑊 · (2 · 𝑉)) ∈ (ℤ_≥‘(𝑊 + (𝑊 · ((𝑎 − 1) + 𝑉)))))
119		fvoveq1 7379	. . . . . . . . . . . 12 ⊢ (𝑦 = 𝑧 → (𝐻‘(𝑦 + (𝑊 · ((𝑎 − 1) + 𝑉)))) = (𝐻‘(𝑧 + (𝑊 · ((𝑎 − 1) + 𝑉)))))
120	119	cbvmptv 5200	. . . . . . . . . . 11 ⊢ (𝑦 ∈ (1...𝑊) ↦ (𝐻‘(𝑦 + (𝑊 · ((𝑎 − 1) + 𝑉))))) = (𝑧 ∈ (1...𝑊) ↦ (𝐻‘(𝑧 + (𝑊 · ((𝑎 − 1) + 𝑉)))))
121	42, 68, 41, 73, 43, 118, 120	vdwlem2 16908	. . . . . . . . . 10 ⊢ ((𝜑 ∧ ((𝑎 ∈ ℕ ∧ 𝑑 ∈ ℕ) ∧ (𝑎(AP‘𝐾)𝑑) ⊆ (^◡𝐹 “ {𝑔}))) → ((𝐾 + 1) MonoAP (𝑦 ∈ (1...𝑊) ↦ (𝐻‘(𝑦 + (𝑊 · ((𝑎 − 1) + 𝑉))))) → (𝐾 + 1) MonoAP 𝐻))
122	65, 121	sylbird 260	. . . . . . . . 9 ⊢ ((𝜑 ∧ ((𝑎 ∈ ℕ ∧ 𝑑 ∈ ℕ) ∧ (𝑎(AP‘𝐾)𝑑) ⊆ (^◡𝐹 “ {𝑔}))) → ((𝐾 + 1) MonoAP 𝑔 → (𝐾 + 1) MonoAP 𝐻))
123	122	orim2d 968	. . . . . . . 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 456	. . . . 5 ⊢ ((𝜑 ∧ (𝑎 ∈ ℕ ∧ 𝑑 ∈ ℕ)) → ((𝑎(AP‘𝐾)𝑑) ⊆ (^◡𝐹 “ {𝑔}) → (⟨(𝑀 + 1), 𝐾⟩ PolyAP 𝐻 ∨ (𝐾 + 1) MonoAP 𝐻)))
127	126	rexlimdvva 3191	. . . 4 ⊢ (𝜑 → (∃𝑎 ∈ ℕ ∃𝑑 ∈ ℕ (𝑎(AP‘𝐾)𝑑) ⊆ (^◡𝐹 “ {𝑔}) → (⟨(𝑀 + 1), 𝐾⟩ PolyAP 𝐻 ∨ (𝐾 + 1) MonoAP 𝐻)))
128	127	exlimdv 1934	. . 3 ⊢ (𝜑 → (∃𝑔∃𝑎 ∈ ℕ ∃𝑑 ∈ ℕ (𝑎(AP‘𝐾)𝑑) ⊆ (^◡𝐹 “ {𝑔}) → (⟨(𝑀 + 1), 𝐾⟩ PolyAP 𝐻 ∨ (𝐾 + 1) MonoAP 𝐻)))
129	18, 128	sylbid 240	. 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 206 ∧ wa 395 ∨ wo 847 = wceq 1541 ∃wex 1780 ∈ wcel 2113 ∀wral 3049 ∃wrex 3058 Vcvv 3438 ⊆ wss 3899 {csn 4578 ⟨cop 4584 class class class wbr 5096 ↦ cmpt 5177 ^◡ccnv 5621 “ cima 5625 Fn wfn 6485 ⟶wf 6486 ‘cfv 6490 (class class class)co 7356 ↑_m cmap 8761 Fincfn 8881 ℂcc 11022 ℝcr 11023 0cc0 11024 1c1 11025 + caddc 11027 · cmul 11029 < clt 11164 ≤ cle 11165 − cmin 11362 ℕcn 12143 2c2 12198 ℕ₀cn0 12399 ℤcz 12486 ℤ_≥cuz 12749 ...cfz 13421 APcvdwa 16891 MonoAP cvdwm 16892 PolyAP cvdwp 16893

This theorem was proved from axioms: ax-mp 5 ax-1 6 ax-2 7 ax-3 8 ax-gen 1796 ax-4 1810 ax-5 1911 ax-6 1968 ax-7 2009 ax-8 2115 ax-9 2123 ax-10 2146 ax-11 2162 ax-12 2182 ax-ext 2706 ax-rep 5222 ax-sep 5239 ax-nul 5249 ax-pow 5308 ax-pr 5375 ax-un 7678 ax-cnex 11080 ax-resscn 11081 ax-1cn 11082 ax-icn 11083 ax-addcl 11084 ax-addrcl 11085 ax-mulcl 11086 ax-mulrcl 11087 ax-mulcom 11088 ax-addass 11089 ax-mulass 11090 ax-distr 11091 ax-i2m1 11092 ax-1ne0 11093 ax-1rid 11094 ax-rnegex 11095 ax-rrecex 11096 ax-cnre 11097 ax-pre-lttri 11098 ax-pre-lttrn 11099 ax-pre-ltadd 11100 ax-pre-mulgt0 11101

This theorem depends on definitions: df-bi 207 df-an 396 df-or 848 df-3or 1087 df-3an 1088 df-tru 1544 df-fal 1554 df-ex 1781 df-nf 1785 df-sb 2068 df-mo 2537 df-eu 2567 df-clab 2713 df-cleq 2726 df-clel 2809 df-nfc 2883 df-ne 2931 df-nel 3035 df-ral 3050 df-rex 3059 df-reu 3349 df-rab 3398 df-v 3440 df-sbc 3739 df-csb 3848 df-dif 3902 df-un 3904 df-in 3906 df-ss 3916 df-pss 3919 df-nul 4284 df-if 4478 df-pw 4554 df-sn 4579 df-pr 4581 df-op 4585 df-uni 4862 df-int 4901 df-iun 4946 df-br 5097 df-opab 5159 df-mpt 5178 df-tr 5204 df-id 5517 df-eprel 5522 df-po 5530 df-so 5531 df-fr 5575 df-we 5577 df-xp 5628 df-rel 5629 df-cnv 5630 df-co 5631 df-dm 5632 df-rn 5633 df-res 5634 df-ima 5635 df-pred 6257 df-ord 6318 df-on 6319 df-lim 6320 df-suc 6321 df-iota 6446 df-fun 6492 df-fn 6493 df-f 6494 df-f1 6495 df-fo 6496 df-f1o 6497 df-fv 6498 df-riota 7313 df-ov 7359 df-oprab 7360 df-mpo 7361 df-om 7807 df-1st 7931 df-2nd 7932 df-frecs 8221 df-wrecs 8252 df-recs 8301 df-rdg 8339 df-1o 8395 df-oadd 8399 df-er 8633 df-map 8763 df-en 8882 df-dom 8883 df-sdom 8884 df-fin 8885 df-dju 9811 df-card 9849 df-pnf 11166 df-mnf 11167 df-xr 11168 df-ltxr 11169 df-le 11170 df-sub 11364 df-neg 11365 df-nn 12144 df-2 12206 df-n0 12400 df-z 12487 df-uz 12750 df-rp 12904 df-fz 13422 df-hash 14252 df-vdwap 16894 df-vdwmc 16895 df-vdwpc 16896

This theorem is referenced by: vdwlem10 16916

W3C validator