Theorem frd 5573

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 3312	. . 3 ⊢ ((𝜑 ∧ 𝑧 = 𝐵) → (∀𝑦 ∈ 𝑧 ¬ 𝑦𝑅𝑥 ↔ ∀𝑦 ∈ 𝐵 ¬ 𝑦𝑅𝑥))
4	1, 3	rexeqbidv 3313	. 2 ⊢ ((𝜑 ∧ 𝑧 = 𝐵) → (∃𝑥 ∈ 𝑧 ∀𝑦 ∈ 𝑧 ¬ 𝑦𝑅𝑥 ↔ ∃𝑥 ∈ 𝐵 ∀𝑦 ∈ 𝐵 ¬ 𝑦𝑅𝑥))
5		frd.ex	. . . 4 ⊢ (𝜑 → 𝐵 ∈ 𝑉)
6		frd.ss	. . . 4 ⊢ (𝜑 → 𝐵 ⊆ 𝐴)
7	5, 6	elpwd 4556	. . 3 ⊢ (𝜑 → 𝐵 ∈ 𝒫 𝐴)
8		frd.n0	. . . 4 ⊢ (𝜑 → 𝐵 ≠ ∅)
9		nelsn 4619	. . . 4 ⊢ (𝐵 ≠ ∅ → ¬ 𝐵 ∈ {∅})
10	8, 9	syl 17	. . 3 ⊢ (𝜑 → ¬ 𝐵 ∈ {∅})
11	7, 10	eldifd 3913	. 2 ⊢ (𝜑 → 𝐵 ∈ (𝒫 𝐴 ∖ {∅}))
12		frd.fr	. . 3 ⊢ (𝜑 → 𝑅 Fr 𝐴)
13		dffr6 5572	. . 3 ⊢ (𝑅 Fr 𝐴 ↔ ∀𝑧 ∈ (𝒫 𝐴 ∖ {∅})∃𝑥 ∈ 𝑧 ∀𝑦 ∈ 𝑧 ¬ 𝑦𝑅𝑥)
14	12, 13	sylib 218	. 2 ⊢ (𝜑 → ∀𝑧 ∈ (𝒫 𝐴 ∖ {∅})∃𝑥 ∈ 𝑧 ∀𝑦 ∈ 𝑧 ¬ 𝑦𝑅𝑥)
15	4, 11, 14	rspcdv2 3572	1 ⊢ (𝜑 → ∃𝑥 ∈ 𝐵 ∀𝑦 ∈ 𝐵 ¬ 𝑦𝑅𝑥)

Syntax hints:  ¬ wn 3   → wi 4   ∧ wa 395   = wceq 1541   ∈ wcel 2111   ≠ wne 2928  ∀wral 3047  ∃wrex 3056   ∖ cdif 3899   ⊆ wss 3902  ∅c0 4283  𝒫 cpw 4550  {csn 4576   class class class wbr 5091   Fr wfr 5566

This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1796  ax-4 1810  ax-5 1911  ax-6 1968  ax-7 2009  ax-8 2113  ax-9 2121  ax-ext 2703

This theorem depends on definitions:  df-bi 207  df-an 396  df-tru 1544  df-ex 1781  df-sb 2068  df-clab 2710  df-cleq 2723  df-clel 2806  df-ne 2929  df-ral 3048  df-rex 3057  df-v 3438  df-dif 3905  df-ss 3919  df-pw 4552  df-sn 4577  df-fr 5569

This theorem is referenced by:  fri  5574  frxp3  8081  weiunfr  36507