Metamath Proof Explorer


Theorem fvmptnn04ifc

Description: The function value of a mapping from the nonnegative integers with four distinct cases for the third case. (Contributed by AV, 10-Nov-2019)

Ref Expression
Hypotheses fvmptnn04if.g G=n0ifn=0Aifn=SCifS<nDB
fvmptnn04if.s φS
fvmptnn04if.n φN0
Assertion fvmptnn04ifc φN=SN/nCVGN=N/nC

Proof

Step Hyp Ref Expression
1 fvmptnn04if.g G=n0ifn=0Aifn=SCifS<nDB
2 fvmptnn04if.s φS
3 fvmptnn04if.n φN0
4 2 3ad2ant1 φN=SN/nCVS
5 3 3ad2ant1 φN=SN/nCVN0
6 simp3 φN=SN/nCVN/nCV
7 nnne0 SS0
8 7 neneqd S¬S=0
9 2 8 syl φ¬S=0
10 9 adantr φN=S¬S=0
11 eqeq1 N=SN=0S=0
12 11 notbid N=S¬N=0¬S=0
13 12 adantl φN=S¬N=0¬S=0
14 10 13 mpbird φN=S¬N=0
15 14 3adant3 φN=SN/nCV¬N=0
16 15 pm2.21d φN=SN/nCVN=0N/nC=N/nA
17 16 imp φN=SN/nCVN=0N/nC=N/nA
18 3 nn0red φN
19 2 nnred φS
20 18 19 lttri3d φN=S¬N<S¬S<N
21 20 simprbda φN=S¬N<S
22 21 pm2.21d φN=SN<SN/nC=N/nB
23 22 3adant3 φN=SN/nCVN<SN/nC=N/nB
24 23 a1d φN=SN/nCV0<NN<SN/nC=N/nB
25 24 3imp φN=SN/nCV0<NN<SN/nC=N/nB
26 eqidd φN=SN/nCVN=SN/nC=N/nC
27 20 simplbda φN=S¬S<N
28 27 3adant3 φN=SN/nCV¬S<N
29 28 pm2.21d φN=SN/nCVS<NN/nC=N/nD
30 29 imp φN=SN/nCVS<NN/nC=N/nD
31 1 4 5 6 17 25 26 30 fvmptnn04if φN=SN/nCVGN=N/nC