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 16967

Description: Lemma for vdw 16972. (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 5114	. . 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 16962	. . . 4 ⊢ (𝜑 → 𝐹:(1...𝑉)⟶(𝑅 ↑_m (1...𝑊)))
9		ovex 7423	. . . . 5 ⊢ (𝑅 ↑_m (1...𝑊)) ∈ V
10		ovex 7423	. . . . 5 ⊢ (1...𝑉) ∈ V
11	9, 10	elmap 8847	. . . 4 ⊢ (𝐹 ∈ ((𝑅 ↑_m (1...𝑊)) ↑_m (1...𝑉)) ↔ 𝐹:(1...𝑉)⟶(𝑅 ↑_m (1...𝑊)))
12	8, 11	sylibr 234	. . 3 ⊢ (𝜑 → 𝐹 ∈ ((𝑅 ↑_m (1...𝑊)) ↑_m (1...𝑉)))
13	1, 2, 12	rspcdva 3592	. 2 ⊢ (𝜑 → 𝐾 MonoAP 𝐹)
14		vdwlem9.k	. . . . . 6 ⊢ (𝜑 → 𝐾 ∈ (ℤ_≥‘2))
15		eluz2nn 12854	. . . . . 6 ⊢ (𝐾 ∈ (ℤ_≥‘2) → 𝐾 ∈ ℕ)
16	14, 15	syl 17	. . . . 5 ⊢ (𝜑 → 𝐾 ∈ ℕ)
17	16	nnnn0d 12510	. . . 4 ⊢ (𝜑 → 𝐾 ∈ ℕ₀)
18	10, 17, 8	vdwmc 16956	. . 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 16953	. . . . . . . . . . . . 13 ⊢ ((𝐾 ∈ ℕ ∧ 𝑎 ∈ ℕ ∧ 𝑑 ∈ ℕ) → 𝑎 ∈ (𝑎(AP‘𝐾)𝑑))
26	22, 23, 24, 25	syl3anc 1373	. . . . . . . . . . . 12 ⊢ ((𝜑 ∧ ((𝑎 ∈ ℕ ∧ 𝑑 ∈ ℕ) ∧ (𝑎(AP‘𝐾)𝑑) ⊆ (^◡𝐹 “ {𝑔}))) → 𝑎 ∈ (𝑎(AP‘𝐾)𝑑))
27	21, 26	sseldd 3950	. . . . . . . . . . 11 ⊢ ((𝜑 ∧ ((𝑎 ∈ ℕ ∧ 𝑑 ∈ ℕ) ∧ (𝑎(AP‘𝐾)𝑑) ⊆ (^◡𝐹 “ {𝑔}))) → 𝑎 ∈ (^◡𝐹 “ {𝑔}))
28	8	ffnd 6692	. . . . . . . . . . . . 13 ⊢ (𝜑 → 𝐹 Fn (1...𝑉))
29	28	adantr 480	. . . . . . . . . . . 12 ⊢ ((𝜑 ∧ ((𝑎 ∈ ℕ ∧ 𝑑 ∈ ℕ) ∧ (𝑎(AP‘𝐾)𝑑) ⊆ (^◡𝐹 “ {𝑔}))) → 𝐹 Fn (1...𝑉))
30		fniniseg 7035	. . . . . . . . . . . 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 7060	. . . . . . . . 9 ⊢ ((𝜑 ∧ ((𝑎 ∈ ℕ ∧ 𝑑 ∈ ℕ) ∧ (𝑎(AP‘𝐾)𝑑) ⊆ (^◡𝐹 “ {𝑔}))) → (𝐹‘𝑎) ∈ (𝑅 ↑_m (1...𝑊)))
37	33, 36	eqeltrrd 2830	. . . . . . . 8 ⊢ ((𝜑 ∧ ((𝑎 ∈ ℕ ∧ 𝑑 ∈ ℕ) ∧ (𝑎(AP‘𝐾)𝑑) ⊆ (^◡𝐹 “ {𝑔}))) → 𝑔 ∈ (𝑅 ↑_m (1...𝑊)))
38		rsp 3226	. . . . . . . 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 7423	. . . . . . . . . . . 12 ⊢ (1...𝑊) ∈ V
47		elmapg 8815	. . . . . . . . . . . 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 16965	. . . . . . . . 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 7397	. . . . . . . . . . . . . . . . . . 19 ⊢ (𝑥 = 𝑎 → (𝑥 − 1) = (𝑎 − 1))
56	55	oveq1d 7405	. . . . . . . . . . . . . . . . . 18 ⊢ (𝑥 = 𝑎 → ((𝑥 − 1) + 𝑉) = ((𝑎 − 1) + 𝑉))
57	56	oveq2d 7406	. . . . . . . . . . . . . . . . 17 ⊢ (𝑥 = 𝑎 → (𝑊 · ((𝑥 − 1) + 𝑉)) = (𝑊 · ((𝑎 − 1) + 𝑉)))
58	57	oveq2d 7406	. . . . . . . . . . . . . . . 16 ⊢ (𝑥 = 𝑎 → (𝑦 + (𝑊 · ((𝑥 − 1) + 𝑉))) = (𝑦 + (𝑊 · ((𝑎 − 1) + 𝑉))))
59	58	fveq2d 6865	. . . . . . . . . . . . . . 15 ⊢ (𝑥 = 𝑎 → (𝐻‘(𝑦 + (𝑊 · ((𝑥 − 1) + 𝑉)))) = (𝐻‘(𝑦 + (𝑊 · ((𝑎 − 1) + 𝑉)))))
60	59	mpteq2dv 5204	. . . . . . . . . . . . . 14 ⊢ (𝑥 = 𝑎 → (𝑦 ∈ (1...𝑊) ↦ (𝐻‘(𝑦 + (𝑊 · ((𝑥 − 1) + 𝑉))))) = (𝑦 ∈ (1...𝑊) ↦ (𝐻‘(𝑦 + (𝑊 · ((𝑎 − 1) + 𝑉))))))
61	46	mptex 7200	. . . . . . . . . . . . . 14 ⊢ (𝑦 ∈ (1...𝑊) ↦ (𝐻‘(𝑦 + (𝑊 · ((𝑎 − 1) + 𝑉))))) ∈ V
62	60, 7, 61	fvmpt 6971	. . . . . . . . . . . . 13 ⊢ (𝑎 ∈ (1...𝑉) → (𝐹‘𝑎) = (𝑦 ∈ (1...𝑊) ↦ (𝐻‘(𝑦 + (𝑊 · ((𝑎 − 1) + 𝑉))))))
63	35, 62	syl 17	. . . . . . . . . . . 12 ⊢ ((𝜑 ∧ ((𝑎 ∈ ℕ ∧ 𝑑 ∈ ℕ) ∧ (𝑎(AP‘𝐾)𝑑) ⊆ (^◡𝐹 “ {𝑔}))) → (𝐹‘𝑎) = (𝑦 ∈ (1...𝑊) ↦ (𝐻‘(𝑦 + (𝑊 · ((𝑎 − 1) + 𝑉))))))
64	63, 33	eqtr3d 2767	. . . . . . . . . . 11 ⊢ ((𝜑 ∧ ((𝑎 ∈ ℕ ∧ 𝑑 ∈ ℕ) ∧ (𝑎(AP‘𝐾)𝑑) ⊆ (^◡𝐹 “ {𝑔}))) → (𝑦 ∈ (1...𝑊) ↦ (𝐻‘(𝑦 + (𝑊 · ((𝑎 − 1) + 𝑉))))) = 𝑔)
65	64	breq2d 5122	. . . . . . . . . 10 ⊢ ((𝜑 ∧ ((𝑎 ∈ ℕ ∧ 𝑑 ∈ ℕ) ∧ (𝑎(AP‘𝐾)𝑑) ⊆ (^◡𝐹 “ {𝑔}))) → ((𝐾 + 1) MonoAP (𝑦 ∈ (1...𝑊) ↦ (𝐻‘(𝑦 + (𝑊 · ((𝑎 − 1) + 𝑉))))) ↔ (𝐾 + 1) MonoAP 𝑔))
66	17	adantr 480	. . . . . . . . . . . 12 ⊢ ((𝜑 ∧ ((𝑎 ∈ ℕ ∧ 𝑑 ∈ ℕ) ∧ (𝑎(AP‘𝐾)𝑑) ⊆ (^◡𝐹 “ {𝑔}))) → 𝐾 ∈ ℕ₀)
67		peano2nn0 12489	. . . . . . . . . . . 12 ⊢ (𝐾 ∈ ℕ₀ → (𝐾 + 1) ∈ ℕ₀)
68	66, 67	syl 17	. . . . . . . . . . 11 ⊢ ((𝜑 ∧ ((𝑎 ∈ ℕ ∧ 𝑑 ∈ ℕ) ∧ (𝑎(AP‘𝐾)𝑑) ⊆ (^◡𝐹 “ {𝑔}))) → (𝐾 + 1) ∈ ℕ₀)
69		nnm1nn0 12490	. . . . . . . . . . . . . 14 ⊢ (𝑎 ∈ ℕ → (𝑎 − 1) ∈ ℕ₀)
70	23, 69	syl 17	. . . . . . . . . . . . 13 ⊢ ((𝜑 ∧ ((𝑎 ∈ ℕ ∧ 𝑑 ∈ ℕ) ∧ (𝑎(AP‘𝐾)𝑑) ⊆ (^◡𝐹 “ {𝑔}))) → (𝑎 − 1) ∈ ℕ₀)
71		nn0nnaddcl 12480	. . . . . . . . . . . . 13 ⊢ (((𝑎 − 1) ∈ ℕ₀ ∧ 𝑉 ∈ ℕ) → ((𝑎 − 1) + 𝑉) ∈ ℕ)
72	70, 40, 71	syl2anc 584	. . . . . . . . . . . 12 ⊢ ((𝜑 ∧ ((𝑎 ∈ ℕ ∧ 𝑑 ∈ ℕ) ∧ (𝑎(AP‘𝐾)𝑑) ⊆ (^◡𝐹 “ {𝑔}))) → ((𝑎 − 1) + 𝑉) ∈ ℕ)
73	41, 72	nnmulcld 12246	. . . . . . . . . . 11 ⊢ ((𝜑 ∧ ((𝑎 ∈ ℕ ∧ 𝑑 ∈ ℕ) ∧ (𝑎(AP‘𝐾)𝑑) ⊆ (^◡𝐹 “ {𝑔}))) → (𝑊 · ((𝑎 − 1) + 𝑉)) ∈ ℕ)
74	23, 40	nnaddcld 12245	. . . . . . . . . . . . . . 15 ⊢ ((𝜑 ∧ ((𝑎 ∈ ℕ ∧ 𝑑 ∈ ℕ) ∧ (𝑎(AP‘𝐾)𝑑) ⊆ (^◡𝐹 “ {𝑔}))) → (𝑎 + 𝑉) ∈ ℕ)
75	41, 74	nnmulcld 12246	. . . . . . . . . . . . . 14 ⊢ ((𝜑 ∧ ((𝑎 ∈ ℕ ∧ 𝑑 ∈ ℕ) ∧ (𝑎(AP‘𝐾)𝑑) ⊆ (^◡𝐹 “ {𝑔}))) → (𝑊 · (𝑎 + 𝑉)) ∈ ℕ)
76	75	nnzd 12563	. . . . . . . . . . . . 13 ⊢ ((𝜑 ∧ ((𝑎 ∈ ℕ ∧ 𝑑 ∈ ℕ) ∧ (𝑎(AP‘𝐾)𝑑) ⊆ (^◡𝐹 “ {𝑔}))) → (𝑊 · (𝑎 + 𝑉)) ∈ ℤ)
77		2nn 12266	. . . . . . . . . . . . . . . . 17 ⊢ 2 ∈ ℕ
78		nnmulcl 12217	. . . . . . . . . . . . . . . . 17 ⊢ ((2 ∈ ℕ ∧ 𝑉 ∈ ℕ) → (2 · 𝑉) ∈ ℕ)
79	77, 3, 78	sylancr 587	. . . . . . . . . . . . . . . 16 ⊢ (𝜑 → (2 · 𝑉) ∈ ℕ)
80	4, 79	nnmulcld 12246	. . . . . . . . . . . . . . 15 ⊢ (𝜑 → (𝑊 · (2 · 𝑉)) ∈ ℕ)
81	80	nnzd 12563	. . . . . . . . . . . . . 14 ⊢ (𝜑 → (𝑊 · (2 · 𝑉)) ∈ ℤ)
82	81	adantr 480	. . . . . . . . . . . . 13 ⊢ ((𝜑 ∧ ((𝑎 ∈ ℕ ∧ 𝑑 ∈ ℕ) ∧ (𝑎(AP‘𝐾)𝑑) ⊆ (^◡𝐹 “ {𝑔}))) → (𝑊 · (2 · 𝑉)) ∈ ℤ)
83	23	nnred 12208	. . . . . . . . . . . . . . . 16 ⊢ ((𝜑 ∧ ((𝑎 ∈ ℕ ∧ 𝑑 ∈ ℕ) ∧ (𝑎(AP‘𝐾)𝑑) ⊆ (^◡𝐹 “ {𝑔}))) → 𝑎 ∈ ℝ)
84	40	nnred 12208	. . . . . . . . . . . . . . . 16 ⊢ ((𝜑 ∧ ((𝑎 ∈ ℕ ∧ 𝑑 ∈ ℕ) ∧ (𝑎(AP‘𝐾)𝑑) ⊆ (^◡𝐹 “ {𝑔}))) → 𝑉 ∈ ℝ)
85		elfzle2 13496	. . . . . . . . . . . . . . . . 17 ⊢ (𝑎 ∈ (1...𝑉) → 𝑎 ≤ 𝑉)
86	35, 85	syl 17	. . . . . . . . . . . . . . . 16 ⊢ ((𝜑 ∧ ((𝑎 ∈ ℕ ∧ 𝑑 ∈ ℕ) ∧ (𝑎(AP‘𝐾)𝑑) ⊆ (^◡𝐹 “ {𝑔}))) → 𝑎 ≤ 𝑉)
87	83, 84, 84, 86	leadd1dd 11799	. . . . . . . . . . . . . . 15 ⊢ ((𝜑 ∧ ((𝑎 ∈ ℕ ∧ 𝑑 ∈ ℕ) ∧ (𝑎(AP‘𝐾)𝑑) ⊆ (^◡𝐹 “ {𝑔}))) → (𝑎 + 𝑉) ≤ (𝑉 + 𝑉))
88	40	nncnd 12209	. . . . . . . . . . . . . . . 16 ⊢ ((𝜑 ∧ ((𝑎 ∈ ℕ ∧ 𝑑 ∈ ℕ) ∧ (𝑎(AP‘𝐾)𝑑) ⊆ (^◡𝐹 “ {𝑔}))) → 𝑉 ∈ ℂ)
89	88	2timesd 12432	. . . . . . . . . . . . . . 15 ⊢ ((𝜑 ∧ ((𝑎 ∈ ℕ ∧ 𝑑 ∈ ℕ) ∧ (𝑎(AP‘𝐾)𝑑) ⊆ (^◡𝐹 “ {𝑔}))) → (2 · 𝑉) = (𝑉 + 𝑉))
90	87, 89	breqtrrd 5138	. . . . . . . . . . . . . 14 ⊢ ((𝜑 ∧ ((𝑎 ∈ ℕ ∧ 𝑑 ∈ ℕ) ∧ (𝑎(AP‘𝐾)𝑑) ⊆ (^◡𝐹 “ {𝑔}))) → (𝑎 + 𝑉) ≤ (2 · 𝑉))
91	74	nnred 12208	. . . . . . . . . . . . . . 15 ⊢ ((𝜑 ∧ ((𝑎 ∈ ℕ ∧ 𝑑 ∈ ℕ) ∧ (𝑎(AP‘𝐾)𝑑) ⊆ (^◡𝐹 “ {𝑔}))) → (𝑎 + 𝑉) ∈ ℝ)
92	79	nnred 12208	. . . . . . . . . . . . . . . 16 ⊢ (𝜑 → (2 · 𝑉) ∈ ℝ)
93	92	adantr 480	. . . . . . . . . . . . . . 15 ⊢ ((𝜑 ∧ ((𝑎 ∈ ℕ ∧ 𝑑 ∈ ℕ) ∧ (𝑎(AP‘𝐾)𝑑) ⊆ (^◡𝐹 “ {𝑔}))) → (2 · 𝑉) ∈ ℝ)
94	41	nnred 12208	. . . . . . . . . . . . . . 15 ⊢ ((𝜑 ∧ ((𝑎 ∈ ℕ ∧ 𝑑 ∈ ℕ) ∧ (𝑎(AP‘𝐾)𝑑) ⊆ (^◡𝐹 “ {𝑔}))) → 𝑊 ∈ ℝ)
95	41	nngt0d 12242	. . . . . . . . . . . . . . 15 ⊢ ((𝜑 ∧ ((𝑎 ∈ ℕ ∧ 𝑑 ∈ ℕ) ∧ (𝑎(AP‘𝐾)𝑑) ⊆ (^◡𝐹 “ {𝑔}))) → 0 < 𝑊)
96		lemul2 12042	. . . . . . . . . . . . . . 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 12806	. . . . . . . . . . . . 13 ⊢ ((𝑊 · (2 · 𝑉)) ∈ (ℤ_≥‘(𝑊 · (𝑎 + 𝑉))) ↔ ((𝑊 · (𝑎 + 𝑉)) ∈ ℤ ∧ (𝑊 · (2 · 𝑉)) ∈ ℤ ∧ (𝑊 · (𝑎 + 𝑉)) ≤ (𝑊 · (2 · 𝑉))))
100	76, 82, 98, 99	syl3anbrc 1344	. . . . . . . . . . . 12 ⊢ ((𝜑 ∧ ((𝑎 ∈ ℕ ∧ 𝑑 ∈ ℕ) ∧ (𝑎(AP‘𝐾)𝑑) ⊆ (^◡𝐹 “ {𝑔}))) → (𝑊 · (2 · 𝑉)) ∈ (ℤ_≥‘(𝑊 · (𝑎 + 𝑉))))
101	41	nncnd 12209	. . . . . . . . . . . . . . 15 ⊢ ((𝜑 ∧ ((𝑎 ∈ ℕ ∧ 𝑑 ∈ ℕ) ∧ (𝑎(AP‘𝐾)𝑑) ⊆ (^◡𝐹 “ {𝑔}))) → 𝑊 ∈ ℂ)
102		1cnd 11176	. . . . . . . . . . . . . . 15 ⊢ ((𝜑 ∧ ((𝑎 ∈ ℕ ∧ 𝑑 ∈ ℕ) ∧ (𝑎(AP‘𝐾)𝑑) ⊆ (^◡𝐹 “ {𝑔}))) → 1 ∈ ℂ)
103	70	nn0cnd 12512	. . . . . . . . . . . . . . . 16 ⊢ ((𝜑 ∧ ((𝑎 ∈ ℕ ∧ 𝑑 ∈ ℕ) ∧ (𝑎(AP‘𝐾)𝑑) ⊆ (^◡𝐹 “ {𝑔}))) → (𝑎 − 1) ∈ ℂ)
104	103, 88	addcld 11200	. . . . . . . . . . . . . . 15 ⊢ ((𝜑 ∧ ((𝑎 ∈ ℕ ∧ 𝑑 ∈ ℕ) ∧ (𝑎(AP‘𝐾)𝑑) ⊆ (^◡𝐹 “ {𝑔}))) → ((𝑎 − 1) + 𝑉) ∈ ℂ)
105	101, 102, 104	adddid 11205	. . . . . . . . . . . . . 14 ⊢ ((𝜑 ∧ ((𝑎 ∈ ℕ ∧ 𝑑 ∈ ℕ) ∧ (𝑎(AP‘𝐾)𝑑) ⊆ (^◡𝐹 “ {𝑔}))) → (𝑊 · (1 + ((𝑎 − 1) + 𝑉))) = ((𝑊 · 1) + (𝑊 · ((𝑎 − 1) + 𝑉))))
106	102, 103, 88	addassd 11203	. . . . . . . . . . . . . . . 16 ⊢ ((𝜑 ∧ ((𝑎 ∈ ℕ ∧ 𝑑 ∈ ℕ) ∧ (𝑎(AP‘𝐾)𝑑) ⊆ (^◡𝐹 “ {𝑔}))) → ((1 + (𝑎 − 1)) + 𝑉) = (1 + ((𝑎 − 1) + 𝑉)))
107		ax-1cn 11133	. . . . . . . . . . . . . . . . . 18 ⊢ 1 ∈ ℂ
108	23	nncnd 12209	. . . . . . . . . . . . . . . . . 18 ⊢ ((𝜑 ∧ ((𝑎 ∈ ℕ ∧ 𝑑 ∈ ℕ) ∧ (𝑎(AP‘𝐾)𝑑) ⊆ (^◡𝐹 “ {𝑔}))) → 𝑎 ∈ ℂ)
109		pncan3 11436	. . . . . . . . . . . . . . . . . 18 ⊢ ((1 ∈ ℂ ∧ 𝑎 ∈ ℂ) → (1 + (𝑎 − 1)) = 𝑎)
110	107, 108, 109	sylancr 587	. . . . . . . . . . . . . . . . 17 ⊢ ((𝜑 ∧ ((𝑎 ∈ ℕ ∧ 𝑑 ∈ ℕ) ∧ (𝑎(AP‘𝐾)𝑑) ⊆ (^◡𝐹 “ {𝑔}))) → (1 + (𝑎 − 1)) = 𝑎)
111	110	oveq1d 7405	. . . . . . . . . . . . . . . 16 ⊢ ((𝜑 ∧ ((𝑎 ∈ ℕ ∧ 𝑑 ∈ ℕ) ∧ (𝑎(AP‘𝐾)𝑑) ⊆ (^◡𝐹 “ {𝑔}))) → ((1 + (𝑎 − 1)) + 𝑉) = (𝑎 + 𝑉))
112	106, 111	eqtr3d 2767	. . . . . . . . . . . . . . 15 ⊢ ((𝜑 ∧ ((𝑎 ∈ ℕ ∧ 𝑑 ∈ ℕ) ∧ (𝑎(AP‘𝐾)𝑑) ⊆ (^◡𝐹 “ {𝑔}))) → (1 + ((𝑎 − 1) + 𝑉)) = (𝑎 + 𝑉))
113	112	oveq2d 7406	. . . . . . . . . . . . . 14 ⊢ ((𝜑 ∧ ((𝑎 ∈ ℕ ∧ 𝑑 ∈ ℕ) ∧ (𝑎(AP‘𝐾)𝑑) ⊆ (^◡𝐹 “ {𝑔}))) → (𝑊 · (1 + ((𝑎 − 1) + 𝑉))) = (𝑊 · (𝑎 + 𝑉)))
114	101	mulridd 11198	. . . . . . . . . . . . . . 15 ⊢ ((𝜑 ∧ ((𝑎 ∈ ℕ ∧ 𝑑 ∈ ℕ) ∧ (𝑎(AP‘𝐾)𝑑) ⊆ (^◡𝐹 “ {𝑔}))) → (𝑊 · 1) = 𝑊)
115	114	oveq1d 7405	. . . . . . . . . . . . . 14 ⊢ ((𝜑 ∧ ((𝑎 ∈ ℕ ∧ 𝑑 ∈ ℕ) ∧ (𝑎(AP‘𝐾)𝑑) ⊆ (^◡𝐹 “ {𝑔}))) → ((𝑊 · 1) + (𝑊 · ((𝑎 − 1) + 𝑉))) = (𝑊 + (𝑊 · ((𝑎 − 1) + 𝑉))))
116	105, 113, 115	3eqtr3d 2773	. . . . . . . . . . . . 13 ⊢ ((𝜑 ∧ ((𝑎 ∈ ℕ ∧ 𝑑 ∈ ℕ) ∧ (𝑎(AP‘𝐾)𝑑) ⊆ (^◡𝐹 “ {𝑔}))) → (𝑊 · (𝑎 + 𝑉)) = (𝑊 + (𝑊 · ((𝑎 − 1) + 𝑉))))
117	116	fveq2d 6865	. . . . . . . . . . . 12 ⊢ ((𝜑 ∧ ((𝑎 ∈ ℕ ∧ 𝑑 ∈ ℕ) ∧ (𝑎(AP‘𝐾)𝑑) ⊆ (^◡𝐹 “ {𝑔}))) → (ℤ_≥‘(𝑊 · (𝑎 + 𝑉))) = (ℤ_≥‘(𝑊 + (𝑊 · ((𝑎 − 1) + 𝑉)))))
118	100, 117	eleqtrd 2831	. . . . . . . . . . 11 ⊢ ((𝜑 ∧ ((𝑎 ∈ ℕ ∧ 𝑑 ∈ ℕ) ∧ (𝑎(AP‘𝐾)𝑑) ⊆ (^◡𝐹 “ {𝑔}))) → (𝑊 · (2 · 𝑉)) ∈ (ℤ_≥‘(𝑊 + (𝑊 · ((𝑎 − 1) + 𝑉)))))
119		fvoveq1 7413	. . . . . . . . . . . 12 ⊢ (𝑦 = 𝑧 → (𝐻‘(𝑦 + (𝑊 · ((𝑎 − 1) + 𝑉)))) = (𝐻‘(𝑧 + (𝑊 · ((𝑎 − 1) + 𝑉)))))
120	119	cbvmptv 5214	. . . . . . . . . . 11 ⊢ (𝑦 ∈ (1...𝑊) ↦ (𝐻‘(𝑦 + (𝑊 · ((𝑎 − 1) + 𝑉))))) = (𝑧 ∈ (1...𝑊) ↦ (𝐻‘(𝑧 + (𝑊 · ((𝑎 − 1) + 𝑉)))))
121	42, 68, 41, 73, 43, 118, 120	vdwlem2 16960	. . . . . . . . . 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 3195	. . . 4 ⊢ (𝜑 → (∃𝑎 ∈ ℕ ∃𝑑 ∈ ℕ (𝑎(AP‘𝐾)𝑑) ⊆ (^◡𝐹 “ {𝑔}) → (⟨(𝑀 + 1), 𝐾⟩ PolyAP 𝐻 ∨ (𝐾 + 1) MonoAP 𝐻)))
128	127	exlimdv 1933	. . 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 1540 ∃wex 1779 ∈ wcel 2109 ∀wral 3045 ∃wrex 3054 Vcvv 3450 ⊆ wss 3917 {csn 4592 ⟨cop 4598 class class class wbr 5110 ↦ cmpt 5191 ^◡ccnv 5640 “ cima 5644 Fn wfn 6509 ⟶wf 6510 ‘cfv 6514 (class class class)co 7390 ↑_m cmap 8802 Fincfn 8921 ℂcc 11073 ℝcr 11074 0cc0 11075 1c1 11076 + caddc 11078 · cmul 11080 < clt 11215 ≤ cle 11216 − cmin 11412 ℕcn 12193 2c2 12248 ℕ₀cn0 12449 ℤcz 12536 ℤ_≥cuz 12800 ...cfz 13475 APcvdwa 16943 MonoAP cvdwm 16944 PolyAP cvdwp 16945

This theorem was proved from axioms: ax-mp 5 ax-1 6 ax-2 7 ax-3 8 ax-gen 1795 ax-4 1809 ax-5 1910 ax-6 1967 ax-7 2008 ax-8 2111 ax-9 2119 ax-10 2142 ax-11 2158 ax-12 2178 ax-ext 2702 ax-rep 5237 ax-sep 5254 ax-nul 5264 ax-pow 5323 ax-pr 5390 ax-un 7714 ax-cnex 11131 ax-resscn 11132 ax-1cn 11133 ax-icn 11134 ax-addcl 11135 ax-addrcl 11136 ax-mulcl 11137 ax-mulrcl 11138 ax-mulcom 11139 ax-addass 11140 ax-mulass 11141 ax-distr 11142 ax-i2m1 11143 ax-1ne0 11144 ax-1rid 11145 ax-rnegex 11146 ax-rrecex 11147 ax-cnre 11148 ax-pre-lttri 11149 ax-pre-lttrn 11150 ax-pre-ltadd 11151 ax-pre-mulgt0 11152

This theorem depends on definitions: df-bi 207 df-an 396 df-or 848 df-3or 1087 df-3an 1088 df-tru 1543 df-fal 1553 df-ex 1780 df-nf 1784 df-sb 2066 df-mo 2534 df-eu 2563 df-clab 2709 df-cleq 2722 df-clel 2804 df-nfc 2879 df-ne 2927 df-nel 3031 df-ral 3046 df-rex 3055 df-reu 3357 df-rab 3409 df-v 3452 df-sbc 3757 df-csb 3866 df-dif 3920 df-un 3922 df-in 3924 df-ss 3934 df-pss 3937 df-nul 4300 df-if 4492 df-pw 4568 df-sn 4593 df-pr 4595 df-op 4599 df-uni 4875 df-int 4914 df-iun 4960 df-br 5111 df-opab 5173 df-mpt 5192 df-tr 5218 df-id 5536 df-eprel 5541 df-po 5549 df-so 5550 df-fr 5594 df-we 5596 df-xp 5647 df-rel 5648 df-cnv 5649 df-co 5650 df-dm 5651 df-rn 5652 df-res 5653 df-ima 5654 df-pred 6277 df-ord 6338 df-on 6339 df-lim 6340 df-suc 6341 df-iota 6467 df-fun 6516 df-fn 6517 df-f 6518 df-f1 6519 df-fo 6520 df-f1o 6521 df-fv 6522 df-riota 7347 df-ov 7393 df-oprab 7394 df-mpo 7395 df-om 7846 df-1st 7971 df-2nd 7972 df-frecs 8263 df-wrecs 8294 df-recs 8343 df-rdg 8381 df-1o 8437 df-oadd 8441 df-er 8674 df-map 8804 df-en 8922 df-dom 8923 df-sdom 8924 df-fin 8925 df-dju 9861 df-card 9899 df-pnf 11217 df-mnf 11218 df-xr 11219 df-ltxr 11220 df-le 11221 df-sub 11414 df-neg 11415 df-nn 12194 df-2 12256 df-n0 12450 df-z 12537 df-uz 12801 df-rp 12959 df-fz 13476 df-hash 14303 df-vdwap 16946 df-vdwmc 16947 df-vdwpc 16948

This theorem is referenced by: vdwlem10 16968

W3C validator