Theorem fac0 14400

Description: The factorial of 0. (Contributed by NM, 2-Dec-2004.) (Revised by Mario Carneiro, 13-Jul-2013.)

Assertion

Ref	Expression
fac0	⊢ (!‘0) = 1

Proof of Theorem fac0

Step	Hyp	Ref	Expression
1		c0ex 11281	. . . 4 ⊢ 0 ∈ V
2	1	a1i 11	. . 3 ⊢ (⊤ → 0 ∈ V)
3		1ex 11284	. . . 4 ⊢ 1 ∈ V
4	3	a1i 11	. . 3 ⊢ (⊤ → 1 ∈ V)
5		df-fac 14398	. . . 4 ⊢ ! = ({⟨0, 1⟩} ∪ seq1( · , I ))
6		nnuz 12985	. . . . . . . 8 ⊢ ℕ = (ℤ≥‘1)
7		dfn2 12600	. . . . . . . 8 ⊢ ℕ = (ℕ0 ∖ {0})
8	6, 7	eqtr3i 2786	. . . . . . 7 ⊢ (ℤ≥‘1) = (ℕ0 ∖ {0})
9	8	reseq2i 5967	. . . . . 6 ⊢ (seq1( · , I ) ↾ (ℤ≥‘1)) = (seq1( · , I ) ↾ (ℕ0 ∖ {0}))
10		1z 12707	. . . . . . 7 ⊢ 1 ∈ ℤ
11		seqfn 14136	. . . . . . 7 ⊢ (1 ∈ ℤ → seq1( · , I ) Fn (ℤ≥‘1))
12		fnresdm 6650	. . . . . . 7 ⊢ (seq1( · , I ) Fn (ℤ≥‘1) → (seq1( · , I ) ↾ (ℤ≥‘1)) = seq1( · , I ))
13	10, 11, 12	mp2b 10	. . . . . 6 ⊢ (seq1( · , I ) ↾ (ℤ≥‘1)) = seq1( · , I )
14	9, 13	eqtr3i 2786	. . . . 5 ⊢ (seq1( · , I ) ↾ (ℕ0 ∖ {0})) = seq1( · , I )
15	14	uneq2i 4112	. . . 4 ⊢ ({⟨0, 1⟩} ∪ (seq1( · , I ) ↾ (ℕ0 ∖ {0}))) = ({⟨0, 1⟩} ∪ seq1( · , I ))
16	5, 15	eqtr4i 2787	. . 3 ⊢ ! = ({⟨0, 1⟩} ∪ (seq1( · , I ) ↾ (ℕ0 ∖ {0})))
17	2, 4, 16	fvsnun1 7179	. 2 ⊢ (⊤ → (!‘0) = 1)
18	17	mptru 1577	1 ⊢ (!‘0) = 1

This proof depends on syntax axioms:   = wceq 1570  ⊤wtru 1571   ∈ wcel 2145  Vcvv 3451   ∖ cdif 3896   ∪ cun 3897  {csn 4584  ⟨cop 4590   I cid 5545   ↾ cres 5653   Fn wfn 6526  ‘cfv 6531  0cc0 11181  1c1 11182   · cmul 11186  ℕcn 12316  ℕ₀cn0 12587  ℤcz 12674  ℤ_≥cuz 12946  seqcseq 14124  !cfa 14397

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 2147  ax-9 2155  ax-10 2178  ax-11 2194  ax-12 2213  ax-ext 2733  ax-sep 5249  ax-nul 5260  ax-pow 5327  ax-pr 5391  ax-un 7740  ax-cnex 11237  ax-resscn 11238  ax-1cn 11239  ax-icn 11240  ax-addcl 11241  ax-addrcl 11242  ax-mulcl 11243  ax-mulrcl 11244  ax-mulcom 11245  ax-addass 11246  ax-mulass 11247  ax-distr 11248  ax-i2m1 11249  ax-1ne0 11250  ax-1rid 11251  ax-rnegex 11252  ax-rrecex 11253  ax-cnre 11254  ax-pre-lttri 11255  ax-pre-lttrn 11256  ax-pre-ltadd 11257  ax-pre-mulgt0 11258

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 2565  df-eu 2595  df-clab 2740  df-cleq 2753  df-clel 2836  df-nfc 2910  df-ne 2957  df-nel 3063  df-ral 3078  df-rex 3088  df-reu 3367  df-rab 3414  df-v 3453  df-sbc 3740  df-csb 3848  df-dif 3902  df-un 3904  df-in 3906  df-ss 3916  df-pss 3919  df-nul 4280  df-if 4483  df-pw 4559  df-sn 4585  df-pr 4587  df-op 4591  df-uni 4868  df-iun 4953  df-br 5104  df-opab 5168  df-mpt 5187  df-tr 5213  df-id 5546  df-eprel 5551  df-po 5559  df-so 5560  df-fr 5604  df-we 5606  df-xp 5657  df-rel 5658  df-cnv 5659  df-co 5660  df-dm 5661  df-rn 5662  df-res 5663  df-ima 5664  df-pred 6297  df-ord 6358  df-on 6359  df-lim 6360  df-suc 6361  df-iota 6487  df-fun 6533  df-fn 6534  df-f 6535  df-f1 6536  df-fo 6537  df-f1o 6538  df-fv 6539  df-riota 7369  df-ov 7415  df-oprab 7416  df-mpo 7417  df-om 7867  df-2nd 7991  df-frecs 8283  df-wrecs 8314  df-recs 8363  df-rdg 8402  df-er 8701  df-en 8958  df-dom 8959  df-sdom 8960  df-pnf 11326  df-mnf 11327  df-xr 11328  df-ltxr 11329  df-le 11330  df-sub 11524  df-neg 11525  df-nn 12317  df-n0 12588  df-z 12675  df-uz 12947  df-seq 14125  df-fac 14398

This theorem is used by:  facp1  14402  faccl  14407  facwordi  14413  faclbnd  14414  faclbnd4lem3  14419  facubnd  14424  bcn0  14434  bcval5  14442  hashf1  14582  fprodfac  16120  fallfacfac  16191  ef0lem  16224  ege2le3  16236  eft0val  16260  prmfac1  16876  pcfac  17057  tayl0  26671  logfac  26911  advlogexp  26965  facgam  27375  logexprlim  27534  subfacval2  35921  faclim  36480  bccn0  45286  mccl  46554  dvnxpaek  46896  dvnprodlem3  46902  etransclem14  47202  etransclem24  47212  etransclem25  47213  etransclem35  47223