Metamath Proof Explorer


Theorem wdomfil

Description: Weak dominance agrees with normal for finite left sets. (Contributed by Stefan O'Rear, 28-Feb-2015) (Revised by Mario Carneiro, 5-May-2015)

Ref Expression
Assertion wdomfil ( 𝑋 ∈ Fin → ( 𝑋* 𝑌𝑋𝑌 ) )

Proof

Step Hyp Ref Expression
1 relwdom Rel ≼*
2 1 brrelex2i ( 𝑋* 𝑌𝑌 ∈ V )
3 0domg ( 𝑌 ∈ V → ∅ ≼ 𝑌 )
4 2 3 syl ( 𝑋* 𝑌 → ∅ ≼ 𝑌 )
5 breq1 ( 𝑋 = ∅ → ( 𝑋𝑌 ↔ ∅ ≼ 𝑌 ) )
6 4 5 syl5ibr ( 𝑋 = ∅ → ( 𝑋* 𝑌𝑋𝑌 ) )
7 6 adantl ( ( 𝑋 ∈ Fin ∧ 𝑋 = ∅ ) → ( 𝑋* 𝑌𝑋𝑌 ) )
8 brwdomn0 ( 𝑋 ≠ ∅ → ( 𝑋* 𝑌 ↔ ∃ 𝑥 𝑥 : 𝑌onto𝑋 ) )
9 8 adantl ( ( 𝑋 ∈ Fin ∧ 𝑋 ≠ ∅ ) → ( 𝑋* 𝑌 ↔ ∃ 𝑥 𝑥 : 𝑌onto𝑋 ) )
10 vex 𝑥 ∈ V
11 fof ( 𝑥 : 𝑌onto𝑋𝑥 : 𝑌𝑋 )
12 dmfex ( ( 𝑥 ∈ V ∧ 𝑥 : 𝑌𝑋 ) → 𝑌 ∈ V )
13 10 11 12 sylancr ( 𝑥 : 𝑌onto𝑋𝑌 ∈ V )
14 13 adantl ( ( 𝑋 ∈ Fin ∧ 𝑥 : 𝑌onto𝑋 ) → 𝑌 ∈ V )
15 simpl ( ( 𝑋 ∈ Fin ∧ 𝑥 : 𝑌onto𝑋 ) → 𝑋 ∈ Fin )
16 simpr ( ( 𝑋 ∈ Fin ∧ 𝑥 : 𝑌onto𝑋 ) → 𝑥 : 𝑌onto𝑋 )
17 fodomfi2 ( ( 𝑌 ∈ V ∧ 𝑋 ∈ Fin ∧ 𝑥 : 𝑌onto𝑋 ) → 𝑋𝑌 )
18 14 15 16 17 syl3anc ( ( 𝑋 ∈ Fin ∧ 𝑥 : 𝑌onto𝑋 ) → 𝑋𝑌 )
19 18 ex ( 𝑋 ∈ Fin → ( 𝑥 : 𝑌onto𝑋𝑋𝑌 ) )
20 19 adantr ( ( 𝑋 ∈ Fin ∧ 𝑋 ≠ ∅ ) → ( 𝑥 : 𝑌onto𝑋𝑋𝑌 ) )
21 20 exlimdv ( ( 𝑋 ∈ Fin ∧ 𝑋 ≠ ∅ ) → ( ∃ 𝑥 𝑥 : 𝑌onto𝑋𝑋𝑌 ) )
22 9 21 sylbid ( ( 𝑋 ∈ Fin ∧ 𝑋 ≠ ∅ ) → ( 𝑋* 𝑌𝑋𝑌 ) )
23 7 22 pm2.61dane ( 𝑋 ∈ Fin → ( 𝑋* 𝑌𝑋𝑌 ) )
24 domwdom ( 𝑋𝑌𝑋* 𝑌 )
25 23 24 impbid1 ( 𝑋 ∈ Fin → ( 𝑋* 𝑌𝑋𝑌 ) )