Theorem frd 5656

Description: A nonempty subset of an 𝑅-well-founded class has an 𝑅-minimal element (deduction form). (Contributed by BJ, 16-Nov-2024.)

Hypotheses

Ref	Expression
frd.fr	⊢ (𝜑 → 𝑅 Fr 𝐴)
frd.ss	⊢ (𝜑 → 𝐵 ⊆ 𝐴)
frd.ex	⊢ (𝜑 → 𝐵 ∈ 𝑉)
frd.n0	⊢ (𝜑 → 𝐵 ≠ ∅)

Assertion

Ref	Expression
frd	⊢ (𝜑 → ∃𝑥 ∈ 𝐵 ∀𝑦 ∈ 𝐵 ¬ 𝑦𝑅𝑥)

Distinct variable groups:   𝜑,𝑥,𝑦   𝑥,𝐴,𝑦   𝑥,𝐵,𝑦   𝑥,𝑅,𝑦

Allowed substitution hints:   𝑉(𝑥,𝑦)

Proof of Theorem frd

Dummy variable 𝑧 is distinct from all other variables.

Step	Hyp	Ref	Expression
1		simpr 484	. . 3 ⊢ ((𝜑 ∧ 𝑧 = 𝐵) → 𝑧 = 𝐵)
2		biidd 262	. . . 4 ⊢ ((𝜑 ∧ 𝑧 = 𝐵) → (¬ 𝑦𝑅𝑥 ↔ ¬ 𝑦𝑅𝑥))
3	1, 2	raleqbidv 3354	. . 3 ⊢ ((𝜑 ∧ 𝑧 = 𝐵) → (∀𝑦 ∈ 𝑧 ¬ 𝑦𝑅𝑥 ↔ ∀𝑦 ∈ 𝐵 ¬ 𝑦𝑅𝑥))
4	1, 3	rexeqbidv 3355	. 2 ⊢ ((𝜑 ∧ 𝑧 = 𝐵) → (∃𝑥 ∈ 𝑧 ∀𝑦 ∈ 𝑧 ¬ 𝑦𝑅𝑥 ↔ ∃𝑥 ∈ 𝐵 ∀𝑦 ∈ 𝐵 ¬ 𝑦𝑅𝑥))
5		frd.ex	. . . 4 ⊢ (𝜑 → 𝐵 ∈ 𝑉)
6		frd.ss	. . . 4 ⊢ (𝜑 → 𝐵 ⊆ 𝐴)
7	5, 6	elpwd 4628	. . 3 ⊢ (𝜑 → 𝐵 ∈ 𝒫 𝐴)
8		frd.n0	. . . 4 ⊢ (𝜑 → 𝐵 ≠ ∅)
9		nelsn 4688	. . . 4 ⊢ (𝐵 ≠ ∅ → ¬ 𝐵 ∈ {∅})
10	8, 9	syl 17	. . 3 ⊢ (𝜑 → ¬ 𝐵 ∈ {∅})
11	7, 10	eldifd 3987	. 2 ⊢ (𝜑 → 𝐵 ∈ (𝒫 𝐴 ∖ {∅}))
12		frd.fr	. . 3 ⊢ (𝜑 → 𝑅 Fr 𝐴)
13		dffr6 5655	. . 3 ⊢ (𝑅 Fr 𝐴 ↔ ∀𝑧 ∈ (𝒫 𝐴 ∖ {∅})∃𝑥 ∈ 𝑧 ∀𝑦 ∈ 𝑧 ¬ 𝑦𝑅𝑥)
14	12, 13	sylib 218	. 2 ⊢ (𝜑 → ∀𝑧 ∈ (𝒫 𝐴 ∖ {∅})∃𝑥 ∈ 𝑧 ∀𝑦 ∈ 𝑧 ¬ 𝑦𝑅𝑥)
15	4, 11, 14	rspcdv2 3630	1 ⊢ (𝜑 → ∃𝑥 ∈ 𝐵 ∀𝑦 ∈ 𝐵 ¬ 𝑦𝑅𝑥)

Syntax hints:  ¬ wn 3   → wi 4   ∧ wa 395   = wceq 1537   ∈ wcel 2108   ≠ wne 2946  ∀wral 3067  ∃wrex 3076   ∖ cdif 3973   ⊆ wss 3976  ∅c0 4352  𝒫 cpw 4622  {csn 4648   class class class wbr 5166   Fr wfr 5649

This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1793  ax-4 1807  ax-5 1909  ax-6 1967  ax-7 2007  ax-8 2110  ax-9 2118  ax-ext 2711

This theorem depends on definitions:  df-bi 207  df-an 396  df-tru 1540  df-ex 1778  df-sb 2065  df-clab 2718  df-cleq 2732  df-clel 2819  df-ne 2947  df-ral 3068  df-rex 3077  df-v 3490  df-dif 3979  df-ss 3993  df-pw 4624  df-sn 4649  df-fr 5652

This theorem is referenced by:  fri  5657  frxp3  8192  weiunfr  36433