Theorem ballotlemgval 31776

Description: Expand the value of ↑. (Contributed by Thierry Arnoux, 21-Apr-2017.)

Hypotheses

Ref	Expression
ballotth.m	⊢ 𝑀 ∈ ℕ
ballotth.n	⊢ 𝑁 ∈ ℕ
ballotth.o	⊢ 𝑂 = {𝑐 ∈ 𝒫 (1...(𝑀 + 𝑁)) ∣ (♯‘𝑐) = 𝑀}
ballotth.p	⊢ 𝑃 = (𝑥 ∈ 𝒫 𝑂 ↦ ((♯‘𝑥) / (♯‘𝑂)))
ballotth.f	⊢ 𝐹 = (𝑐 ∈ 𝑂 ↦ (𝑖 ∈ ℤ ↦ ((♯‘((1...𝑖) ∩ 𝑐)) − (♯‘((1...𝑖) ∖ 𝑐)))))
ballotth.e	⊢ 𝐸 = {𝑐 ∈ 𝑂 ∣ ∀𝑖 ∈ (1...(𝑀 + 𝑁))0 < ((𝐹‘𝑐)‘𝑖)}
ballotth.mgtn	⊢ 𝑁 < 𝑀
ballotth.i	⊢ 𝐼 = (𝑐 ∈ (𝑂 ∖ 𝐸) ↦ inf({𝑘 ∈ (1...(𝑀 + 𝑁)) ∣ ((𝐹‘𝑐)‘𝑘) = 0}, ℝ, < ))
ballotth.s	⊢ 𝑆 = (𝑐 ∈ (𝑂 ∖ 𝐸) ↦ (𝑖 ∈ (1...(𝑀 + 𝑁)) ↦ if(𝑖 ≤ (𝐼‘𝑐), (((𝐼‘𝑐) + 1) − 𝑖), 𝑖)))
ballotth.r	⊢ 𝑅 = (𝑐 ∈ (𝑂 ∖ 𝐸) ↦ ((𝑆‘𝑐) “ 𝑐))
ballotlemg	⊢ ↑ = (𝑢 ∈ Fin, 𝑣 ∈ Fin ↦ ((♯‘(𝑣 ∩ 𝑢)) − (♯‘(𝑣 ∖ 𝑢))))

Assertion

Ref	Expression
ballotlemgval	⊢ ((𝑈 ∈ Fin ∧ 𝑉 ∈ Fin) → (𝑈 ↑ 𝑉) = ((♯‘(𝑉 ∩ 𝑈)) − (♯‘(𝑉 ∖ 𝑈))))

Distinct variable groups:   𝑀,𝑐   𝑁,𝑐   𝑂,𝑐   𝑖,𝑀   𝑖,𝑁   𝑖,𝑂   𝑘,𝑀   𝑘,𝑁   𝑘,𝑂   𝑖,𝑐,𝐹,𝑘   𝑖,𝐸,𝑘   𝑘,𝐼,𝑐   𝐸,𝑐   𝑖,𝐼,𝑐   𝑆,𝑘,𝑖,𝑐   𝑅,𝑖   𝑣,𝑢,𝐼   𝑢,𝑅,𝑣   𝑢,𝑆,𝑣   𝑢,𝑈,𝑣   𝑢,𝑉,𝑣

Allowed substitution hints:   𝑃(𝑥,𝑣,𝑢,𝑖,𝑘,𝑐)   𝑅(𝑥,𝑘,𝑐)   𝑆(𝑥)   𝑈(𝑥,𝑖,𝑘,𝑐)   𝐸(𝑥,𝑣,𝑢)   ↑ (𝑥,𝑣,𝑢,𝑖,𝑘,𝑐)   𝐹(𝑥,𝑣,𝑢)   𝐼(𝑥)   𝑀(𝑥,𝑣,𝑢)   𝑁(𝑥,𝑣,𝑢)   𝑂(𝑥,𝑣,𝑢)   𝑉(𝑥,𝑖,𝑘,𝑐)

Proof of Theorem ballotlemgval

Step	Hyp	Ref	Expression
1		ineq2 4183	. . . 4 ⊢ (𝑢 = 𝑈 → (𝑣 ∩ 𝑢) = (𝑣 ∩ 𝑈))
2	1	fveq2d 6669	. . 3 ⊢ (𝑢 = 𝑈 → (♯‘(𝑣 ∩ 𝑢)) = (♯‘(𝑣 ∩ 𝑈)))
3		difeq2 4093	. . . 4 ⊢ (𝑢 = 𝑈 → (𝑣 ∖ 𝑢) = (𝑣 ∖ 𝑈))
4	3	fveq2d 6669	. . 3 ⊢ (𝑢 = 𝑈 → (♯‘(𝑣 ∖ 𝑢)) = (♯‘(𝑣 ∖ 𝑈)))
5	2, 4	oveq12d 7168	. 2 ⊢ (𝑢 = 𝑈 → ((♯‘(𝑣 ∩ 𝑢)) − (♯‘(𝑣 ∖ 𝑢))) = ((♯‘(𝑣 ∩ 𝑈)) − (♯‘(𝑣 ∖ 𝑈))))
6		ineq1 4181	. . . 4 ⊢ (𝑣 = 𝑉 → (𝑣 ∩ 𝑈) = (𝑉 ∩ 𝑈))
7	6	fveq2d 6669	. . 3 ⊢ (𝑣 = 𝑉 → (♯‘(𝑣 ∩ 𝑈)) = (♯‘(𝑉 ∩ 𝑈)))
8		difeq1 4092	. . . 4 ⊢ (𝑣 = 𝑉 → (𝑣 ∖ 𝑈) = (𝑉 ∖ 𝑈))
9	8	fveq2d 6669	. . 3 ⊢ (𝑣 = 𝑉 → (♯‘(𝑣 ∖ 𝑈)) = (♯‘(𝑉 ∖ 𝑈)))
10	7, 9	oveq12d 7168	. 2 ⊢ (𝑣 = 𝑉 → ((♯‘(𝑣 ∩ 𝑈)) − (♯‘(𝑣 ∖ 𝑈))) = ((♯‘(𝑉 ∩ 𝑈)) − (♯‘(𝑉 ∖ 𝑈))))
11		ballotlemg	. 2 ⊢ ↑ = (𝑢 ∈ Fin, 𝑣 ∈ Fin ↦ ((♯‘(𝑣 ∩ 𝑢)) − (♯‘(𝑣 ∖ 𝑢))))
12		ovex 7183	. 2 ⊢ ((♯‘(𝑉 ∩ 𝑈)) − (♯‘(𝑉 ∖ 𝑈))) ∈ V
13	5, 10, 11, 12	ovmpo 7304	1 ⊢ ((𝑈 ∈ Fin ∧ 𝑉 ∈ Fin) → (𝑈 ↑ 𝑉) = ((♯‘(𝑉 ∩ 𝑈)) − (♯‘(𝑉 ∖ 𝑈))))

Syntax hints:   → wi 4   ∧ wa 398   = wceq 1533   ∈ wcel 2110  ∀wral 3138  {crab 3142   ∖ cdif 3933   ∩ cin 3935  ifcif 4467  𝒫 cpw 4539   class class class wbr 5059   ↦ cmpt 5139   “ cima 5553  ‘cfv 6350  (class class class)co 7150   ∈ cmpo 7152  Fincfn 8503  infcinf 8899  ℝcr 10530  0cc0 10531  1c1 10532   + caddc 10534   < clt 10669   ≤ cle 10670   − cmin 10864   / cdiv 11291  ℕcn 11632  ℤcz 11975  ...cfz 12886  ♯chash 13684

This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1792  ax-4 1806  ax-5 1907  ax-6 1966  ax-7 2011  ax-8 2112  ax-9 2120  ax-10 2141  ax-11 2156  ax-12 2172  ax-ext 2793  ax-sep 5196  ax-nul 5203  ax-pr 5322

This theorem depends on definitions:  df-bi 209  df-an 399  df-or 844  df-3an 1085  df-tru 1536  df-ex 1777  df-nf 1781  df-sb 2066  df-mo 2618  df-eu 2650  df-clab 2800  df-cleq 2814  df-clel 2893  df-nfc 2963  df-ral 3143  df-rex 3144  df-rab 3147  df-v 3497  df-sbc 3773  df-dif 3939  df-un 3941  df-in 3943  df-ss 3952  df-nul 4292  df-if 4468  df-sn 4562  df-pr 4564  df-op 4568  df-uni 4833  df-br 5060  df-opab 5122  df-id 5455  df-xp 5556  df-rel 5557  df-cnv 5558  df-co 5559  df-dm 5560  df-iota 6309  df-fun 6352  df-fv 6358  df-ov 7153  df-oprab 7154  df-mpo 7155

This theorem is referenced by:  ballotlemgun  31777  ballotlemfg  31778  ballotlemfrc  31779