Theorem tz7.48-2 8439

Description: Proposition 7.48(2) of [TakeutiZaring] p. 51. (Contributed by NM, 9-Feb-1997.) (Revised by David Abernethy, 5-May-2013.)

Hypothesis

Ref	Expression
tz7.48.1	⊢ 𝐹 Fn On

Assertion

Ref	Expression
tz7.48-2	⊢ (∀𝑥 ∈ On (𝐹‘𝑥) ∈ (𝐴 ∖ (𝐹 “ 𝑥)) → Fun ◡𝐹)

Distinct variable group:   𝑥,𝐹

Allowed substitution hint:   𝐴(𝑥)

Proof of Theorem tz7.48-2

Dummy variable 𝑦 is distinct from all other variables.

Step	Hyp	Ref	Expression
1		ssid 4004	. . 3 ⊢ On ⊆ On
2		onelon 6387	. . . . . . . . 9 ⊢ ((𝑥 ∈ On ∧ 𝑦 ∈ 𝑥) → 𝑦 ∈ On)
3	2	ancoms 460	. . . . . . . 8 ⊢ ((𝑦 ∈ 𝑥 ∧ 𝑥 ∈ On) → 𝑦 ∈ On)
4		tz7.48.1	. . . . . . . . . . 11 ⊢ 𝐹 Fn On
5	4	fndmi 6651	. . . . . . . . . 10 ⊢ dom 𝐹 = On
6	5	eleq2i 2826	. . . . . . . . 9 ⊢ (𝑦 ∈ dom 𝐹 ↔ 𝑦 ∈ On)
7		fnfun 6647	. . . . . . . . . . . . 13 ⊢ (𝐹 Fn On → Fun 𝐹)
8	4, 7	ax-mp 5	. . . . . . . . . . . 12 ⊢ Fun 𝐹
9		funfvima 7229	. . . . . . . . . . . 12 ⊢ ((Fun 𝐹 ∧ 𝑦 ∈ dom 𝐹) → (𝑦 ∈ 𝑥 → (𝐹‘𝑦) ∈ (𝐹 “ 𝑥)))
10	8, 9	mpan 689	. . . . . . . . . . 11 ⊢ (𝑦 ∈ dom 𝐹 → (𝑦 ∈ 𝑥 → (𝐹‘𝑦) ∈ (𝐹 “ 𝑥)))
11	10	impcom 409	. . . . . . . . . 10 ⊢ ((𝑦 ∈ 𝑥 ∧ 𝑦 ∈ dom 𝐹) → (𝐹‘𝑦) ∈ (𝐹 “ 𝑥))
12		eleq1a 2829	. . . . . . . . . . 11 ⊢ ((𝐹‘𝑦) ∈ (𝐹 “ 𝑥) → ((𝐹‘𝑥) = (𝐹‘𝑦) → (𝐹‘𝑥) ∈ (𝐹 “ 𝑥)))
13		eldifn 4127	. . . . . . . . . . 11 ⊢ ((𝐹‘𝑥) ∈ (𝐴 ∖ (𝐹 “ 𝑥)) → ¬ (𝐹‘𝑥) ∈ (𝐹 “ 𝑥))
14	12, 13	nsyli 157	. . . . . . . . . 10 ⊢ ((𝐹‘𝑦) ∈ (𝐹 “ 𝑥) → ((𝐹‘𝑥) ∈ (𝐴 ∖ (𝐹 “ 𝑥)) → ¬ (𝐹‘𝑥) = (𝐹‘𝑦)))
15	11, 14	syl 17	. . . . . . . . 9 ⊢ ((𝑦 ∈ 𝑥 ∧ 𝑦 ∈ dom 𝐹) → ((𝐹‘𝑥) ∈ (𝐴 ∖ (𝐹 “ 𝑥)) → ¬ (𝐹‘𝑥) = (𝐹‘𝑦)))
16	6, 15	sylan2br 596	. . . . . . . 8 ⊢ ((𝑦 ∈ 𝑥 ∧ 𝑦 ∈ On) → ((𝐹‘𝑥) ∈ (𝐴 ∖ (𝐹 “ 𝑥)) → ¬ (𝐹‘𝑥) = (𝐹‘𝑦)))
17	3, 16	syldan 592	. . . . . . 7 ⊢ ((𝑦 ∈ 𝑥 ∧ 𝑥 ∈ On) → ((𝐹‘𝑥) ∈ (𝐴 ∖ (𝐹 “ 𝑥)) → ¬ (𝐹‘𝑥) = (𝐹‘𝑦)))
18	17	expimpd 455	. . . . . 6 ⊢ (𝑦 ∈ 𝑥 → ((𝑥 ∈ On ∧ (𝐹‘𝑥) ∈ (𝐴 ∖ (𝐹 “ 𝑥))) → ¬ (𝐹‘𝑥) = (𝐹‘𝑦)))
19	18	com12 32	. . . . 5 ⊢ ((𝑥 ∈ On ∧ (𝐹‘𝑥) ∈ (𝐴 ∖ (𝐹 “ 𝑥))) → (𝑦 ∈ 𝑥 → ¬ (𝐹‘𝑥) = (𝐹‘𝑦)))
20	19	ralrimiv 3146	. . . 4 ⊢ ((𝑥 ∈ On ∧ (𝐹‘𝑥) ∈ (𝐴 ∖ (𝐹 “ 𝑥))) → ∀𝑦 ∈ 𝑥 ¬ (𝐹‘𝑥) = (𝐹‘𝑦))
21	20	ralimiaa 3083	. . 3 ⊢ (∀𝑥 ∈ On (𝐹‘𝑥) ∈ (𝐴 ∖ (𝐹 “ 𝑥)) → ∀𝑥 ∈ On ∀𝑦 ∈ 𝑥 ¬ (𝐹‘𝑥) = (𝐹‘𝑦))
22	4	tz7.48lem 8438	. . 3 ⊢ ((On ⊆ On ∧ ∀𝑥 ∈ On ∀𝑦 ∈ 𝑥 ¬ (𝐹‘𝑥) = (𝐹‘𝑦)) → Fun ◡(𝐹 ↾ On))
23	1, 21, 22	sylancr 588	. 2 ⊢ (∀𝑥 ∈ On (𝐹‘𝑥) ∈ (𝐴 ∖ (𝐹 “ 𝑥)) → Fun ◡(𝐹 ↾ On))
24		fnrel 6649	. . . . . 6 ⊢ (𝐹 Fn On → Rel 𝐹)
25	4, 24	ax-mp 5	. . . . 5 ⊢ Rel 𝐹
26	5	eqimssi 4042	. . . . 5 ⊢ dom 𝐹 ⊆ On
27		relssres 6021	. . . . 5 ⊢ ((Rel 𝐹 ∧ dom 𝐹 ⊆ On) → (𝐹 ↾ On) = 𝐹)
28	25, 26, 27	mp2an 691	. . . 4 ⊢ (𝐹 ↾ On) = 𝐹
29	28	cnveqi 5873	. . 3 ⊢ ◡(𝐹 ↾ On) = ◡𝐹
30	29	funeqi 6567	. 2 ⊢ (Fun ◡(𝐹 ↾ On) ↔ Fun ◡𝐹)
31	23, 30	sylib 217	1 ⊢ (∀𝑥 ∈ On (𝐹‘𝑥) ∈ (𝐴 ∖ (𝐹 “ 𝑥)) → Fun ◡𝐹)

Syntax hints:  ¬ wn 3   → wi 4   ∧ wa 397   = wceq 1542   ∈ wcel 2107  ∀wral 3062   ∖ cdif 3945   ⊆ wss 3948  ^◡ccnv 5675  dom cdm 5676   ↾ cres 5678   “ cima 5679  Rel wrel 5681  Oncon0 6362  Fun wfun 6535   Fn wfn 6536  ‘cfv 6541

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 1914  ax-6 1972  ax-7 2012  ax-8 2109  ax-9 2117  ax-10 2138  ax-11 2155  ax-12 2172  ax-ext 2704  ax-sep 5299  ax-nul 5306  ax-pr 5427

This theorem depends on definitions:  df-bi 206  df-an 398  df-or 847  df-3or 1089  df-3an 1090  df-tru 1545  df-fal 1555  df-ex 1783  df-nf 1787  df-sb 2069  df-mo 2535  df-eu 2564  df-clab 2711  df-cleq 2725  df-clel 2811  df-ne 2942  df-ral 3063  df-rex 3072  df-rab 3434  df-v 3477  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-br 5149  df-opab 5211  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-ord 6365  df-on 6366  df-iota 6493  df-fun 6543  df-fn 6544  df-f 6545  df-f1 6546  df-fv 6549

This theorem is referenced by:  tz7.48-3  8441