Theorem psrbagconcl 22092

Description: The complement of a bag is a bag. (Contributed by Mario Carneiro, 29-Dec-2014.) Remove a sethood antecedent. (Revised by SN, 6-Aug-2024.)

Hypotheses

Ref	Expression
psrbag.d	⊢ 𝐷 = {𝑓 ∈ (ℕ0 ↑m 𝐼) ∣ (◡𝑓 “ ℕ) ∈ Fin}
psrbagconf1o.s	⊢ 𝑆 = {𝑦 ∈ 𝐷 ∣ 𝑦 ∘r ≤ 𝐹}

Assertion

Ref	Expression
psrbagconcl	⊢ ((𝐹 ∈ 𝐷 ∧ 𝑋 ∈ 𝑆) → (𝐹 ∘f − 𝑋) ∈ 𝑆)

Distinct variable groups:   𝑓,𝐹   𝑓,𝐼   𝑦,𝐷   𝑦,𝐹   𝑓,𝑋   𝑦,𝑋

Allowed substitution hints:   𝐷(𝑓)   𝑆(𝑦, 𝑓)   𝐼(𝑦)

Proof of Theorem psrbagconcl

Step	Hyp	Ref	Expression
1		simpl 488	. . 3 ⊢ ((𝐹 ∈ 𝐷 ∧ 𝑋 ∈ 𝑆) → 𝐹 ∈ 𝐷)
2		breq1 5115	. . . . . . 7 ⊢ (𝑦 = 𝑋 → (𝑦 ∘r ≤ 𝐹 ↔ 𝑋 ∘r ≤ 𝐹))
3		psrbagconf1o.s	. . . . . . 7 ⊢ 𝑆 = {𝑦 ∈ 𝐷 ∣ 𝑦 ∘r ≤ 𝐹}
4	2, 3	elrab2 3657	. . . . . 6 ⊢ (𝑋 ∈ 𝑆 ↔ (𝑋 ∈ 𝐷 ∧ 𝑋 ∘r ≤ 𝐹))
5	4	bilani 510	. . . . 5 ⊢ ((𝐹 ∈ 𝐷 ∧ 𝑋 ∈ 𝑆) → (𝑋 ∈ 𝐷 ∧ 𝑋 ∘r ≤ 𝐹))
6	5	simpld 500	. . . 4 ⊢ ((𝐹 ∈ 𝐷 ∧ 𝑋 ∈ 𝑆) → 𝑋 ∈ 𝐷)
7		psrbag.d	. . . . 5 ⊢ 𝐷 = {𝑓 ∈ (ℕ0 ↑m 𝐼) ∣ (◡𝑓 “ ℕ) ∈ Fin}
8	7	psrbagf 22083	. . . 4 ⊢ (𝑋 ∈ 𝐷 → 𝑋:𝐼⟶ℕ0)
9	6, 8	syl 18	. . 3 ⊢ ((𝐹 ∈ 𝐷 ∧ 𝑋 ∈ 𝑆) → 𝑋:𝐼⟶ℕ0)
10	5	simprd 501	. . 3 ⊢ ((𝐹 ∈ 𝐷 ∧ 𝑋 ∈ 𝑆) → 𝑋 ∘r ≤ 𝐹)
11	7	psrbagcon 22090	. . 3 ⊢ ((𝐹 ∈ 𝐷 ∧ 𝑋:𝐼⟶ℕ0 ∧ 𝑋 ∘r ≤ 𝐹) → ((𝐹 ∘f − 𝑋) ∈ 𝐷 ∧ (𝐹 ∘f − 𝑋) ∘r ≤ 𝐹))
12	1, 9, 10, 11	syl3anc 1398	. 2 ⊢ ((𝐹 ∈ 𝐷 ∧ 𝑋 ∈ 𝑆) → ((𝐹 ∘f − 𝑋) ∈ 𝐷 ∧ (𝐹 ∘f − 𝑋) ∘r ≤ 𝐹))
13		breq1 5115	. . 3 ⊢ (𝑦 = (𝐹 ∘f − 𝑋) → (𝑦 ∘r ≤ 𝐹 ↔ (𝐹 ∘f − 𝑋) ∘r ≤ 𝐹))
14	13, 3	elrab2 3657	. 2 ⊢ ((𝐹 ∘f − 𝑋) ∈ 𝑆 ↔ ((𝐹 ∘f − 𝑋) ∈ 𝐷 ∧ (𝐹 ∘f − 𝑋) ∘r ≤ 𝐹))
15	12, 14	sylibr 237	1 ⊢ ((𝐹 ∈ 𝐷 ∧ 𝑋 ∈ 𝑆) → (𝐹 ∘f − 𝑋) ∈ 𝑆)

This proof depends on syntax axioms:   → wi 4   ∧ wa 401   = wceq 1570   ∈ wcel 2146  {crab 3419   class class class wbr 5112  ^◡ccnv 5663   “ cima 5667  ⟶wf 6536  (class class class)co 7416   ∘_f cof 7678   ∘_r cofr 7679   ↑_m cmap 8826  Fincfn 8945   ≤ cle 11254   − cmin 11451  ℕcn 12243  ℕ₀cn0 12514

This proof depends on axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1828  ax-4 1842  ax-5 1943  ax-6 2000  ax-7 2041  ax-8 2148  ax-9 2156  ax-10 2179  ax-11 2195  ax-12 2216  ax-ext 2738  ax-rep 5241  ax-sep 5260  ax-nul 5272  ax-pow 5339  ax-pr 5407  ax-un 7738  ax-cnex 11166  ax-resscn 11167  ax-1cn 11168  ax-icn 11169  ax-addcl 11170  ax-addrcl 11171  ax-mulcl 11172  ax-mulrcl 11173  ax-mulcom 11174  ax-addass 11175  ax-mulass 11176  ax-distr 11177  ax-i2m1 11178  ax-1ne0 11179  ax-1rid 11180  ax-rnegex 11181  ax-rrecex 11182  ax-cnre 11183  ax-pre-lttri 11184  ax-pre-lttrn 11185  ax-pre-ltadd 11186  ax-pre-mulgt0 11187

This proof depends on definitions:  df-bi 210  df-an 402  df-or 862  df-3or 1104  df-3an 1105  df-tru 1573  df-fal 1583  df-ex 1813  df-nf 1817  df-sb 2100  df-mo 2570  df-eu 2600  df-clab 2745  df-cleq 2758  df-clel 2841  df-nfc 2915  df-ne 2962  df-nel 3068  df-ral 3083  df-rex 3093  df-reu 3373  df-rab 3420  df-v 3460  df-sbc 3748  df-csb 3857  df-dif 3911  df-un 3913  df-in 3915  df-ss 3925  df-pss 3928  df-nul 4290  df-if 4491  df-pw 4567  df-sn 4593  df-pr 4595  df-op 4599  df-uni 4876  df-iun 4961  df-br 5113  df-opab 5177  df-mpt 5196  df-tr 5222  df-id 5559  df-eprel 5564  df-po 5572  df-so 5573  df-fr 5617  df-we 5619  df-xp 5670  df-rel 5671  df-cnv 5672  df-co 5673  df-dm 5674  df-rn 5675  df-res 5676  df-ima 5677  df-pred 6306  df-ord 6367  df-on 6368  df-lim 6369  df-suc 6370  df-iota 6496  df-fun 6542  df-fn 6543  df-f 6544  df-f1 6545  df-fo 6546  df-f1o 6547  df-fv 6548  df-riota 7373  df-ov 7419  df-oprab 7420  df-mpo 7421  df-of 7680  df-ofr 7681  df-om 7865  df-1st 7988  df-2nd 7989  df-supp 8159  df-frecs 8280  df-wrecs 8311  df-recs 8360  df-rdg 8399  df-1o 8455  df-er 8696  df-map 8828  df-en 8946  df-dom 8947  df-sdom 8948  df-fin 8949  df-pnf 11255  df-mnf 11256  df-xr 11257  df-ltxr 11258  df-le 11259  df-sub 11453  df-neg 11454  df-nn 12244  df-n0 12515

This theorem is used by:  psrbagconf1o  22094  psrass1lem  22098  psrdi  22129  psrdir  22130  psrass23l  22131  psrcom  22132  psrass23  22133  resspsrmul  22140  mplsubrglem  22168  mplmonmul  22202  rhmcomulmpl  22290  mhpmulcl  22327  psdmul  22344  psropprmul  22412  mdegmullem  26250  psrmonmul  33953  rhmcomulpsr  43346