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 16926

Description: Lemma for vdw 16931. (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 5152	. . 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 16921	. . . 4 ⊢ (𝜑 → 𝐹:(1...𝑉)⟶(𝑅 ↑_m (1...𝑊)))
9		ovex 7444	. . . . 5 ⊢ (𝑅 ↑_m (1...𝑊)) ∈ V
10		ovex 7444	. . . . 5 ⊢ (1...𝑉) ∈ V
11	9, 10	elmap 8867	. . . 4 ⊢ (𝐹 ∈ ((𝑅 ↑_m (1...𝑊)) ↑_m (1...𝑉)) ↔ 𝐹:(1...𝑉)⟶(𝑅 ↑_m (1...𝑊)))
12	8, 11	sylibr 233	. . 3 ⊢ (𝜑 → 𝐹 ∈ ((𝑅 ↑_m (1...𝑊)) ↑_m (1...𝑉)))
13	1, 2, 12	rspcdva 3613	. 2 ⊢ (𝜑 → 𝐾 MonoAP 𝐹)
14		vdwlem9.k	. . . . . 6 ⊢ (𝜑 → 𝐾 ∈ (ℤ_≥‘2))
15		eluz2nn 12872	. . . . . 6 ⊢ (𝐾 ∈ (ℤ_≥‘2) → 𝐾 ∈ ℕ)
16	14, 15	syl 17	. . . . 5 ⊢ (𝜑 → 𝐾 ∈ ℕ)
17	16	nnnn0d 12536	. . . 4 ⊢ (𝜑 → 𝐾 ∈ ℕ₀)
18	10, 17, 8	vdwmc 16915	. . 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 771	. . . . . . . . . . . 12 ⊢ ((𝜑 ∧ ((𝑎 ∈ ℕ ∧ 𝑑 ∈ ℕ) ∧ (𝑎(AP‘𝐾)𝑑) ⊆ (^◡𝐹 “ {𝑔}))) → (𝑎(AP‘𝐾)𝑑) ⊆ (^◡𝐹 “ {𝑔}))
22	16	adantr 481	. . . . . . . . . . . . 13 ⊢ ((𝜑 ∧ ((𝑎 ∈ ℕ ∧ 𝑑 ∈ ℕ) ∧ (𝑎(AP‘𝐾)𝑑) ⊆ (^◡𝐹 “ {𝑔}))) → 𝐾 ∈ ℕ)
23		simprll 777	. . . . . . . . . . . . 13 ⊢ ((𝜑 ∧ ((𝑎 ∈ ℕ ∧ 𝑑 ∈ ℕ) ∧ (𝑎(AP‘𝐾)𝑑) ⊆ (^◡𝐹 “ {𝑔}))) → 𝑎 ∈ ℕ)
24		simprlr 778	. . . . . . . . . . . . 13 ⊢ ((𝜑 ∧ ((𝑎 ∈ ℕ ∧ 𝑑 ∈ ℕ) ∧ (𝑎(AP‘𝐾)𝑑) ⊆ (^◡𝐹 “ {𝑔}))) → 𝑑 ∈ ℕ)
25		vdwapid1 16912	. . . . . . . . . . . . 13 ⊢ ((𝐾 ∈ ℕ ∧ 𝑎 ∈ ℕ ∧ 𝑑 ∈ ℕ) → 𝑎 ∈ (𝑎(AP‘𝐾)𝑑))
26	22, 23, 24, 25	syl3anc 1371	. . . . . . . . . . . 12 ⊢ ((𝜑 ∧ ((𝑎 ∈ ℕ ∧ 𝑑 ∈ ℕ) ∧ (𝑎(AP‘𝐾)𝑑) ⊆ (^◡𝐹 “ {𝑔}))) → 𝑎 ∈ (𝑎(AP‘𝐾)𝑑))
27	21, 26	sseldd 3983	. . . . . . . . . . 11 ⊢ ((𝜑 ∧ ((𝑎 ∈ ℕ ∧ 𝑑 ∈ ℕ) ∧ (𝑎(AP‘𝐾)𝑑) ⊆ (^◡𝐹 “ {𝑔}))) → 𝑎 ∈ (^◡𝐹 “ {𝑔}))
28	8	ffnd 6718	. . . . . . . . . . . . 13 ⊢ (𝜑 → 𝐹 Fn (1...𝑉))
29	28	adantr 481	. . . . . . . . . . . 12 ⊢ ((𝜑 ∧ ((𝑎 ∈ ℕ ∧ 𝑑 ∈ ℕ) ∧ (𝑎(AP‘𝐾)𝑑) ⊆ (^◡𝐹 “ {𝑔}))) → 𝐹 Fn (1...𝑉))
30		fniniseg 7061	. . . . . . . . . . . 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	ffvelcdmd 7087	. . . . . . . . 9 ⊢ ((𝜑 ∧ ((𝑎 ∈ ℕ ∧ 𝑑 ∈ ℕ) ∧ (𝑎(AP‘𝐾)𝑑) ⊆ (^◡𝐹 “ {𝑔}))) → (𝐹‘𝑎) ∈ (𝑅 ↑_m (1...𝑊)))
37	33, 36	eqeltrrd 2834	. . . . . . . 8 ⊢ ((𝜑 ∧ ((𝑎 ∈ ℕ ∧ 𝑑 ∈ ℕ) ∧ (𝑎(AP‘𝐾)𝑑) ⊆ (^◡𝐹 “ {𝑔}))) → 𝑔 ∈ (𝑅 ↑_m (1...𝑊)))
38		rsp 3244	. . . . . . . 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 7444	. . . . . . . . . . . 12 ⊢ (1...𝑊) ∈ V
47		elmapg 8835	. . . . . . . . . . . 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 16924	. . . . . . . . 9 ⊢ ((𝜑 ∧ ((𝑎 ∈ ℕ ∧ 𝑑 ∈ ℕ) ∧ (𝑎(AP‘𝐾)𝑑) ⊆ (^◡𝐹 “ {𝑔}))) → (⟨𝑀, 𝐾⟩ PolyAP 𝑔 → (⟨(𝑀 + 1), 𝐾⟩ PolyAP 𝐻 ∨ (𝐾 + 1) MonoAP 𝑔)))
52		olc 866	. . . . . . . . . 10 ⊢ ((𝐾 + 1) MonoAP 𝑔 → (⟨(𝑀 + 1), 𝐾⟩ PolyAP 𝐻 ∨ (𝐾 + 1) MonoAP 𝑔))
53	52	a1i 11	. . . . . . . . 9 ⊢ ((𝜑 ∧ ((𝑎 ∈ ℕ ∧ 𝑑 ∈ ℕ) ∧ (𝑎(AP‘𝐾)𝑑) ⊆ (^◡𝐹 “ {𝑔}))) → ((𝐾 + 1) MonoAP 𝑔 → (⟨(𝑀 + 1), 𝐾⟩ PolyAP 𝐻 ∨ (𝐾 + 1) MonoAP 𝑔)))
54	51, 53	jaod 857	. . . . . . . 8 ⊢ ((𝜑 ∧ ((𝑎 ∈ ℕ ∧ 𝑑 ∈ ℕ) ∧ (𝑎(AP‘𝐾)𝑑) ⊆ (^◡𝐹 “ {𝑔}))) → ((⟨𝑀, 𝐾⟩ PolyAP 𝑔 ∨ (𝐾 + 1) MonoAP 𝑔) → (⟨(𝑀 + 1), 𝐾⟩ PolyAP 𝐻 ∨ (𝐾 + 1) MonoAP 𝑔)))
55		oveq1 7418	. . . . . . . . . . . . . . . . . . 19 ⊢ (𝑥 = 𝑎 → (𝑥 − 1) = (𝑎 − 1))
56	55	oveq1d 7426	. . . . . . . . . . . . . . . . . 18 ⊢ (𝑥 = 𝑎 → ((𝑥 − 1) + 𝑉) = ((𝑎 − 1) + 𝑉))
57	56	oveq2d 7427	. . . . . . . . . . . . . . . . 17 ⊢ (𝑥 = 𝑎 → (𝑊 · ((𝑥 − 1) + 𝑉)) = (𝑊 · ((𝑎 − 1) + 𝑉)))
58	57	oveq2d 7427	. . . . . . . . . . . . . . . 16 ⊢ (𝑥 = 𝑎 → (𝑦 + (𝑊 · ((𝑥 − 1) + 𝑉))) = (𝑦 + (𝑊 · ((𝑎 − 1) + 𝑉))))
59	58	fveq2d 6895	. . . . . . . . . . . . . . 15 ⊢ (𝑥 = 𝑎 → (𝐻‘(𝑦 + (𝑊 · ((𝑥 − 1) + 𝑉)))) = (𝐻‘(𝑦 + (𝑊 · ((𝑎 − 1) + 𝑉)))))
60	59	mpteq2dv 5250	. . . . . . . . . . . . . 14 ⊢ (𝑥 = 𝑎 → (𝑦 ∈ (1...𝑊) ↦ (𝐻‘(𝑦 + (𝑊 · ((𝑥 − 1) + 𝑉))))) = (𝑦 ∈ (1...𝑊) ↦ (𝐻‘(𝑦 + (𝑊 · ((𝑎 − 1) + 𝑉))))))
61	46	mptex 7227	. . . . . . . . . . . . . 14 ⊢ (𝑦 ∈ (1...𝑊) ↦ (𝐻‘(𝑦 + (𝑊 · ((𝑎 − 1) + 𝑉))))) ∈ V
62	60, 7, 61	fvmpt 6998	. . . . . . . . . . . . 13 ⊢ (𝑎 ∈ (1...𝑉) → (𝐹‘𝑎) = (𝑦 ∈ (1...𝑊) ↦ (𝐻‘(𝑦 + (𝑊 · ((𝑎 − 1) + 𝑉))))))
63	35, 62	syl 17	. . . . . . . . . . . 12 ⊢ ((𝜑 ∧ ((𝑎 ∈ ℕ ∧ 𝑑 ∈ ℕ) ∧ (𝑎(AP‘𝐾)𝑑) ⊆ (^◡𝐹 “ {𝑔}))) → (𝐹‘𝑎) = (𝑦 ∈ (1...𝑊) ↦ (𝐻‘(𝑦 + (𝑊 · ((𝑎 − 1) + 𝑉))))))
64	63, 33	eqtr3d 2774	. . . . . . . . . . 11 ⊢ ((𝜑 ∧ ((𝑎 ∈ ℕ ∧ 𝑑 ∈ ℕ) ∧ (𝑎(AP‘𝐾)𝑑) ⊆ (^◡𝐹 “ {𝑔}))) → (𝑦 ∈ (1...𝑊) ↦ (𝐻‘(𝑦 + (𝑊 · ((𝑎 − 1) + 𝑉))))) = 𝑔)
65	64	breq2d 5160	. . . . . . . . . 10 ⊢ ((𝜑 ∧ ((𝑎 ∈ ℕ ∧ 𝑑 ∈ ℕ) ∧ (𝑎(AP‘𝐾)𝑑) ⊆ (^◡𝐹 “ {𝑔}))) → ((𝐾 + 1) MonoAP (𝑦 ∈ (1...𝑊) ↦ (𝐻‘(𝑦 + (𝑊 · ((𝑎 − 1) + 𝑉))))) ↔ (𝐾 + 1) MonoAP 𝑔))
66	17	adantr 481	. . . . . . . . . . . 12 ⊢ ((𝜑 ∧ ((𝑎 ∈ ℕ ∧ 𝑑 ∈ ℕ) ∧ (𝑎(AP‘𝐾)𝑑) ⊆ (^◡𝐹 “ {𝑔}))) → 𝐾 ∈ ℕ₀)
67		peano2nn0 12516	. . . . . . . . . . . 12 ⊢ (𝐾 ∈ ℕ₀ → (𝐾 + 1) ∈ ℕ₀)
68	66, 67	syl 17	. . . . . . . . . . 11 ⊢ ((𝜑 ∧ ((𝑎 ∈ ℕ ∧ 𝑑 ∈ ℕ) ∧ (𝑎(AP‘𝐾)𝑑) ⊆ (^◡𝐹 “ {𝑔}))) → (𝐾 + 1) ∈ ℕ₀)
69		nnm1nn0 12517	. . . . . . . . . . . . . 14 ⊢ (𝑎 ∈ ℕ → (𝑎 − 1) ∈ ℕ₀)
70	23, 69	syl 17	. . . . . . . . . . . . 13 ⊢ ((𝜑 ∧ ((𝑎 ∈ ℕ ∧ 𝑑 ∈ ℕ) ∧ (𝑎(AP‘𝐾)𝑑) ⊆ (^◡𝐹 “ {𝑔}))) → (𝑎 − 1) ∈ ℕ₀)
71		nn0nnaddcl 12507	. . . . . . . . . . . . 13 ⊢ (((𝑎 − 1) ∈ ℕ₀ ∧ 𝑉 ∈ ℕ) → ((𝑎 − 1) + 𝑉) ∈ ℕ)
72	70, 40, 71	syl2anc 584	. . . . . . . . . . . 12 ⊢ ((𝜑 ∧ ((𝑎 ∈ ℕ ∧ 𝑑 ∈ ℕ) ∧ (𝑎(AP‘𝐾)𝑑) ⊆ (^◡𝐹 “ {𝑔}))) → ((𝑎 − 1) + 𝑉) ∈ ℕ)
73	41, 72	nnmulcld 12269	. . . . . . . . . . 11 ⊢ ((𝜑 ∧ ((𝑎 ∈ ℕ ∧ 𝑑 ∈ ℕ) ∧ (𝑎(AP‘𝐾)𝑑) ⊆ (^◡𝐹 “ {𝑔}))) → (𝑊 · ((𝑎 − 1) + 𝑉)) ∈ ℕ)
74	23, 40	nnaddcld 12268	. . . . . . . . . . . . . . 15 ⊢ ((𝜑 ∧ ((𝑎 ∈ ℕ ∧ 𝑑 ∈ ℕ) ∧ (𝑎(AP‘𝐾)𝑑) ⊆ (^◡𝐹 “ {𝑔}))) → (𝑎 + 𝑉) ∈ ℕ)
75	41, 74	nnmulcld 12269	. . . . . . . . . . . . . 14 ⊢ ((𝜑 ∧ ((𝑎 ∈ ℕ ∧ 𝑑 ∈ ℕ) ∧ (𝑎(AP‘𝐾)𝑑) ⊆ (^◡𝐹 “ {𝑔}))) → (𝑊 · (𝑎 + 𝑉)) ∈ ℕ)
76	75	nnzd 12589	. . . . . . . . . . . . 13 ⊢ ((𝜑 ∧ ((𝑎 ∈ ℕ ∧ 𝑑 ∈ ℕ) ∧ (𝑎(AP‘𝐾)𝑑) ⊆ (^◡𝐹 “ {𝑔}))) → (𝑊 · (𝑎 + 𝑉)) ∈ ℤ)
77		2nn 12289	. . . . . . . . . . . . . . . . 17 ⊢ 2 ∈ ℕ
78		nnmulcl 12240	. . . . . . . . . . . . . . . . 17 ⊢ ((2 ∈ ℕ ∧ 𝑉 ∈ ℕ) → (2 · 𝑉) ∈ ℕ)
79	77, 3, 78	sylancr 587	. . . . . . . . . . . . . . . 16 ⊢ (𝜑 → (2 · 𝑉) ∈ ℕ)
80	4, 79	nnmulcld 12269	. . . . . . . . . . . . . . 15 ⊢ (𝜑 → (𝑊 · (2 · 𝑉)) ∈ ℕ)
81	80	nnzd 12589	. . . . . . . . . . . . . 14 ⊢ (𝜑 → (𝑊 · (2 · 𝑉)) ∈ ℤ)
82	81	adantr 481	. . . . . . . . . . . . 13 ⊢ ((𝜑 ∧ ((𝑎 ∈ ℕ ∧ 𝑑 ∈ ℕ) ∧ (𝑎(AP‘𝐾)𝑑) ⊆ (^◡𝐹 “ {𝑔}))) → (𝑊 · (2 · 𝑉)) ∈ ℤ)
83	23	nnred 12231	. . . . . . . . . . . . . . . 16 ⊢ ((𝜑 ∧ ((𝑎 ∈ ℕ ∧ 𝑑 ∈ ℕ) ∧ (𝑎(AP‘𝐾)𝑑) ⊆ (^◡𝐹 “ {𝑔}))) → 𝑎 ∈ ℝ)
84	40	nnred 12231	. . . . . . . . . . . . . . . 16 ⊢ ((𝜑 ∧ ((𝑎 ∈ ℕ ∧ 𝑑 ∈ ℕ) ∧ (𝑎(AP‘𝐾)𝑑) ⊆ (^◡𝐹 “ {𝑔}))) → 𝑉 ∈ ℝ)
85		elfzle2 13509	. . . . . . . . . . . . . . . . 17 ⊢ (𝑎 ∈ (1...𝑉) → 𝑎 ≤ 𝑉)
86	35, 85	syl 17	. . . . . . . . . . . . . . . 16 ⊢ ((𝜑 ∧ ((𝑎 ∈ ℕ ∧ 𝑑 ∈ ℕ) ∧ (𝑎(AP‘𝐾)𝑑) ⊆ (^◡𝐹 “ {𝑔}))) → 𝑎 ≤ 𝑉)
87	83, 84, 84, 86	leadd1dd 11832	. . . . . . . . . . . . . . 15 ⊢ ((𝜑 ∧ ((𝑎 ∈ ℕ ∧ 𝑑 ∈ ℕ) ∧ (𝑎(AP‘𝐾)𝑑) ⊆ (^◡𝐹 “ {𝑔}))) → (𝑎 + 𝑉) ≤ (𝑉 + 𝑉))
88	40	nncnd 12232	. . . . . . . . . . . . . . . 16 ⊢ ((𝜑 ∧ ((𝑎 ∈ ℕ ∧ 𝑑 ∈ ℕ) ∧ (𝑎(AP‘𝐾)𝑑) ⊆ (^◡𝐹 “ {𝑔}))) → 𝑉 ∈ ℂ)
89	88	2timesd 12459	. . . . . . . . . . . . . . 15 ⊢ ((𝜑 ∧ ((𝑎 ∈ ℕ ∧ 𝑑 ∈ ℕ) ∧ (𝑎(AP‘𝐾)𝑑) ⊆ (^◡𝐹 “ {𝑔}))) → (2 · 𝑉) = (𝑉 + 𝑉))
90	87, 89	breqtrrd 5176	. . . . . . . . . . . . . 14 ⊢ ((𝜑 ∧ ((𝑎 ∈ ℕ ∧ 𝑑 ∈ ℕ) ∧ (𝑎(AP‘𝐾)𝑑) ⊆ (^◡𝐹 “ {𝑔}))) → (𝑎 + 𝑉) ≤ (2 · 𝑉))
91	74	nnred 12231	. . . . . . . . . . . . . . 15 ⊢ ((𝜑 ∧ ((𝑎 ∈ ℕ ∧ 𝑑 ∈ ℕ) ∧ (𝑎(AP‘𝐾)𝑑) ⊆ (^◡𝐹 “ {𝑔}))) → (𝑎 + 𝑉) ∈ ℝ)
92	79	nnred 12231	. . . . . . . . . . . . . . . 16 ⊢ (𝜑 → (2 · 𝑉) ∈ ℝ)
93	92	adantr 481	. . . . . . . . . . . . . . 15 ⊢ ((𝜑 ∧ ((𝑎 ∈ ℕ ∧ 𝑑 ∈ ℕ) ∧ (𝑎(AP‘𝐾)𝑑) ⊆ (^◡𝐹 “ {𝑔}))) → (2 · 𝑉) ∈ ℝ)
94	41	nnred 12231	. . . . . . . . . . . . . . 15 ⊢ ((𝜑 ∧ ((𝑎 ∈ ℕ ∧ 𝑑 ∈ ℕ) ∧ (𝑎(AP‘𝐾)𝑑) ⊆ (^◡𝐹 “ {𝑔}))) → 𝑊 ∈ ℝ)
95	41	nngt0d 12265	. . . . . . . . . . . . . . 15 ⊢ ((𝜑 ∧ ((𝑎 ∈ ℕ ∧ 𝑑 ∈ ℕ) ∧ (𝑎(AP‘𝐾)𝑑) ⊆ (^◡𝐹 “ {𝑔}))) → 0 < 𝑊)
96		lemul2 12071	. . . . . . . . . . . . . . 15 ⊢ (((𝑎 + 𝑉) ∈ ℝ ∧ (2 · 𝑉) ∈ ℝ ∧ (𝑊 ∈ ℝ ∧ 0 < 𝑊)) → ((𝑎 + 𝑉) ≤ (2 · 𝑉) ↔ (𝑊 · (𝑎 + 𝑉)) ≤ (𝑊 · (2 · 𝑉))))
97	91, 93, 94, 95, 96	syl112anc 1374	. . . . . . . . . . . . . 14 ⊢ ((𝜑 ∧ ((𝑎 ∈ ℕ ∧ 𝑑 ∈ ℕ) ∧ (𝑎(AP‘𝐾)𝑑) ⊆ (^◡𝐹 “ {𝑔}))) → ((𝑎 + 𝑉) ≤ (2 · 𝑉) ↔ (𝑊 · (𝑎 + 𝑉)) ≤ (𝑊 · (2 · 𝑉))))
98	90, 97	mpbid 231	. . . . . . . . . . . . 13 ⊢ ((𝜑 ∧ ((𝑎 ∈ ℕ ∧ 𝑑 ∈ ℕ) ∧ (𝑎(AP‘𝐾)𝑑) ⊆ (^◡𝐹 “ {𝑔}))) → (𝑊 · (𝑎 + 𝑉)) ≤ (𝑊 · (2 · 𝑉)))
99		eluz2 12832	. . . . . . . . . . . . 13 ⊢ ((𝑊 · (2 · 𝑉)) ∈ (ℤ_≥‘(𝑊 · (𝑎 + 𝑉))) ↔ ((𝑊 · (𝑎 + 𝑉)) ∈ ℤ ∧ (𝑊 · (2 · 𝑉)) ∈ ℤ ∧ (𝑊 · (𝑎 + 𝑉)) ≤ (𝑊 · (2 · 𝑉))))
100	76, 82, 98, 99	syl3anbrc 1343	. . . . . . . . . . . 12 ⊢ ((𝜑 ∧ ((𝑎 ∈ ℕ ∧ 𝑑 ∈ ℕ) ∧ (𝑎(AP‘𝐾)𝑑) ⊆ (^◡𝐹 “ {𝑔}))) → (𝑊 · (2 · 𝑉)) ∈ (ℤ_≥‘(𝑊 · (𝑎 + 𝑉))))
101	41	nncnd 12232	. . . . . . . . . . . . . . 15 ⊢ ((𝜑 ∧ ((𝑎 ∈ ℕ ∧ 𝑑 ∈ ℕ) ∧ (𝑎(AP‘𝐾)𝑑) ⊆ (^◡𝐹 “ {𝑔}))) → 𝑊 ∈ ℂ)
102		1cnd 11213	. . . . . . . . . . . . . . 15 ⊢ ((𝜑 ∧ ((𝑎 ∈ ℕ ∧ 𝑑 ∈ ℕ) ∧ (𝑎(AP‘𝐾)𝑑) ⊆ (^◡𝐹 “ {𝑔}))) → 1 ∈ ℂ)
103	70	nn0cnd 12538	. . . . . . . . . . . . . . . 16 ⊢ ((𝜑 ∧ ((𝑎 ∈ ℕ ∧ 𝑑 ∈ ℕ) ∧ (𝑎(AP‘𝐾)𝑑) ⊆ (^◡𝐹 “ {𝑔}))) → (𝑎 − 1) ∈ ℂ)
104	103, 88	addcld 11237	. . . . . . . . . . . . . . 15 ⊢ ((𝜑 ∧ ((𝑎 ∈ ℕ ∧ 𝑑 ∈ ℕ) ∧ (𝑎(AP‘𝐾)𝑑) ⊆ (^◡𝐹 “ {𝑔}))) → ((𝑎 − 1) + 𝑉) ∈ ℂ)
105	101, 102, 104	adddid 11242	. . . . . . . . . . . . . 14 ⊢ ((𝜑 ∧ ((𝑎 ∈ ℕ ∧ 𝑑 ∈ ℕ) ∧ (𝑎(AP‘𝐾)𝑑) ⊆ (^◡𝐹 “ {𝑔}))) → (𝑊 · (1 + ((𝑎 − 1) + 𝑉))) = ((𝑊 · 1) + (𝑊 · ((𝑎 − 1) + 𝑉))))
106	102, 103, 88	addassd 11240	. . . . . . . . . . . . . . . 16 ⊢ ((𝜑 ∧ ((𝑎 ∈ ℕ ∧ 𝑑 ∈ ℕ) ∧ (𝑎(AP‘𝐾)𝑑) ⊆ (^◡𝐹 “ {𝑔}))) → ((1 + (𝑎 − 1)) + 𝑉) = (1 + ((𝑎 − 1) + 𝑉)))
107		ax-1cn 11170	. . . . . . . . . . . . . . . . . 18 ⊢ 1 ∈ ℂ
108	23	nncnd 12232	. . . . . . . . . . . . . . . . . 18 ⊢ ((𝜑 ∧ ((𝑎 ∈ ℕ ∧ 𝑑 ∈ ℕ) ∧ (𝑎(AP‘𝐾)𝑑) ⊆ (^◡𝐹 “ {𝑔}))) → 𝑎 ∈ ℂ)
109		pncan3 11472	. . . . . . . . . . . . . . . . . 18 ⊢ ((1 ∈ ℂ ∧ 𝑎 ∈ ℂ) → (1 + (𝑎 − 1)) = 𝑎)
110	107, 108, 109	sylancr 587	. . . . . . . . . . . . . . . . 17 ⊢ ((𝜑 ∧ ((𝑎 ∈ ℕ ∧ 𝑑 ∈ ℕ) ∧ (𝑎(AP‘𝐾)𝑑) ⊆ (^◡𝐹 “ {𝑔}))) → (1 + (𝑎 − 1)) = 𝑎)
111	110	oveq1d 7426	. . . . . . . . . . . . . . . 16 ⊢ ((𝜑 ∧ ((𝑎 ∈ ℕ ∧ 𝑑 ∈ ℕ) ∧ (𝑎(AP‘𝐾)𝑑) ⊆ (^◡𝐹 “ {𝑔}))) → ((1 + (𝑎 − 1)) + 𝑉) = (𝑎 + 𝑉))
112	106, 111	eqtr3d 2774	. . . . . . . . . . . . . . 15 ⊢ ((𝜑 ∧ ((𝑎 ∈ ℕ ∧ 𝑑 ∈ ℕ) ∧ (𝑎(AP‘𝐾)𝑑) ⊆ (^◡𝐹 “ {𝑔}))) → (1 + ((𝑎 − 1) + 𝑉)) = (𝑎 + 𝑉))
113	112	oveq2d 7427	. . . . . . . . . . . . . 14 ⊢ ((𝜑 ∧ ((𝑎 ∈ ℕ ∧ 𝑑 ∈ ℕ) ∧ (𝑎(AP‘𝐾)𝑑) ⊆ (^◡𝐹 “ {𝑔}))) → (𝑊 · (1 + ((𝑎 − 1) + 𝑉))) = (𝑊 · (𝑎 + 𝑉)))
114	101	mulridd 11235	. . . . . . . . . . . . . . 15 ⊢ ((𝜑 ∧ ((𝑎 ∈ ℕ ∧ 𝑑 ∈ ℕ) ∧ (𝑎(AP‘𝐾)𝑑) ⊆ (^◡𝐹 “ {𝑔}))) → (𝑊 · 1) = 𝑊)
115	114	oveq1d 7426	. . . . . . . . . . . . . 14 ⊢ ((𝜑 ∧ ((𝑎 ∈ ℕ ∧ 𝑑 ∈ ℕ) ∧ (𝑎(AP‘𝐾)𝑑) ⊆ (^◡𝐹 “ {𝑔}))) → ((𝑊 · 1) + (𝑊 · ((𝑎 − 1) + 𝑉))) = (𝑊 + (𝑊 · ((𝑎 − 1) + 𝑉))))
116	105, 113, 115	3eqtr3d 2780	. . . . . . . . . . . . 13 ⊢ ((𝜑 ∧ ((𝑎 ∈ ℕ ∧ 𝑑 ∈ ℕ) ∧ (𝑎(AP‘𝐾)𝑑) ⊆ (^◡𝐹 “ {𝑔}))) → (𝑊 · (𝑎 + 𝑉)) = (𝑊 + (𝑊 · ((𝑎 − 1) + 𝑉))))
117	116	fveq2d 6895	. . . . . . . . . . . 12 ⊢ ((𝜑 ∧ ((𝑎 ∈ ℕ ∧ 𝑑 ∈ ℕ) ∧ (𝑎(AP‘𝐾)𝑑) ⊆ (^◡𝐹 “ {𝑔}))) → (ℤ_≥‘(𝑊 · (𝑎 + 𝑉))) = (ℤ_≥‘(𝑊 + (𝑊 · ((𝑎 − 1) + 𝑉)))))
118	100, 117	eleqtrd 2835	. . . . . . . . . . 11 ⊢ ((𝜑 ∧ ((𝑎 ∈ ℕ ∧ 𝑑 ∈ ℕ) ∧ (𝑎(AP‘𝐾)𝑑) ⊆ (^◡𝐹 “ {𝑔}))) → (𝑊 · (2 · 𝑉)) ∈ (ℤ_≥‘(𝑊 + (𝑊 · ((𝑎 − 1) + 𝑉)))))
119		fvoveq1 7434	. . . . . . . . . . . 12 ⊢ (𝑦 = 𝑧 → (𝐻‘(𝑦 + (𝑊 · ((𝑎 − 1) + 𝑉)))) = (𝐻‘(𝑧 + (𝑊 · ((𝑎 − 1) + 𝑉)))))
120	119	cbvmptv 5261	. . . . . . . . . . 11 ⊢ (𝑦 ∈ (1...𝑊) ↦ (𝐻‘(𝑦 + (𝑊 · ((𝑎 − 1) + 𝑉))))) = (𝑧 ∈ (1...𝑊) ↦ (𝐻‘(𝑧 + (𝑊 · ((𝑎 − 1) + 𝑉)))))
121	42, 68, 41, 73, 43, 118, 120	vdwlem2 16919	. . . . . . . . . 10 ⊢ ((𝜑 ∧ ((𝑎 ∈ ℕ ∧ 𝑑 ∈ ℕ) ∧ (𝑎(AP‘𝐾)𝑑) ⊆ (^◡𝐹 “ {𝑔}))) → ((𝐾 + 1) MonoAP (𝑦 ∈ (1...𝑊) ↦ (𝐻‘(𝑦 + (𝑊 · ((𝑎 − 1) + 𝑉))))) → (𝐾 + 1) MonoAP 𝐻))
122	65, 121	sylbird 259	. . . . . . . . 9 ⊢ ((𝜑 ∧ ((𝑎 ∈ ℕ ∧ 𝑑 ∈ ℕ) ∧ (𝑎(AP‘𝐾)𝑑) ⊆ (^◡𝐹 “ {𝑔}))) → ((𝐾 + 1) MonoAP 𝑔 → (𝐾 + 1) MonoAP 𝐻))
123	122	orim2d 965	. . . . . . . 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 3211	. . . 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 845 = wceq 1541 ∃wex 1781 ∈ wcel 2106 ∀wral 3061 ∃wrex 3070 Vcvv 3474 ⊆ wss 3948 {csn 4628 ⟨cop 4634 class class class wbr 5148 ↦ cmpt 5231 ^◡ccnv 5675 “ cima 5679 Fn wfn 6538 ⟶wf 6539 ‘cfv 6543 (class class class)co 7411 ↑_m cmap 8822 Fincfn 8941 ℂcc 11110 ℝcr 11111 0cc0 11112 1c1 11113 + caddc 11115 · cmul 11117 < clt 11252 ≤ cle 11253 − cmin 11448 ℕcn 12216 2c2 12271 ℕ₀cn0 12476 ℤcz 12562 ℤ_≥cuz 12826 ...cfz 13488 APcvdwa 16902 MonoAP cvdwm 16903 PolyAP cvdwp 16904

This theorem was proved from axioms: ax-mp 5 ax-1 6 ax-2 7 ax-3 8 ax-gen 1797 ax-4 1811 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 2703 ax-rep 5285 ax-sep 5299 ax-nul 5306 ax-pow 5363 ax-pr 5427 ax-un 7727 ax-cnex 11168 ax-resscn 11169 ax-1cn 11170 ax-icn 11171 ax-addcl 11172 ax-addrcl 11173 ax-mulcl 11174 ax-mulrcl 11175 ax-mulcom 11176 ax-addass 11177 ax-mulass 11178 ax-distr 11179 ax-i2m1 11180 ax-1ne0 11181 ax-1rid 11182 ax-rnegex 11183 ax-rrecex 11184 ax-cnre 11185 ax-pre-lttri 11186 ax-pre-lttrn 11187 ax-pre-ltadd 11188 ax-pre-mulgt0 11189

This theorem depends on definitions: df-bi 206 df-an 397 df-or 846 df-3or 1088 df-3an 1089 df-tru 1544 df-fal 1554 df-ex 1782 df-nf 1786 df-sb 2068 df-mo 2534 df-eu 2563 df-clab 2710 df-cleq 2724 df-clel 2810 df-nfc 2885 df-ne 2941 df-nel 3047 df-ral 3062 df-rex 3071 df-reu 3377 df-rab 3433 df-v 3476 df-sbc 3778 df-csb 3894 df-dif 3951 df-un 3953 df-in 3955 df-ss 3965 df-pss 3967 df-nul 4323 df-if 4529 df-pw 4604 df-sn 4629 df-pr 4631 df-op 4635 df-uni 4909 df-int 4951 df-iun 4999 df-br 5149 df-opab 5211 df-mpt 5232 df-tr 5266 df-id 5574 df-eprel 5580 df-po 5588 df-so 5589 df-fr 5631 df-we 5633 df-xp 5682 df-rel 5683 df-cnv 5684 df-co 5685 df-dm 5686 df-rn 5687 df-res 5688 df-ima 5689 df-pred 6300 df-ord 6367 df-on 6368 df-lim 6369 df-suc 6370 df-iota 6495 df-fun 6545 df-fn 6546 df-f 6547 df-f1 6548 df-fo 6549 df-f1o 6550 df-fv 6551 df-riota 7367 df-ov 7414 df-oprab 7415 df-mpo 7416 df-om 7858 df-1st 7977 df-2nd 7978 df-frecs 8268 df-wrecs 8299 df-recs 8373 df-rdg 8412 df-1o 8468 df-oadd 8472 df-er 8705 df-map 8824 df-en 8942 df-dom 8943 df-sdom 8944 df-fin 8945 df-dju 9898 df-card 9936 df-pnf 11254 df-mnf 11255 df-xr 11256 df-ltxr 11257 df-le 11258 df-sub 11450 df-neg 11451 df-nn 12217 df-2 12279 df-n0 12477 df-z 12563 df-uz 12827 df-rp 12979 df-fz 13489 df-hash 14295 df-vdwap 16905 df-vdwmc 16906 df-vdwpc 16907

This theorem is referenced by: vdwlem10 16927

W3C validator