ILE Home Intuitionistic Logic Explorer < Previous   Next >
Nearby theorems
Mirrors  >  Home  >  ILE Home  >  Th. List  >  hashf1 GIF version

Theorem hashf1 11265
Description: The permutation number 𝐴 ∣ ! · ( ∣ 𝐵 ∣ C ∣ 𝐴 ∣ ) = 𝐵 ∣ ! / ( ∣ 𝐵 ∣ − ∣ 𝐴 ∣ )! counts the number of injections from 𝐴 to 𝐵. (Contributed by Mario Carneiro, 21-Jan-2015.)
Assertion
Ref Expression
hashf1 ((𝐴 ∈ Fin ∧ 𝐵 ∈ Fin) → (♯‘{𝑓𝑓:𝐴1-1𝐵}) = ((!‘(♯‘𝐴)) · ((♯‘𝐵)C(♯‘𝐴))))
Distinct variable groups:   𝐴,𝑓   𝐵,𝑓

Proof of Theorem hashf1
Dummy variables 𝑥 𝑦 𝑧 𝑤 are mutually distinct and distinct from all other variables.
StepHypRef Expression
1 f1eq2 5589 . . . . . . . . 9 (𝑥 = ∅ → (𝑓:𝑥1-1𝐵𝑓:∅–1-1𝐵))
2 f1fn 5595 . . . . . . . . . . . 12 (𝑓:∅–1-1𝐵𝑓 Fn ∅)
3 fn0 5498 . . . . . . . . . . . 12 (𝑓 Fn ∅ ↔ 𝑓 = ∅)
42, 3sylib 122 . . . . . . . . . . 11 (𝑓:∅–1-1𝐵𝑓 = ∅)
5 f10 5669 . . . . . . . . . . . 12 ∅:∅–1-1𝐵
6 f1eq1 5588 . . . . . . . . . . . 12 (𝑓 = ∅ → (𝑓:∅–1-1𝐵 ↔ ∅:∅–1-1𝐵))
75, 6mpbiri 168 . . . . . . . . . . 11 (𝑓 = ∅ → 𝑓:∅–1-1𝐵)
84, 7impbii 126 . . . . . . . . . 10 (𝑓:∅–1-1𝐵𝑓 = ∅)
9 velsn 3722 . . . . . . . . . 10 (𝑓 ∈ {∅} ↔ 𝑓 = ∅)
108, 9bitr4i 187 . . . . . . . . 9 (𝑓:∅–1-1𝐵𝑓 ∈ {∅})
111, 10bitrdi 196 . . . . . . . 8 (𝑥 = ∅ → (𝑓:𝑥1-1𝐵𝑓 ∈ {∅}))
1211eqabcdv 2370 . . . . . . 7 (𝑥 = ∅ → {𝑓𝑓:𝑥1-1𝐵} = {∅})
1312fveq2d 5694 . . . . . 6 (𝑥 = ∅ → (♯‘{𝑓𝑓:𝑥1-1𝐵}) = (♯‘{∅}))
14 0ex 4255 . . . . . . 7 ∅ ∈ V
15 hashsng 11215 . . . . . . 7 (∅ ∈ V → (♯‘{∅}) = 1)
1614, 15ax-mp 5 . . . . . 6 (♯‘{∅}) = 1
1713, 16eqtrdi 2287 . . . . 5 (𝑥 = ∅ → (♯‘{𝑓𝑓:𝑥1-1𝐵}) = 1)
18 fveq2 5690 . . . . . . . . 9 (𝑥 = ∅ → (♯‘𝑥) = (♯‘∅))
19 hash0 11213 . . . . . . . . 9 (♯‘∅) = 0
2018, 19eqtrdi 2287 . . . . . . . 8 (𝑥 = ∅ → (♯‘𝑥) = 0)
2120fveq2d 5694 . . . . . . 7 (𝑥 = ∅ → (!‘(♯‘𝑥)) = (!‘0))
22 fac0 11144 . . . . . . 7 (!‘0) = 1
2321, 22eqtrdi 2287 . . . . . 6 (𝑥 = ∅ → (!‘(♯‘𝑥)) = 1)
2420oveq2d 6091 . . . . . 6 (𝑥 = ∅ → ((♯‘𝐵)C(♯‘𝑥)) = ((♯‘𝐵)C0))
2523, 24oveq12d 6093 . . . . 5 (𝑥 = ∅ → ((!‘(♯‘𝑥)) · ((♯‘𝐵)C(♯‘𝑥))) = (1 · ((♯‘𝐵)C0)))
2617, 25eqeq12d 2253 . . . 4 (𝑥 = ∅ → ((♯‘{𝑓𝑓:𝑥1-1𝐵}) = ((!‘(♯‘𝑥)) · ((♯‘𝐵)C(♯‘𝑥))) ↔ 1 = (1 · ((♯‘𝐵)C0))))
2726imbi2d 230 . . 3 (𝑥 = ∅ → ((𝐵 ∈ Fin → (♯‘{𝑓𝑓:𝑥1-1𝐵}) = ((!‘(♯‘𝑥)) · ((♯‘𝐵)C(♯‘𝑥)))) ↔ (𝐵 ∈ Fin → 1 = (1 · ((♯‘𝐵)C0)))))
28 f1eq2 5589 . . . . . . 7 (𝑥 = 𝑦 → (𝑓:𝑥1-1𝐵𝑓:𝑦1-1𝐵))
2928abbidv 2358 . . . . . 6 (𝑥 = 𝑦 → {𝑓𝑓:𝑥1-1𝐵} = {𝑓𝑓:𝑦1-1𝐵})
3029fveq2d 5694 . . . . 5 (𝑥 = 𝑦 → (♯‘{𝑓𝑓:𝑥1-1𝐵}) = (♯‘{𝑓𝑓:𝑦1-1𝐵}))
31 2fveq3 5695 . . . . . 6 (𝑥 = 𝑦 → (!‘(♯‘𝑥)) = (!‘(♯‘𝑦)))
32 fveq2 5690 . . . . . . 7 (𝑥 = 𝑦 → (♯‘𝑥) = (♯‘𝑦))
3332oveq2d 6091 . . . . . 6 (𝑥 = 𝑦 → ((♯‘𝐵)C(♯‘𝑥)) = ((♯‘𝐵)C(♯‘𝑦)))
3431, 33oveq12d 6093 . . . . 5 (𝑥 = 𝑦 → ((!‘(♯‘𝑥)) · ((♯‘𝐵)C(♯‘𝑥))) = ((!‘(♯‘𝑦)) · ((♯‘𝐵)C(♯‘𝑦))))
3530, 34eqeq12d 2253 . . . 4 (𝑥 = 𝑦 → ((♯‘{𝑓𝑓:𝑥1-1𝐵}) = ((!‘(♯‘𝑥)) · ((♯‘𝐵)C(♯‘𝑥))) ↔ (♯‘{𝑓𝑓:𝑦1-1𝐵}) = ((!‘(♯‘𝑦)) · ((♯‘𝐵)C(♯‘𝑦)))))
3635imbi2d 230 . . 3 (𝑥 = 𝑦 → ((𝐵 ∈ Fin → (♯‘{𝑓𝑓:𝑥1-1𝐵}) = ((!‘(♯‘𝑥)) · ((♯‘𝐵)C(♯‘𝑥)))) ↔ (𝐵 ∈ Fin → (♯‘{𝑓𝑓:𝑦1-1𝐵}) = ((!‘(♯‘𝑦)) · ((♯‘𝐵)C(♯‘𝑦))))))
37 f1eq2 5589 . . . . . . 7 (𝑥 = (𝑦 ∪ {𝑧}) → (𝑓:𝑥1-1𝐵𝑓:(𝑦 ∪ {𝑧})–1-1𝐵))
3837abbidv 2358 . . . . . 6 (𝑥 = (𝑦 ∪ {𝑧}) → {𝑓𝑓:𝑥1-1𝐵} = {𝑓𝑓:(𝑦 ∪ {𝑧})–1-1𝐵})
3938fveq2d 5694 . . . . 5 (𝑥 = (𝑦 ∪ {𝑧}) → (♯‘{𝑓𝑓:𝑥1-1𝐵}) = (♯‘{𝑓𝑓:(𝑦 ∪ {𝑧})–1-1𝐵}))
40 2fveq3 5695 . . . . . 6 (𝑥 = (𝑦 ∪ {𝑧}) → (!‘(♯‘𝑥)) = (!‘(♯‘(𝑦 ∪ {𝑧}))))
41 fveq2 5690 . . . . . . 7 (𝑥 = (𝑦 ∪ {𝑧}) → (♯‘𝑥) = (♯‘(𝑦 ∪ {𝑧})))
4241oveq2d 6091 . . . . . 6 (𝑥 = (𝑦 ∪ {𝑧}) → ((♯‘𝐵)C(♯‘𝑥)) = ((♯‘𝐵)C(♯‘(𝑦 ∪ {𝑧}))))
4340, 42oveq12d 6093 . . . . 5 (𝑥 = (𝑦 ∪ {𝑧}) → ((!‘(♯‘𝑥)) · ((♯‘𝐵)C(♯‘𝑥))) = ((!‘(♯‘(𝑦 ∪ {𝑧}))) · ((♯‘𝐵)C(♯‘(𝑦 ∪ {𝑧})))))
4439, 43eqeq12d 2253 . . . 4 (𝑥 = (𝑦 ∪ {𝑧}) → ((♯‘{𝑓𝑓:𝑥1-1𝐵}) = ((!‘(♯‘𝑥)) · ((♯‘𝐵)C(♯‘𝑥))) ↔ (♯‘{𝑓𝑓:(𝑦 ∪ {𝑧})–1-1𝐵}) = ((!‘(♯‘(𝑦 ∪ {𝑧}))) · ((♯‘𝐵)C(♯‘(𝑦 ∪ {𝑧}))))))
4544imbi2d 230 . . 3 (𝑥 = (𝑦 ∪ {𝑧}) → ((𝐵 ∈ Fin → (♯‘{𝑓𝑓:𝑥1-1𝐵}) = ((!‘(♯‘𝑥)) · ((♯‘𝐵)C(♯‘𝑥)))) ↔ (𝐵 ∈ Fin → (♯‘{𝑓𝑓:(𝑦 ∪ {𝑧})–1-1𝐵}) = ((!‘(♯‘(𝑦 ∪ {𝑧}))) · ((♯‘𝐵)C(♯‘(𝑦 ∪ {𝑧})))))))
46 f1eq2 5589 . . . . . . 7 (𝑥 = 𝐴 → (𝑓:𝑥1-1𝐵𝑓:𝐴1-1𝐵))
4746abbidv 2358 . . . . . 6 (𝑥 = 𝐴 → {𝑓𝑓:𝑥1-1𝐵} = {𝑓𝑓:𝐴1-1𝐵})
4847fveq2d 5694 . . . . 5 (𝑥 = 𝐴 → (♯‘{𝑓𝑓:𝑥1-1𝐵}) = (♯‘{𝑓𝑓:𝐴1-1𝐵}))
49 2fveq3 5695 . . . . . 6 (𝑥 = 𝐴 → (!‘(♯‘𝑥)) = (!‘(♯‘𝐴)))
50 fveq2 5690 . . . . . . 7 (𝑥 = 𝐴 → (♯‘𝑥) = (♯‘𝐴))
5150oveq2d 6091 . . . . . 6 (𝑥 = 𝐴 → ((♯‘𝐵)C(♯‘𝑥)) = ((♯‘𝐵)C(♯‘𝐴)))
5249, 51oveq12d 6093 . . . . 5 (𝑥 = 𝐴 → ((!‘(♯‘𝑥)) · ((♯‘𝐵)C(♯‘𝑥))) = ((!‘(♯‘𝐴)) · ((♯‘𝐵)C(♯‘𝐴))))
5348, 52eqeq12d 2253 . . . 4 (𝑥 = 𝐴 → ((♯‘{𝑓𝑓:𝑥1-1𝐵}) = ((!‘(♯‘𝑥)) · ((♯‘𝐵)C(♯‘𝑥))) ↔ (♯‘{𝑓𝑓:𝐴1-1𝐵}) = ((!‘(♯‘𝐴)) · ((♯‘𝐵)C(♯‘𝐴)))))
5453imbi2d 230 . . 3 (𝑥 = 𝐴 → ((𝐵 ∈ Fin → (♯‘{𝑓𝑓:𝑥1-1𝐵}) = ((!‘(♯‘𝑥)) · ((♯‘𝐵)C(♯‘𝑥)))) ↔ (𝐵 ∈ Fin → (♯‘{𝑓𝑓:𝐴1-1𝐵}) = ((!‘(♯‘𝐴)) · ((♯‘𝐵)C(♯‘𝐴))))))
55 hashcl 11198 . . . . . 6 (𝐵 ∈ Fin → (♯‘𝐵) ∈ ℕ0)
56 bcn0 11171 . . . . . 6 ((♯‘𝐵) ∈ ℕ0 → ((♯‘𝐵)C0) = 1)
5755, 56syl 14 . . . . 5 (𝐵 ∈ Fin → ((♯‘𝐵)C0) = 1)
5857oveq2d 6091 . . . 4 (𝐵 ∈ Fin → (1 · ((♯‘𝐵)C0)) = (1 · 1))
59 1t1e1 9436 . . . 4 (1 · 1) = 1
6058, 59eqtr2di 2288 . . 3 (𝐵 ∈ Fin → 1 = (1 · ((♯‘𝐵)C0)))
61 oveq2 6083 . . . . . . 7 ((♯‘{𝑓𝑓:𝑦1-1𝐵}) = ((!‘(♯‘𝑦)) · ((♯‘𝐵)C(♯‘𝑦))) → (((♯‘𝐵) − (♯‘𝑦)) · (♯‘{𝑓𝑓:𝑦1-1𝐵})) = (((♯‘𝐵) − (♯‘𝑦)) · ((!‘(♯‘𝑦)) · ((♯‘𝐵)C(♯‘𝑦)))))
62 simprl 535 . . . . . . . . . 10 ((𝐵 ∈ Fin ∧ (𝑦 ∈ Fin ∧ ¬ 𝑧𝑦)) → 𝑦 ∈ Fin)
6362adantr 276 . . . . . . . . 9 (((𝐵 ∈ Fin ∧ (𝑦 ∈ Fin ∧ ¬ 𝑧𝑦)) ∧ ((♯‘𝑦) + 1) ≤ (♯‘𝐵)) → 𝑦 ∈ Fin)
64 simpl 109 . . . . . . . . . 10 ((𝐵 ∈ Fin ∧ (𝑦 ∈ Fin ∧ ¬ 𝑧𝑦)) → 𝐵 ∈ Fin)
6564adantr 276 . . . . . . . . 9 (((𝐵 ∈ Fin ∧ (𝑦 ∈ Fin ∧ ¬ 𝑧𝑦)) ∧ ((♯‘𝑦) + 1) ≤ (♯‘𝐵)) → 𝐵 ∈ Fin)
66 simplrr 542 . . . . . . . . 9 (((𝐵 ∈ Fin ∧ (𝑦 ∈ Fin ∧ ¬ 𝑧𝑦)) ∧ ((♯‘𝑦) + 1) ≤ (♯‘𝐵)) → ¬ 𝑧𝑦)
67 simpr 110 . . . . . . . . 9 (((𝐵 ∈ Fin ∧ (𝑦 ∈ Fin ∧ ¬ 𝑧𝑦)) ∧ ((♯‘𝑦) + 1) ≤ (♯‘𝐵)) → ((♯‘𝑦) + 1) ≤ (♯‘𝐵))
6863, 65, 66, 67hashf1lem2 11264 . . . . . . . 8 (((𝐵 ∈ Fin ∧ (𝑦 ∈ Fin ∧ ¬ 𝑧𝑦)) ∧ ((♯‘𝑦) + 1) ≤ (♯‘𝐵)) → (♯‘{𝑓𝑓:(𝑦 ∪ {𝑧})–1-1𝐵}) = (((♯‘𝐵) − (♯‘𝑦)) · (♯‘{𝑓𝑓:𝑦1-1𝐵})))
6955adantr 276 . . . . . . . . . . . . . . 15 ((𝐵 ∈ Fin ∧ (𝑦 ∈ Fin ∧ ¬ 𝑧𝑦)) → (♯‘𝐵) ∈ ℕ0)
7069adantr 276 . . . . . . . . . . . . . 14 (((𝐵 ∈ Fin ∧ (𝑦 ∈ Fin ∧ ¬ 𝑧𝑦)) ∧ ((♯‘𝑦) + 1) ≤ (♯‘𝐵)) → (♯‘𝐵) ∈ ℕ0)
7170faccld 11152 . . . . . . . . . . . . 13 (((𝐵 ∈ Fin ∧ (𝑦 ∈ Fin ∧ ¬ 𝑧𝑦)) ∧ ((♯‘𝑦) + 1) ≤ (♯‘𝐵)) → (!‘(♯‘𝐵)) ∈ ℕ)
7271nncnd 9297 . . . . . . . . . . . 12 (((𝐵 ∈ Fin ∧ (𝑦 ∈ Fin ∧ ¬ 𝑧𝑦)) ∧ ((♯‘𝑦) + 1) ≤ (♯‘𝐵)) → (!‘(♯‘𝐵)) ∈ ℂ)
73 hashcl 11198 . . . . . . . . . . . . . . . . . 18 (𝑦 ∈ Fin → (♯‘𝑦) ∈ ℕ0)
7473ad2antrl 494 . . . . . . . . . . . . . . . . 17 ((𝐵 ∈ Fin ∧ (𝑦 ∈ Fin ∧ ¬ 𝑧𝑦)) → (♯‘𝑦) ∈ ℕ0)
7574adantr 276 . . . . . . . . . . . . . . . 16 (((𝐵 ∈ Fin ∧ (𝑦 ∈ Fin ∧ ¬ 𝑧𝑦)) ∧ ((♯‘𝑦) + 1) ≤ (♯‘𝐵)) → (♯‘𝑦) ∈ ℕ0)
76 peano2nn0 9582 . . . . . . . . . . . . . . . 16 ((♯‘𝑦) ∈ ℕ0 → ((♯‘𝑦) + 1) ∈ ℕ0)
7775, 76syl 14 . . . . . . . . . . . . . . 15 (((𝐵 ∈ Fin ∧ (𝑦 ∈ Fin ∧ ¬ 𝑧𝑦)) ∧ ((♯‘𝑦) + 1) ≤ (♯‘𝐵)) → ((♯‘𝑦) + 1) ∈ ℕ0)
78 nn0sub2 9697 . . . . . . . . . . . . . . 15 ((((♯‘𝑦) + 1) ∈ ℕ0 ∧ (♯‘𝐵) ∈ ℕ0 ∧ ((♯‘𝑦) + 1) ≤ (♯‘𝐵)) → ((♯‘𝐵) − ((♯‘𝑦) + 1)) ∈ ℕ0)
7977, 70, 67, 78syl3anc 1278 . . . . . . . . . . . . . 14 (((𝐵 ∈ Fin ∧ (𝑦 ∈ Fin ∧ ¬ 𝑧𝑦)) ∧ ((♯‘𝑦) + 1) ≤ (♯‘𝐵)) → ((♯‘𝐵) − ((♯‘𝑦) + 1)) ∈ ℕ0)
8079faccld 11152 . . . . . . . . . . . . 13 (((𝐵 ∈ Fin ∧ (𝑦 ∈ Fin ∧ ¬ 𝑧𝑦)) ∧ ((♯‘𝑦) + 1) ≤ (♯‘𝐵)) → (!‘((♯‘𝐵) − ((♯‘𝑦) + 1))) ∈ ℕ)
8180nncnd 9297 . . . . . . . . . . . 12 (((𝐵 ∈ Fin ∧ (𝑦 ∈ Fin ∧ ¬ 𝑧𝑦)) ∧ ((♯‘𝑦) + 1) ≤ (♯‘𝐵)) → (!‘((♯‘𝐵) − ((♯‘𝑦) + 1))) ∈ ℂ)
8280nnap0d 9329 . . . . . . . . . . . 12 (((𝐵 ∈ Fin ∧ (𝑦 ∈ Fin ∧ ¬ 𝑧𝑦)) ∧ ((♯‘𝑦) + 1) ≤ (♯‘𝐵)) → (!‘((♯‘𝐵) − ((♯‘𝑦) + 1))) # 0)
8372, 81, 82divclapd 9110 . . . . . . . . . . 11 (((𝐵 ∈ Fin ∧ (𝑦 ∈ Fin ∧ ¬ 𝑧𝑦)) ∧ ((♯‘𝑦) + 1) ≤ (♯‘𝐵)) → ((!‘(♯‘𝐵)) / (!‘((♯‘𝐵) − ((♯‘𝑦) + 1)))) ∈ ℂ)
8477faccld 11152 . . . . . . . . . . . 12 (((𝐵 ∈ Fin ∧ (𝑦 ∈ Fin ∧ ¬ 𝑧𝑦)) ∧ ((♯‘𝑦) + 1) ≤ (♯‘𝐵)) → (!‘((♯‘𝑦) + 1)) ∈ ℕ)
8584nncnd 9297 . . . . . . . . . . 11 (((𝐵 ∈ Fin ∧ (𝑦 ∈ Fin ∧ ¬ 𝑧𝑦)) ∧ ((♯‘𝑦) + 1) ≤ (♯‘𝐵)) → (!‘((♯‘𝑦) + 1)) ∈ ℂ)
8684nnap0d 9329 . . . . . . . . . . 11 (((𝐵 ∈ Fin ∧ (𝑦 ∈ Fin ∧ ¬ 𝑧𝑦)) ∧ ((♯‘𝑦) + 1) ≤ (♯‘𝐵)) → (!‘((♯‘𝑦) + 1)) # 0)
8783, 85, 86divcanap2d 9112 . . . . . . . . . 10 (((𝐵 ∈ Fin ∧ (𝑦 ∈ Fin ∧ ¬ 𝑧𝑦)) ∧ ((♯‘𝑦) + 1) ≤ (♯‘𝐵)) → ((!‘((♯‘𝑦) + 1)) · (((!‘(♯‘𝐵)) / (!‘((♯‘𝐵) − ((♯‘𝑦) + 1)))) / (!‘((♯‘𝑦) + 1)))) = ((!‘(♯‘𝐵)) / (!‘((♯‘𝐵) − ((♯‘𝑦) + 1)))))
8870nn0cnd 9601 . . . . . . . . . . . 12 (((𝐵 ∈ Fin ∧ (𝑦 ∈ Fin ∧ ¬ 𝑧𝑦)) ∧ ((♯‘𝑦) + 1) ≤ (♯‘𝐵)) → (♯‘𝐵) ∈ ℂ)
8975nn0cnd 9601 . . . . . . . . . . . 12 (((𝐵 ∈ Fin ∧ (𝑦 ∈ Fin ∧ ¬ 𝑧𝑦)) ∧ ((♯‘𝑦) + 1) ≤ (♯‘𝐵)) → (♯‘𝑦) ∈ ℂ)
9088, 89subcld 8627 . . . . . . . . . . 11 (((𝐵 ∈ Fin ∧ (𝑦 ∈ Fin ∧ ¬ 𝑧𝑦)) ∧ ((♯‘𝑦) + 1) ≤ (♯‘𝐵)) → ((♯‘𝐵) − (♯‘𝑦)) ∈ ℂ)
91 ax-1cn 8262 . . . . . . . . . . . . . 14 1 ∈ ℂ
92 npcan 8525 . . . . . . . . . . . . . 14 ((((♯‘𝐵) − (♯‘𝑦)) ∈ ℂ ∧ 1 ∈ ℂ) → ((((♯‘𝐵) − (♯‘𝑦)) − 1) + 1) = ((♯‘𝐵) − (♯‘𝑦)))
9390, 91, 92sylancl 417 . . . . . . . . . . . . 13 (((𝐵 ∈ Fin ∧ (𝑦 ∈ Fin ∧ ¬ 𝑧𝑦)) ∧ ((♯‘𝑦) + 1) ≤ (♯‘𝐵)) → ((((♯‘𝐵) − (♯‘𝑦)) − 1) + 1) = ((♯‘𝐵) − (♯‘𝑦)))
94 1cnd 8332 . . . . . . . . . . . . . . . 16 (((𝐵 ∈ Fin ∧ (𝑦 ∈ Fin ∧ ¬ 𝑧𝑦)) ∧ ((♯‘𝑦) + 1) ≤ (♯‘𝐵)) → 1 ∈ ℂ)
9588, 89, 94subsub4d 8658 . . . . . . . . . . . . . . 15 (((𝐵 ∈ Fin ∧ (𝑦 ∈ Fin ∧ ¬ 𝑧𝑦)) ∧ ((♯‘𝑦) + 1) ≤ (♯‘𝐵)) → (((♯‘𝐵) − (♯‘𝑦)) − 1) = ((♯‘𝐵) − ((♯‘𝑦) + 1)))
9695, 79eqeltrd 2315 . . . . . . . . . . . . . 14 (((𝐵 ∈ Fin ∧ (𝑦 ∈ Fin ∧ ¬ 𝑧𝑦)) ∧ ((♯‘𝑦) + 1) ≤ (♯‘𝐵)) → (((♯‘𝐵) − (♯‘𝑦)) − 1) ∈ ℕ0)
97 nn0p1nn 9581 . . . . . . . . . . . . . 14 ((((♯‘𝐵) − (♯‘𝑦)) − 1) ∈ ℕ0 → ((((♯‘𝐵) − (♯‘𝑦)) − 1) + 1) ∈ ℕ)
9896, 97syl 14 . . . . . . . . . . . . 13 (((𝐵 ∈ Fin ∧ (𝑦 ∈ Fin ∧ ¬ 𝑧𝑦)) ∧ ((♯‘𝑦) + 1) ≤ (♯‘𝐵)) → ((((♯‘𝐵) − (♯‘𝑦)) − 1) + 1) ∈ ℕ)
9993, 98eqeltrrd 2316 . . . . . . . . . . . 12 (((𝐵 ∈ Fin ∧ (𝑦 ∈ Fin ∧ ¬ 𝑧𝑦)) ∧ ((♯‘𝑦) + 1) ≤ (♯‘𝐵)) → ((♯‘𝐵) − (♯‘𝑦)) ∈ ℕ)
10099nnap0d 9329 . . . . . . . . . . 11 (((𝐵 ∈ Fin ∧ (𝑦 ∈ Fin ∧ ¬ 𝑧𝑦)) ∧ ((♯‘𝑦) + 1) ≤ (♯‘𝐵)) → ((♯‘𝐵) − (♯‘𝑦)) # 0)
10183, 90, 100divcanap2d 9112 . . . . . . . . . 10 (((𝐵 ∈ Fin ∧ (𝑦 ∈ Fin ∧ ¬ 𝑧𝑦)) ∧ ((♯‘𝑦) + 1) ≤ (♯‘𝐵)) → (((♯‘𝐵) − (♯‘𝑦)) · (((!‘(♯‘𝐵)) / (!‘((♯‘𝐵) − ((♯‘𝑦) + 1)))) / ((♯‘𝐵) − (♯‘𝑦)))) = ((!‘(♯‘𝐵)) / (!‘((♯‘𝐵) − ((♯‘𝑦) + 1)))))
10287, 101eqtr4d 2274 . . . . . . . . 9 (((𝐵 ∈ Fin ∧ (𝑦 ∈ Fin ∧ ¬ 𝑧𝑦)) ∧ ((♯‘𝑦) + 1) ≤ (♯‘𝐵)) → ((!‘((♯‘𝑦) + 1)) · (((!‘(♯‘𝐵)) / (!‘((♯‘𝐵) − ((♯‘𝑦) + 1)))) / (!‘((♯‘𝑦) + 1)))) = (((♯‘𝐵) − (♯‘𝑦)) · (((!‘(♯‘𝐵)) / (!‘((♯‘𝐵) − ((♯‘𝑦) + 1)))) / ((♯‘𝐵) − (♯‘𝑦)))))
103 hashunsng 11226 . . . . . . . . . . . . . 14 (𝑧 ∈ V → ((𝑦 ∈ Fin ∧ ¬ 𝑧𝑦) → (♯‘(𝑦 ∪ {𝑧})) = ((♯‘𝑦) + 1)))
104103elv 2825 . . . . . . . . . . . . 13 ((𝑦 ∈ Fin ∧ ¬ 𝑧𝑦) → (♯‘(𝑦 ∪ {𝑧})) = ((♯‘𝑦) + 1))
105104adantl 277 . . . . . . . . . . . 12 ((𝐵 ∈ Fin ∧ (𝑦 ∈ Fin ∧ ¬ 𝑧𝑦)) → (♯‘(𝑦 ∪ {𝑧})) = ((♯‘𝑦) + 1))
106105adantr 276 . . . . . . . . . . 11 (((𝐵 ∈ Fin ∧ (𝑦 ∈ Fin ∧ ¬ 𝑧𝑦)) ∧ ((♯‘𝑦) + 1) ≤ (♯‘𝐵)) → (♯‘(𝑦 ∪ {𝑧})) = ((♯‘𝑦) + 1))
107106fveq2d 5694 . . . . . . . . . 10 (((𝐵 ∈ Fin ∧ (𝑦 ∈ Fin ∧ ¬ 𝑧𝑦)) ∧ ((♯‘𝑦) + 1) ≤ (♯‘𝐵)) → (!‘(♯‘(𝑦 ∪ {𝑧}))) = (!‘((♯‘𝑦) + 1)))
108 nn0uz 9936 . . . . . . . . . . . . . . 15 0 = (ℤ‘0)
10977, 108eleqtrdi 2331 . . . . . . . . . . . . . 14 (((𝐵 ∈ Fin ∧ (𝑦 ∈ Fin ∧ ¬ 𝑧𝑦)) ∧ ((♯‘𝑦) + 1) ≤ (♯‘𝐵)) → ((♯‘𝑦) + 1) ∈ (ℤ‘0))
11070nn0zd 9745 . . . . . . . . . . . . . 14 (((𝐵 ∈ Fin ∧ (𝑦 ∈ Fin ∧ ¬ 𝑧𝑦)) ∧ ((♯‘𝑦) + 1) ≤ (♯‘𝐵)) → (♯‘𝐵) ∈ ℤ)
111 elfz5 10399 . . . . . . . . . . . . . 14 ((((♯‘𝑦) + 1) ∈ (ℤ‘0) ∧ (♯‘𝐵) ∈ ℤ) → (((♯‘𝑦) + 1) ∈ (0...(♯‘𝐵)) ↔ ((♯‘𝑦) + 1) ≤ (♯‘𝐵)))
112109, 110, 111syl2anc 415 . . . . . . . . . . . . 13 (((𝐵 ∈ Fin ∧ (𝑦 ∈ Fin ∧ ¬ 𝑧𝑦)) ∧ ((♯‘𝑦) + 1) ≤ (♯‘𝐵)) → (((♯‘𝑦) + 1) ∈ (0...(♯‘𝐵)) ↔ ((♯‘𝑦) + 1) ≤ (♯‘𝐵)))
11367, 112mpbird 167 . . . . . . . . . . . 12 (((𝐵 ∈ Fin ∧ (𝑦 ∈ Fin ∧ ¬ 𝑧𝑦)) ∧ ((♯‘𝑦) + 1) ≤ (♯‘𝐵)) → ((♯‘𝑦) + 1) ∈ (0...(♯‘𝐵)))
114 bcval2 11166 . . . . . . . . . . . 12 (((♯‘𝑦) + 1) ∈ (0...(♯‘𝐵)) → ((♯‘𝐵)C((♯‘𝑦) + 1)) = ((!‘(♯‘𝐵)) / ((!‘((♯‘𝐵) − ((♯‘𝑦) + 1))) · (!‘((♯‘𝑦) + 1)))))
115113, 114syl 14 . . . . . . . . . . 11 (((𝐵 ∈ Fin ∧ (𝑦 ∈ Fin ∧ ¬ 𝑧𝑦)) ∧ ((♯‘𝑦) + 1) ≤ (♯‘𝐵)) → ((♯‘𝐵)C((♯‘𝑦) + 1)) = ((!‘(♯‘𝐵)) / ((!‘((♯‘𝐵) − ((♯‘𝑦) + 1))) · (!‘((♯‘𝑦) + 1)))))
116106oveq2d 6091 . . . . . . . . . . 11 (((𝐵 ∈ Fin ∧ (𝑦 ∈ Fin ∧ ¬ 𝑧𝑦)) ∧ ((♯‘𝑦) + 1) ≤ (♯‘𝐵)) → ((♯‘𝐵)C(♯‘(𝑦 ∪ {𝑧}))) = ((♯‘𝐵)C((♯‘𝑦) + 1)))
11772, 81, 85, 82, 86divdivap1d 9142 . . . . . . . . . . 11 (((𝐵 ∈ Fin ∧ (𝑦 ∈ Fin ∧ ¬ 𝑧𝑦)) ∧ ((♯‘𝑦) + 1) ≤ (♯‘𝐵)) → (((!‘(♯‘𝐵)) / (!‘((♯‘𝐵) − ((♯‘𝑦) + 1)))) / (!‘((♯‘𝑦) + 1))) = ((!‘(♯‘𝐵)) / ((!‘((♯‘𝐵) − ((♯‘𝑦) + 1))) · (!‘((♯‘𝑦) + 1)))))
118115, 116, 1173eqtr4d 2281 . . . . . . . . . 10 (((𝐵 ∈ Fin ∧ (𝑦 ∈ Fin ∧ ¬ 𝑧𝑦)) ∧ ((♯‘𝑦) + 1) ≤ (♯‘𝐵)) → ((♯‘𝐵)C(♯‘(𝑦 ∪ {𝑧}))) = (((!‘(♯‘𝐵)) / (!‘((♯‘𝐵) − ((♯‘𝑦) + 1)))) / (!‘((♯‘𝑦) + 1))))
119107, 118oveq12d 6093 . . . . . . . . 9 (((𝐵 ∈ Fin ∧ (𝑦 ∈ Fin ∧ ¬ 𝑧𝑦)) ∧ ((♯‘𝑦) + 1) ≤ (♯‘𝐵)) → ((!‘(♯‘(𝑦 ∪ {𝑧}))) · ((♯‘𝐵)C(♯‘(𝑦 ∪ {𝑧})))) = ((!‘((♯‘𝑦) + 1)) · (((!‘(♯‘𝐵)) / (!‘((♯‘𝐵) − ((♯‘𝑦) + 1)))) / (!‘((♯‘𝑦) + 1)))))
12075, 108eleqtrdi 2331 . . . . . . . . . . . . . . 15 (((𝐵 ∈ Fin ∧ (𝑦 ∈ Fin ∧ ¬ 𝑧𝑦)) ∧ ((♯‘𝑦) + 1) ≤ (♯‘𝐵)) → (♯‘𝑦) ∈ (ℤ‘0))
121 peano2fzr 10420 . . . . . . . . . . . . . . 15 (((♯‘𝑦) ∈ (ℤ‘0) ∧ ((♯‘𝑦) + 1) ∈ (0...(♯‘𝐵))) → (♯‘𝑦) ∈ (0...(♯‘𝐵)))
122120, 113, 121syl2anc 415 . . . . . . . . . . . . . 14 (((𝐵 ∈ Fin ∧ (𝑦 ∈ Fin ∧ ¬ 𝑧𝑦)) ∧ ((♯‘𝑦) + 1) ≤ (♯‘𝐵)) → (♯‘𝑦) ∈ (0...(♯‘𝐵)))
123 bcval2 11166 . . . . . . . . . . . . . 14 ((♯‘𝑦) ∈ (0...(♯‘𝐵)) → ((♯‘𝐵)C(♯‘𝑦)) = ((!‘(♯‘𝐵)) / ((!‘((♯‘𝐵) − (♯‘𝑦))) · (!‘(♯‘𝑦)))))
124122, 123syl 14 . . . . . . . . . . . . 13 (((𝐵 ∈ Fin ∧ (𝑦 ∈ Fin ∧ ¬ 𝑧𝑦)) ∧ ((♯‘𝑦) + 1) ≤ (♯‘𝐵)) → ((♯‘𝐵)C(♯‘𝑦)) = ((!‘(♯‘𝐵)) / ((!‘((♯‘𝐵) − (♯‘𝑦))) · (!‘(♯‘𝑦)))))
125 elfzle2 10411 . . . . . . . . . . . . . . . . . 18 ((♯‘𝑦) ∈ (0...(♯‘𝐵)) → (♯‘𝑦) ≤ (♯‘𝐵))
126122, 125syl 14 . . . . . . . . . . . . . . . . 17 (((𝐵 ∈ Fin ∧ (𝑦 ∈ Fin ∧ ¬ 𝑧𝑦)) ∧ ((♯‘𝑦) + 1) ≤ (♯‘𝐵)) → (♯‘𝑦) ≤ (♯‘𝐵))
127 nn0sub2 9697 . . . . . . . . . . . . . . . . 17 (((♯‘𝑦) ∈ ℕ0 ∧ (♯‘𝐵) ∈ ℕ0 ∧ (♯‘𝑦) ≤ (♯‘𝐵)) → ((♯‘𝐵) − (♯‘𝑦)) ∈ ℕ0)
12875, 70, 126, 127syl3anc 1278 . . . . . . . . . . . . . . . 16 (((𝐵 ∈ Fin ∧ (𝑦 ∈ Fin ∧ ¬ 𝑧𝑦)) ∧ ((♯‘𝑦) + 1) ≤ (♯‘𝐵)) → ((♯‘𝐵) − (♯‘𝑦)) ∈ ℕ0)
129128faccld 11152 . . . . . . . . . . . . . . 15 (((𝐵 ∈ Fin ∧ (𝑦 ∈ Fin ∧ ¬ 𝑧𝑦)) ∧ ((♯‘𝑦) + 1) ≤ (♯‘𝐵)) → (!‘((♯‘𝐵) − (♯‘𝑦))) ∈ ℕ)
130129nncnd 9297 . . . . . . . . . . . . . 14 (((𝐵 ∈ Fin ∧ (𝑦 ∈ Fin ∧ ¬ 𝑧𝑦)) ∧ ((♯‘𝑦) + 1) ≤ (♯‘𝐵)) → (!‘((♯‘𝐵) − (♯‘𝑦))) ∈ ℂ)
13175faccld 11152 . . . . . . . . . . . . . . 15 (((𝐵 ∈ Fin ∧ (𝑦 ∈ Fin ∧ ¬ 𝑧𝑦)) ∧ ((♯‘𝑦) + 1) ≤ (♯‘𝐵)) → (!‘(♯‘𝑦)) ∈ ℕ)
132131nncnd 9297 . . . . . . . . . . . . . 14 (((𝐵 ∈ Fin ∧ (𝑦 ∈ Fin ∧ ¬ 𝑧𝑦)) ∧ ((♯‘𝑦) + 1) ≤ (♯‘𝐵)) → (!‘(♯‘𝑦)) ∈ ℂ)
133129nnap0d 9329 . . . . . . . . . . . . . 14 (((𝐵 ∈ Fin ∧ (𝑦 ∈ Fin ∧ ¬ 𝑧𝑦)) ∧ ((♯‘𝑦) + 1) ≤ (♯‘𝐵)) → (!‘((♯‘𝐵) − (♯‘𝑦))) # 0)
134131nnap0d 9329 . . . . . . . . . . . . . 14 (((𝐵 ∈ Fin ∧ (𝑦 ∈ Fin ∧ ¬ 𝑧𝑦)) ∧ ((♯‘𝑦) + 1) ≤ (♯‘𝐵)) → (!‘(♯‘𝑦)) # 0)
13572, 130, 132, 133, 134divdivap1d 9142 . . . . . . . . . . . . 13 (((𝐵 ∈ Fin ∧ (𝑦 ∈ Fin ∧ ¬ 𝑧𝑦)) ∧ ((♯‘𝑦) + 1) ≤ (♯‘𝐵)) → (((!‘(♯‘𝐵)) / (!‘((♯‘𝐵) − (♯‘𝑦)))) / (!‘(♯‘𝑦))) = ((!‘(♯‘𝐵)) / ((!‘((♯‘𝐵) − (♯‘𝑦))) · (!‘(♯‘𝑦)))))
136124, 135eqtr4d 2274 . . . . . . . . . . . 12 (((𝐵 ∈ Fin ∧ (𝑦 ∈ Fin ∧ ¬ 𝑧𝑦)) ∧ ((♯‘𝑦) + 1) ≤ (♯‘𝐵)) → ((♯‘𝐵)C(♯‘𝑦)) = (((!‘(♯‘𝐵)) / (!‘((♯‘𝐵) − (♯‘𝑦)))) / (!‘(♯‘𝑦))))
137136oveq2d 6091 . . . . . . . . . . 11 (((𝐵 ∈ Fin ∧ (𝑦 ∈ Fin ∧ ¬ 𝑧𝑦)) ∧ ((♯‘𝑦) + 1) ≤ (♯‘𝐵)) → ((!‘(♯‘𝑦)) · ((♯‘𝐵)C(♯‘𝑦))) = ((!‘(♯‘𝑦)) · (((!‘(♯‘𝐵)) / (!‘((♯‘𝐵) − (♯‘𝑦)))) / (!‘(♯‘𝑦)))))
138 facnn2 11150 . . . . . . . . . . . . . . 15 (((♯‘𝐵) − (♯‘𝑦)) ∈ ℕ → (!‘((♯‘𝐵) − (♯‘𝑦))) = ((!‘(((♯‘𝐵) − (♯‘𝑦)) − 1)) · ((♯‘𝐵) − (♯‘𝑦))))
13999, 138syl 14 . . . . . . . . . . . . . 14 (((𝐵 ∈ Fin ∧ (𝑦 ∈ Fin ∧ ¬ 𝑧𝑦)) ∧ ((♯‘𝑦) + 1) ≤ (♯‘𝐵)) → (!‘((♯‘𝐵) − (♯‘𝑦))) = ((!‘(((♯‘𝐵) − (♯‘𝑦)) − 1)) · ((♯‘𝐵) − (♯‘𝑦))))
14095fveq2d 5694 . . . . . . . . . . . . . . 15 (((𝐵 ∈ Fin ∧ (𝑦 ∈ Fin ∧ ¬ 𝑧𝑦)) ∧ ((♯‘𝑦) + 1) ≤ (♯‘𝐵)) → (!‘(((♯‘𝐵) − (♯‘𝑦)) − 1)) = (!‘((♯‘𝐵) − ((♯‘𝑦) + 1))))
141140oveq1d 6090 . . . . . . . . . . . . . 14 (((𝐵 ∈ Fin ∧ (𝑦 ∈ Fin ∧ ¬ 𝑧𝑦)) ∧ ((♯‘𝑦) + 1) ≤ (♯‘𝐵)) → ((!‘(((♯‘𝐵) − (♯‘𝑦)) − 1)) · ((♯‘𝐵) − (♯‘𝑦))) = ((!‘((♯‘𝐵) − ((♯‘𝑦) + 1))) · ((♯‘𝐵) − (♯‘𝑦))))
142139, 141eqtrd 2271 . . . . . . . . . . . . 13 (((𝐵 ∈ Fin ∧ (𝑦 ∈ Fin ∧ ¬ 𝑧𝑦)) ∧ ((♯‘𝑦) + 1) ≤ (♯‘𝐵)) → (!‘((♯‘𝐵) − (♯‘𝑦))) = ((!‘((♯‘𝐵) − ((♯‘𝑦) + 1))) · ((♯‘𝐵) − (♯‘𝑦))))
143142oveq2d 6091 . . . . . . . . . . . 12 (((𝐵 ∈ Fin ∧ (𝑦 ∈ Fin ∧ ¬ 𝑧𝑦)) ∧ ((♯‘𝑦) + 1) ≤ (♯‘𝐵)) → ((!‘(♯‘𝐵)) / (!‘((♯‘𝐵) − (♯‘𝑦)))) = ((!‘(♯‘𝐵)) / ((!‘((♯‘𝐵) − ((♯‘𝑦) + 1))) · ((♯‘𝐵) − (♯‘𝑦)))))
14472, 130, 133divclapd 9110 . . . . . . . . . . . . 13 (((𝐵 ∈ Fin ∧ (𝑦 ∈ Fin ∧ ¬ 𝑧𝑦)) ∧ ((♯‘𝑦) + 1) ≤ (♯‘𝐵)) → ((!‘(♯‘𝐵)) / (!‘((♯‘𝐵) − (♯‘𝑦)))) ∈ ℂ)
145144, 132, 134divcanap2d 9112 . . . . . . . . . . . 12 (((𝐵 ∈ Fin ∧ (𝑦 ∈ Fin ∧ ¬ 𝑧𝑦)) ∧ ((♯‘𝑦) + 1) ≤ (♯‘𝐵)) → ((!‘(♯‘𝑦)) · (((!‘(♯‘𝐵)) / (!‘((♯‘𝐵) − (♯‘𝑦)))) / (!‘(♯‘𝑦)))) = ((!‘(♯‘𝐵)) / (!‘((♯‘𝐵) − (♯‘𝑦)))))
14672, 81, 90, 82, 100divdivap1d 9142 . . . . . . . . . . . 12 (((𝐵 ∈ Fin ∧ (𝑦 ∈ Fin ∧ ¬ 𝑧𝑦)) ∧ ((♯‘𝑦) + 1) ≤ (♯‘𝐵)) → (((!‘(♯‘𝐵)) / (!‘((♯‘𝐵) − ((♯‘𝑦) + 1)))) / ((♯‘𝐵) − (♯‘𝑦))) = ((!‘(♯‘𝐵)) / ((!‘((♯‘𝐵) − ((♯‘𝑦) + 1))) · ((♯‘𝐵) − (♯‘𝑦)))))
147143, 145, 1463eqtr4d 2281 . . . . . . . . . . 11 (((𝐵 ∈ Fin ∧ (𝑦 ∈ Fin ∧ ¬ 𝑧𝑦)) ∧ ((♯‘𝑦) + 1) ≤ (♯‘𝐵)) → ((!‘(♯‘𝑦)) · (((!‘(♯‘𝐵)) / (!‘((♯‘𝐵) − (♯‘𝑦)))) / (!‘(♯‘𝑦)))) = (((!‘(♯‘𝐵)) / (!‘((♯‘𝐵) − ((♯‘𝑦) + 1)))) / ((♯‘𝐵) − (♯‘𝑦))))
148137, 147eqtrd 2271 . . . . . . . . . 10 (((𝐵 ∈ Fin ∧ (𝑦 ∈ Fin ∧ ¬ 𝑧𝑦)) ∧ ((♯‘𝑦) + 1) ≤ (♯‘𝐵)) → ((!‘(♯‘𝑦)) · ((♯‘𝐵)C(♯‘𝑦))) = (((!‘(♯‘𝐵)) / (!‘((♯‘𝐵) − ((♯‘𝑦) + 1)))) / ((♯‘𝐵) − (♯‘𝑦))))
149148oveq2d 6091 . . . . . . . . 9 (((𝐵 ∈ Fin ∧ (𝑦 ∈ Fin ∧ ¬ 𝑧𝑦)) ∧ ((♯‘𝑦) + 1) ≤ (♯‘𝐵)) → (((♯‘𝐵) − (♯‘𝑦)) · ((!‘(♯‘𝑦)) · ((♯‘𝐵)C(♯‘𝑦)))) = (((♯‘𝐵) − (♯‘𝑦)) · (((!‘(♯‘𝐵)) / (!‘((♯‘𝐵) − ((♯‘𝑦) + 1)))) / ((♯‘𝐵) − (♯‘𝑦)))))
150102, 119, 1493eqtr4d 2281 . . . . . . . 8 (((𝐵 ∈ Fin ∧ (𝑦 ∈ Fin ∧ ¬ 𝑧𝑦)) ∧ ((♯‘𝑦) + 1) ≤ (♯‘𝐵)) → ((!‘(♯‘(𝑦 ∪ {𝑧}))) · ((♯‘𝐵)C(♯‘(𝑦 ∪ {𝑧})))) = (((♯‘𝐵) − (♯‘𝑦)) · ((!‘(♯‘𝑦)) · ((♯‘𝐵)C(♯‘𝑦)))))
15168, 150eqeq12d 2253 . . . . . . 7 (((𝐵 ∈ Fin ∧ (𝑦 ∈ Fin ∧ ¬ 𝑧𝑦)) ∧ ((♯‘𝑦) + 1) ≤ (♯‘𝐵)) → ((♯‘{𝑓𝑓:(𝑦 ∪ {𝑧})–1-1𝐵}) = ((!‘(♯‘(𝑦 ∪ {𝑧}))) · ((♯‘𝐵)C(♯‘(𝑦 ∪ {𝑧})))) ↔ (((♯‘𝐵) − (♯‘𝑦)) · (♯‘{𝑓𝑓:𝑦1-1𝐵})) = (((♯‘𝐵) − (♯‘𝑦)) · ((!‘(♯‘𝑦)) · ((♯‘𝐵)C(♯‘𝑦))))))
15261, 151imbitrrid 156 . . . . . 6 (((𝐵 ∈ Fin ∧ (𝑦 ∈ Fin ∧ ¬ 𝑧𝑦)) ∧ ((♯‘𝑦) + 1) ≤ (♯‘𝐵)) → ((♯‘{𝑓𝑓:𝑦1-1𝐵}) = ((!‘(♯‘𝑦)) · ((♯‘𝐵)C(♯‘𝑦))) → (♯‘{𝑓𝑓:(𝑦 ∪ {𝑧})–1-1𝐵}) = ((!‘(♯‘(𝑦 ∪ {𝑧}))) · ((♯‘𝐵)C(♯‘(𝑦 ∪ {𝑧}))))))
153 abn0m 3547 . . . . . . . . . . . . . 14 (∃𝑤 𝑤 ∈ {𝑓𝑓:(𝑦 ∪ {𝑧})–1-1𝐵} ↔ ∃𝑓 𝑓:(𝑦 ∪ {𝑧})–1-1𝐵)
154 f1domg 7034 . . . . . . . . . . . . . . . . 17 (𝐵 ∈ Fin → (𝑓:(𝑦 ∪ {𝑧})–1-1𝐵 → (𝑦 ∪ {𝑧}) ≼ 𝐵))
155154adantr 276 . . . . . . . . . . . . . . . 16 ((𝐵 ∈ Fin ∧ (𝑦 ∈ Fin ∧ ¬ 𝑧𝑦)) → (𝑓:(𝑦 ∪ {𝑧})–1-1𝐵 → (𝑦 ∪ {𝑧}) ≼ 𝐵))
156105breq1d 4135 . . . . . . . . . . . . . . . . 17 ((𝐵 ∈ Fin ∧ (𝑦 ∈ Fin ∧ ¬ 𝑧𝑦)) → ((♯‘(𝑦 ∪ {𝑧})) ≤ (♯‘𝐵) ↔ ((♯‘𝑦) + 1) ≤ (♯‘𝐵)))
157 vex 2824 . . . . . . . . . . . . . . . . . . . 20 𝑧 ∈ V
158157a1i 9 . . . . . . . . . . . . . . . . . . 19 ((𝐵 ∈ Fin ∧ (𝑦 ∈ Fin ∧ ¬ 𝑧𝑦)) → 𝑧 ∈ V)
159 simprr 537 . . . . . . . . . . . . . . . . . . 19 ((𝐵 ∈ Fin ∧ (𝑦 ∈ Fin ∧ ¬ 𝑧𝑦)) → ¬ 𝑧𝑦)
160 unsnfi 7216 . . . . . . . . . . . . . . . . . . 19 ((𝑦 ∈ Fin ∧ 𝑧 ∈ V ∧ ¬ 𝑧𝑦) → (𝑦 ∪ {𝑧}) ∈ Fin)
16162, 158, 159, 160syl3anc 1278 . . . . . . . . . . . . . . . . . 18 ((𝐵 ∈ Fin ∧ (𝑦 ∈ Fin ∧ ¬ 𝑧𝑦)) → (𝑦 ∪ {𝑧}) ∈ Fin)
162 fihashdom 11221 . . . . . . . . . . . . . . . . . 18 (((𝑦 ∪ {𝑧}) ∈ Fin ∧ 𝐵 ∈ Fin) → ((♯‘(𝑦 ∪ {𝑧})) ≤ (♯‘𝐵) ↔ (𝑦 ∪ {𝑧}) ≼ 𝐵))
163161, 64, 162syl2anc 415 . . . . . . . . . . . . . . . . 17 ((𝐵 ∈ Fin ∧ (𝑦 ∈ Fin ∧ ¬ 𝑧𝑦)) → ((♯‘(𝑦 ∪ {𝑧})) ≤ (♯‘𝐵) ↔ (𝑦 ∪ {𝑧}) ≼ 𝐵))
164 nn0p1nn 9581 . . . . . . . . . . . . . . . . . . . 20 ((♯‘𝑦) ∈ ℕ0 → ((♯‘𝑦) + 1) ∈ ℕ)
16574, 164syl 14 . . . . . . . . . . . . . . . . . . 19 ((𝐵 ∈ Fin ∧ (𝑦 ∈ Fin ∧ ¬ 𝑧𝑦)) → ((♯‘𝑦) + 1) ∈ ℕ)
166165nnred 9296 . . . . . . . . . . . . . . . . . 18 ((𝐵 ∈ Fin ∧ (𝑦 ∈ Fin ∧ ¬ 𝑧𝑦)) → ((♯‘𝑦) + 1) ∈ ℝ)
16769nn0red 9600 . . . . . . . . . . . . . . . . . 18 ((𝐵 ∈ Fin ∧ (𝑦 ∈ Fin ∧ ¬ 𝑧𝑦)) → (♯‘𝐵) ∈ ℝ)
168166, 167lenltd 8434 . . . . . . . . . . . . . . . . 17 ((𝐵 ∈ Fin ∧ (𝑦 ∈ Fin ∧ ¬ 𝑧𝑦)) → (((♯‘𝑦) + 1) ≤ (♯‘𝐵) ↔ ¬ (♯‘𝐵) < ((♯‘𝑦) + 1)))
169156, 163, 1683bitr3d 218 . . . . . . . . . . . . . . . 16 ((𝐵 ∈ Fin ∧ (𝑦 ∈ Fin ∧ ¬ 𝑧𝑦)) → ((𝑦 ∪ {𝑧}) ≼ 𝐵 ↔ ¬ (♯‘𝐵) < ((♯‘𝑦) + 1)))
170155, 169sylibd 149 . . . . . . . . . . . . . . 15 ((𝐵 ∈ Fin ∧ (𝑦 ∈ Fin ∧ ¬ 𝑧𝑦)) → (𝑓:(𝑦 ∪ {𝑧})–1-1𝐵 → ¬ (♯‘𝐵) < ((♯‘𝑦) + 1)))
171170exlimdv 1872 . . . . . . . . . . . . . 14 ((𝐵 ∈ Fin ∧ (𝑦 ∈ Fin ∧ ¬ 𝑧𝑦)) → (∃𝑓 𝑓:(𝑦 ∪ {𝑧})–1-1𝐵 → ¬ (♯‘𝐵) < ((♯‘𝑦) + 1)))
172153, 171biimtrid 152 . . . . . . . . . . . . 13 ((𝐵 ∈ Fin ∧ (𝑦 ∈ Fin ∧ ¬ 𝑧𝑦)) → (∃𝑤 𝑤 ∈ {𝑓𝑓:(𝑦 ∪ {𝑧})–1-1𝐵} → ¬ (♯‘𝐵) < ((♯‘𝑦) + 1)))
173172con2d 633 . . . . . . . . . . . 12 ((𝐵 ∈ Fin ∧ (𝑦 ∈ Fin ∧ ¬ 𝑧𝑦)) → ((♯‘𝐵) < ((♯‘𝑦) + 1) → ¬ ∃𝑤 𝑤 ∈ {𝑓𝑓:(𝑦 ∪ {𝑧})–1-1𝐵}))
174 notm0 3542 . . . . . . . . . . . 12 (¬ ∃𝑤 𝑤 ∈ {𝑓𝑓:(𝑦 ∪ {𝑧})–1-1𝐵} ↔ {𝑓𝑓:(𝑦 ∪ {𝑧})–1-1𝐵} = ∅)
175173, 174imbitrdi 161 . . . . . . . . . . 11 ((𝐵 ∈ Fin ∧ (𝑦 ∈ Fin ∧ ¬ 𝑧𝑦)) → ((♯‘𝐵) < ((♯‘𝑦) + 1) → {𝑓𝑓:(𝑦 ∪ {𝑧})–1-1𝐵} = ∅))
176175imp 124 . . . . . . . . . 10 (((𝐵 ∈ Fin ∧ (𝑦 ∈ Fin ∧ ¬ 𝑧𝑦)) ∧ (♯‘𝐵) < ((♯‘𝑦) + 1)) → {𝑓𝑓:(𝑦 ∪ {𝑧})–1-1𝐵} = ∅)
177176fveq2d 5694 . . . . . . . . 9 (((𝐵 ∈ Fin ∧ (𝑦 ∈ Fin ∧ ¬ 𝑧𝑦)) ∧ (♯‘𝐵) < ((♯‘𝑦) + 1)) → (♯‘{𝑓𝑓:(𝑦 ∪ {𝑧})–1-1𝐵}) = (♯‘∅))
178 hashcl 11198 . . . . . . . . . . . . . 14 ((𝑦 ∪ {𝑧}) ∈ Fin → (♯‘(𝑦 ∪ {𝑧})) ∈ ℕ0)
179161, 178syl 14 . . . . . . . . . . . . 13 ((𝐵 ∈ Fin ∧ (𝑦 ∈ Fin ∧ ¬ 𝑧𝑦)) → (♯‘(𝑦 ∪ {𝑧})) ∈ ℕ0)
180179faccld 11152 . . . . . . . . . . . 12 ((𝐵 ∈ Fin ∧ (𝑦 ∈ Fin ∧ ¬ 𝑧𝑦)) → (!‘(♯‘(𝑦 ∪ {𝑧}))) ∈ ℕ)
181180nncnd 9297 . . . . . . . . . . 11 ((𝐵 ∈ Fin ∧ (𝑦 ∈ Fin ∧ ¬ 𝑧𝑦)) → (!‘(♯‘(𝑦 ∪ {𝑧}))) ∈ ℂ)
182181adantr 276 . . . . . . . . . 10 (((𝐵 ∈ Fin ∧ (𝑦 ∈ Fin ∧ ¬ 𝑧𝑦)) ∧ (♯‘𝐵) < ((♯‘𝑦) + 1)) → (!‘(♯‘(𝑦 ∪ {𝑧}))) ∈ ℂ)
183182mul01d 8710 . . . . . . . . 9 (((𝐵 ∈ Fin ∧ (𝑦 ∈ Fin ∧ ¬ 𝑧𝑦)) ∧ (♯‘𝐵) < ((♯‘𝑦) + 1)) → ((!‘(♯‘(𝑦 ∪ {𝑧}))) · 0) = 0)
18419, 177, 1833eqtr4a 2297 . . . . . . . 8 (((𝐵 ∈ Fin ∧ (𝑦 ∈ Fin ∧ ¬ 𝑧𝑦)) ∧ (♯‘𝐵) < ((♯‘𝑦) + 1)) → (♯‘{𝑓𝑓:(𝑦 ∪ {𝑧})–1-1𝐵}) = ((!‘(♯‘(𝑦 ∪ {𝑧}))) · 0))
185105adantr 276 . . . . . . . . . . 11 (((𝐵 ∈ Fin ∧ (𝑦 ∈ Fin ∧ ¬ 𝑧𝑦)) ∧ (♯‘𝐵) < ((♯‘𝑦) + 1)) → (♯‘(𝑦 ∪ {𝑧})) = ((♯‘𝑦) + 1))
186185oveq2d 6091 . . . . . . . . . 10 (((𝐵 ∈ Fin ∧ (𝑦 ∈ Fin ∧ ¬ 𝑧𝑦)) ∧ (♯‘𝐵) < ((♯‘𝑦) + 1)) → ((♯‘𝐵)C(♯‘(𝑦 ∪ {𝑧}))) = ((♯‘𝐵)C((♯‘𝑦) + 1)))
18769adantr 276 . . . . . . . . . . 11 (((𝐵 ∈ Fin ∧ (𝑦 ∈ Fin ∧ ¬ 𝑧𝑦)) ∧ (♯‘𝐵) < ((♯‘𝑦) + 1)) → (♯‘𝐵) ∈ ℕ0)
188165adantr 276 . . . . . . . . . . . 12 (((𝐵 ∈ Fin ∧ (𝑦 ∈ Fin ∧ ¬ 𝑧𝑦)) ∧ (♯‘𝐵) < ((♯‘𝑦) + 1)) → ((♯‘𝑦) + 1) ∈ ℕ)
189188nnzd 9746 . . . . . . . . . . 11 (((𝐵 ∈ Fin ∧ (𝑦 ∈ Fin ∧ ¬ 𝑧𝑦)) ∧ (♯‘𝐵) < ((♯‘𝑦) + 1)) → ((♯‘𝑦) + 1) ∈ ℤ)
190 animorr 836 . . . . . . . . . . 11 (((𝐵 ∈ Fin ∧ (𝑦 ∈ Fin ∧ ¬ 𝑧𝑦)) ∧ (♯‘𝐵) < ((♯‘𝑦) + 1)) → (((♯‘𝑦) + 1) < 0 ∨ (♯‘𝐵) < ((♯‘𝑦) + 1)))
191 bcval4 11168 . . . . . . . . . . 11 (((♯‘𝐵) ∈ ℕ0 ∧ ((♯‘𝑦) + 1) ∈ ℤ ∧ (((♯‘𝑦) + 1) < 0 ∨ (♯‘𝐵) < ((♯‘𝑦) + 1))) → ((♯‘𝐵)C((♯‘𝑦) + 1)) = 0)
192187, 189, 190, 191syl3anc 1278 . . . . . . . . . 10 (((𝐵 ∈ Fin ∧ (𝑦 ∈ Fin ∧ ¬ 𝑧𝑦)) ∧ (♯‘𝐵) < ((♯‘𝑦) + 1)) → ((♯‘𝐵)C((♯‘𝑦) + 1)) = 0)
193186, 192eqtrd 2271 . . . . . . . . 9 (((𝐵 ∈ Fin ∧ (𝑦 ∈ Fin ∧ ¬ 𝑧𝑦)) ∧ (♯‘𝐵) < ((♯‘𝑦) + 1)) → ((♯‘𝐵)C(♯‘(𝑦 ∪ {𝑧}))) = 0)
194193oveq2d 6091 . . . . . . . 8 (((𝐵 ∈ Fin ∧ (𝑦 ∈ Fin ∧ ¬ 𝑧𝑦)) ∧ (♯‘𝐵) < ((♯‘𝑦) + 1)) → ((!‘(♯‘(𝑦 ∪ {𝑧}))) · ((♯‘𝐵)C(♯‘(𝑦 ∪ {𝑧})))) = ((!‘(♯‘(𝑦 ∪ {𝑧}))) · 0))
195184, 194eqtr4d 2274 . . . . . . 7 (((𝐵 ∈ Fin ∧ (𝑦 ∈ Fin ∧ ¬ 𝑧𝑦)) ∧ (♯‘𝐵) < ((♯‘𝑦) + 1)) → (♯‘{𝑓𝑓:(𝑦 ∪ {𝑧})–1-1𝐵}) = ((!‘(♯‘(𝑦 ∪ {𝑧}))) · ((♯‘𝐵)C(♯‘(𝑦 ∪ {𝑧})))))
196195a1d 22 . . . . . 6 (((𝐵 ∈ Fin ∧ (𝑦 ∈ Fin ∧ ¬ 𝑧𝑦)) ∧ (♯‘𝐵) < ((♯‘𝑦) + 1)) → ((♯‘{𝑓𝑓:𝑦1-1𝐵}) = ((!‘(♯‘𝑦)) · ((♯‘𝐵)C(♯‘𝑦))) → (♯‘{𝑓𝑓:(𝑦 ∪ {𝑧})–1-1𝐵}) = ((!‘(♯‘(𝑦 ∪ {𝑧}))) · ((♯‘𝐵)C(♯‘(𝑦 ∪ {𝑧}))))))
197165nnzd 9746 . . . . . . 7 ((𝐵 ∈ Fin ∧ (𝑦 ∈ Fin ∧ ¬ 𝑧𝑦)) → ((♯‘𝑦) + 1) ∈ ℤ)
19869nn0zd 9745 . . . . . . 7 ((𝐵 ∈ Fin ∧ (𝑦 ∈ Fin ∧ ¬ 𝑧𝑦)) → (♯‘𝐵) ∈ ℤ)
199 zlelttric 9668 . . . . . . 7 ((((♯‘𝑦) + 1) ∈ ℤ ∧ (♯‘𝐵) ∈ ℤ) → (((♯‘𝑦) + 1) ≤ (♯‘𝐵) ∨ (♯‘𝐵) < ((♯‘𝑦) + 1)))
200197, 198, 199syl2anc 415 . . . . . 6 ((𝐵 ∈ Fin ∧ (𝑦 ∈ Fin ∧ ¬ 𝑧𝑦)) → (((♯‘𝑦) + 1) ≤ (♯‘𝐵) ∨ (♯‘𝐵) < ((♯‘𝑦) + 1)))
201152, 196, 200mpjaodan 810 . . . . 5 ((𝐵 ∈ Fin ∧ (𝑦 ∈ Fin ∧ ¬ 𝑧𝑦)) → ((♯‘{𝑓𝑓:𝑦1-1𝐵}) = ((!‘(♯‘𝑦)) · ((♯‘𝐵)C(♯‘𝑦))) → (♯‘{𝑓𝑓:(𝑦 ∪ {𝑧})–1-1𝐵}) = ((!‘(♯‘(𝑦 ∪ {𝑧}))) · ((♯‘𝐵)C(♯‘(𝑦 ∪ {𝑧}))))))
202201expcom 116 . . . 4 ((𝑦 ∈ Fin ∧ ¬ 𝑧𝑦) → (𝐵 ∈ Fin → ((♯‘{𝑓𝑓:𝑦1-1𝐵}) = ((!‘(♯‘𝑦)) · ((♯‘𝐵)C(♯‘𝑦))) → (♯‘{𝑓𝑓:(𝑦 ∪ {𝑧})–1-1𝐵}) = ((!‘(♯‘(𝑦 ∪ {𝑧}))) · ((♯‘𝐵)C(♯‘(𝑦 ∪ {𝑧})))))))
203202a2d 26 . . 3 ((𝑦 ∈ Fin ∧ ¬ 𝑧𝑦) → ((𝐵 ∈ Fin → (♯‘{𝑓𝑓:𝑦1-1𝐵}) = ((!‘(♯‘𝑦)) · ((♯‘𝐵)C(♯‘𝑦)))) → (𝐵 ∈ Fin → (♯‘{𝑓𝑓:(𝑦 ∪ {𝑧})–1-1𝐵}) = ((!‘(♯‘(𝑦 ∪ {𝑧}))) · ((♯‘𝐵)C(♯‘(𝑦 ∪ {𝑧})))))))
20427, 36, 45, 54, 60, 203findcard2s 7184 . 2 (𝐴 ∈ Fin → (𝐵 ∈ Fin → (♯‘{𝑓𝑓:𝐴1-1𝐵}) = ((!‘(♯‘𝐴)) · ((♯‘𝐵)C(♯‘𝐴)))))
205204imp 124 1 ((𝐴 ∈ Fin ∧ 𝐵 ∈ Fin) → (♯‘{𝑓𝑓:𝐴1-1𝐵}) = ((!‘(♯‘𝐴)) · ((♯‘𝐵)C(♯‘𝐴))))
Colors of variables: wff set class
Syntax hints:  ¬ wn 3  wi 4  wa 104  wb 105  wo 720   = wceq 1402  wex 1545  wcel 2209  {cab 2224  Vcvv 2821  cun 3218  c0 3520  {csn 3705   class class class wbr 4125   Fn wfn 5367  1-1wf1 5369  cfv 5372  (class class class)co 6075  cdom 7011  Fincfn 7012  cc 8167  0cc0 8169  1c1 8170   + caddc 8172   · cmul 8174   < clt 8350  cle 8351  cmin 8487   / cdiv 8992  cn 9283  0cn0 9542  cz 9623  cuz 9900  ...cfz 10390  !cfa 11141  Ccbc 11163  chash 11192
This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-ia1 106  ax-ia2 107  ax-ia3 108  ax-in1 623  ax-in2 624  ax-io 721  ax-5 1500  ax-7 1501  ax-gen 1502  ax-ie1 1546  ax-ie2 1547  ax-8 1557  ax-10 1558  ax-11 1559  ax-i12 1560  ax-bndl 1562  ax-4 1563  ax-17 1579  ax-i9 1583  ax-ial 1587  ax-i5r 1588  ax-14 2212  ax-ext 2220  ax-coll 4241  ax-sep 4244  ax-nul 4254  ax-pow 4306  ax-pr 4341  ax-un 4573  ax-setind 4679  ax-iinf 4730  ax-cnex 8260  ax-resscn 8261  ax-1cn 8262  ax-1re 8263  ax-icn 8264  ax-addcl 8265  ax-addrcl 8266  ax-mulcl 8267  ax-mulrcl 8268  ax-addcom 8269  ax-mulcom 8270  ax-addass 8271  ax-mulass 8272  ax-distr 8273  ax-i2m1 8274  ax-0lt1 8275  ax-1rid 8276  ax-0id 8277  ax-rnegex 8278  ax-precex 8279  ax-cnre 8280  ax-pre-ltirr 8281  ax-pre-ltwlin 8282  ax-pre-lttrn 8283  ax-pre-apti 8284  ax-pre-ltadd 8285  ax-pre-mulgt0 8286  ax-pre-mulext 8287
This theorem depends on definitions:  df-bi 117  df-dc 847  df-3or 1010  df-3an 1011  df-tru 1405  df-fal 1408  df-nf 1514  df-sb 1816  df-eu 2089  df-mo 2090  df-clab 2225  df-cleq 2231  df-clel 2234  df-nfc 2381  df-ne 2421  df-nel 2516  df-ral 2533  df-rex 2534  df-reu 2535  df-rmo 2536  df-rab 2537  df-v 2823  df-sbc 3052  df-csb 3148  df-dif 3222  df-un 3224  df-in 3226  df-ss 3233  df-nul 3521  df-if 3636  df-pw 3687  df-sn 3711  df-pr 3712  df-op 3714  df-uni 3931  df-int 3966  df-iun 4009  df-br 4126  df-opab 4188  df-mpt 4189  df-tr 4225  df-id 4433  df-po 4436  df-iso 4437  df-iord 4506  df-on 4508  df-ilim 4509  df-suc 4511  df-iom 4733  df-xp 4775  df-rel 4776  df-cnv 4777  df-co 4778  df-dm 4779  df-rn 4780  df-res 4781  df-ima 4782  df-iota 5332  df-fun 5374  df-fn 5375  df-f 5376  df-f1 5377  df-fo 5378  df-f1o 5379  df-fv 5380  df-riota 6028  df-ov 6078  df-oprab 6079  df-mpo 6080  df-1st 6364  df-2nd 6365  df-recs 6566  df-irdg 6631  df-frec 6652  df-1o 6677  df-oadd 6681  df-er 6797  df-map 6914  df-en 7013  df-dom 7014  df-fin 7015  df-pnf 8352  df-mnf 8353  df-xr 8354  df-ltxr 8355  df-le 8356  df-sub 8489  df-neg 8490  df-reap 8893  df-ap 8900  df-div 8993  df-inn 9284  df-n0 9543  df-z 9624  df-uz 9901  df-q 9999  df-fz 10391  df-seqfrec 10863  df-fac 11142  df-bc 11164  df-ihash 11193
This theorem is referenced by:  hashfac  11266
  Copyright terms: Public domain W3C validator