Theorem rightval 27798

Description: The value of the right options function. (Contributed by Scott Fenton, 9-Oct-2024.)

Assertion

Ref	Expression
rightval	⊢ ( R ‘𝐴) = {𝑥 ∈ ( O ‘( bday ‘𝐴)) ∣ 𝐴 <s 𝑥}

Distinct variable group:   𝑥,𝐴

Proof of Theorem rightval

Dummy variable 𝑦 is distinct from all other variables.

Step	Hyp	Ref	Expression
1		2fveq3 6822	. . . 4 ⊢ (𝑦 = 𝐴 → ( O ‘( bday ‘𝑦)) = ( O ‘( bday ‘𝐴)))
2		breq1 5092	. . . 4 ⊢ (𝑦 = 𝐴 → (𝑦 <s 𝑥 ↔ 𝐴 <s 𝑥))
3	1, 2	rabeqbidv 3411	. . 3 ⊢ (𝑦 = 𝐴 → {𝑥 ∈ ( O ‘( bday ‘𝑦)) ∣ 𝑦 <s 𝑥} = {𝑥 ∈ ( O ‘( bday ‘𝐴)) ∣ 𝐴 <s 𝑥})
4		df-right 27785	. . 3 ⊢ R = (𝑦 ∈ No ↦ {𝑥 ∈ ( O ‘( bday ‘𝑦)) ∣ 𝑦 <s 𝑥})
5		fvex 6830	. . . 4 ⊢ ( O ‘( bday ‘𝐴)) ∈ V
6	5	rabex 5275	. . 3 ⊢ {𝑥 ∈ ( O ‘( bday ‘𝐴)) ∣ 𝐴 <s 𝑥} ∈ V
7	3, 4, 6	fvmpt 6924	. 2 ⊢ (𝐴 ∈ No → ( R ‘𝐴) = {𝑥 ∈ ( O ‘( bday ‘𝐴)) ∣ 𝐴 <s 𝑥})
8	4	fvmptndm 6955	. . 3 ⊢ (¬ 𝐴 ∈ No → ( R ‘𝐴) = ∅)
9		bdaydm 27706	. . . . . . . . 9 ⊢ dom bday = No
10	9	eleq2i 2821	. . . . . . . 8 ⊢ (𝐴 ∈ dom bday ↔ 𝐴 ∈ No )
11		ndmfv 6849	. . . . . . . 8 ⊢ (¬ 𝐴 ∈ dom bday → ( bday ‘𝐴) = ∅)
12	10, 11	sylnbir 331	. . . . . . 7 ⊢ (¬ 𝐴 ∈ No → ( bday ‘𝐴) = ∅)
13	12	fveq2d 6821	. . . . . 6 ⊢ (¬ 𝐴 ∈ No → ( O ‘( bday ‘𝐴)) = ( O ‘∅))
14		old0 27793	. . . . . 6 ⊢ ( O ‘∅) = ∅
15	13, 14	eqtrdi 2781	. . . . 5 ⊢ (¬ 𝐴 ∈ No → ( O ‘( bday ‘𝐴)) = ∅)
16	15	rabeqdv 3408	. . . 4 ⊢ (¬ 𝐴 ∈ No → {𝑥 ∈ ( O ‘( bday ‘𝐴)) ∣ 𝐴 <s 𝑥} = {𝑥 ∈ ∅ ∣ 𝐴 <s 𝑥})
17		rab0 4334	. . . 4 ⊢ {𝑥 ∈ ∅ ∣ 𝐴 <s 𝑥} = ∅
18	16, 17	eqtrdi 2781	. . 3 ⊢ (¬ 𝐴 ∈ No → {𝑥 ∈ ( O ‘( bday ‘𝐴)) ∣ 𝐴 <s 𝑥} = ∅)
19	8, 18	eqtr4d 2768	. 2 ⊢ (¬ 𝐴 ∈ No → ( R ‘𝐴) = {𝑥 ∈ ( O ‘( bday ‘𝐴)) ∣ 𝐴 <s 𝑥})
20	7, 19	pm2.61i 182	1 ⊢ ( R ‘𝐴) = {𝑥 ∈ ( O ‘( bday ‘𝐴)) ∣ 𝐴 <s 𝑥}

Syntax hints:  ¬ wn 3   = wceq 1541   ∈ wcel 2110  {crab 3393  ∅c0 4281   class class class wbr 5089  dom cdm 5614  ‘cfv 6477   No csur 27571   <s cslt 27572   bday cbday 27573   O cold 27777   R cright 27780

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 2112  ax-9 2120  ax-10 2143  ax-11 2159  ax-12 2179  ax-ext 2702  ax-rep 5215  ax-sep 5232  ax-nul 5242  ax-pow 5301  ax-pr 5368  ax-un 7663

This theorem depends on definitions:  df-bi 207  df-an 396  df-or 848  df-3or 1087  df-3an 1088  df-tru 1544  df-fal 1554  df-ex 1781  df-nf 1785  df-sb 2067  df-mo 2534  df-eu 2563  df-clab 2709  df-cleq 2722  df-clel 2804  df-nfc 2879  df-ne 2927  df-ral 3046  df-rex 3055  df-reu 3345  df-rab 3394  df-v 3436  df-sbc 3740  df-csb 3849  df-dif 3903  df-un 3905  df-in 3907  df-ss 3917  df-pss 3920  df-nul 4282  df-if 4474  df-pw 4550  df-sn 4575  df-pr 4577  df-op 4581  df-uni 4858  df-iun 4941  df-br 5090  df-opab 5152  df-mpt 5171  df-tr 5197  df-id 5509  df-eprel 5514  df-po 5522  df-so 5523  df-fr 5567  df-we 5569  df-xp 5620  df-rel 5621  df-cnv 5622  df-co 5623  df-dm 5624  df-rn 5625  df-res 5626  df-ima 5627  df-pred 6244  df-ord 6305  df-on 6306  df-suc 6308  df-iota 6433  df-fun 6479  df-fn 6480  df-f 6481  df-f1 6482  df-fo 6483  df-f1o 6484  df-fv 6485  df-ov 7344  df-2nd 7917  df-frecs 8206  df-wrecs 8237  df-recs 8286  df-1o 8380  df-no 27574  df-bday 27576  df-made 27781  df-old 27782  df-right 27785

This theorem is referenced by:  elright  27800  ssltright  27809  rightssold  27818  right1s  27834  lrold  27835  madebdaylemlrcut  27837  cofcutr  27861  cofcutrtime  27864  addsproplem2  27906