Metamath Proof Explorer


Theorem pfxccatin12lem1

Description: Lemma 1 for pfxccatin12 . (Contributed by AV, 30-Mar-2018) (Revised by AV, 9-May-2020)

Ref Expression
Assertion pfxccatin12lem1 M0LNLXK0..^NM¬K0..^LMKLM0..^NL

Proof

Step Hyp Ref Expression
1 elfz2 M0L0LM0MML
2 zsubcl LMLM
3 2 3adant1 0LMLM
4 3 adantr 0LM0MMLLM
5 1 4 sylbi M0LLM
6 5 adantr M0LNLXLM
7 elfzonelfzo LMK0..^NM¬K0..^LMKLM..^NM
8 6 7 syl M0LNLXK0..^NM¬K0..^LMKLM..^NM
9 elfz2nn0 M0LM0L0ML
10 nn0cn M0M
11 nn0cn L0L
12 elfzelz NLXN
13 zcn NN
14 subcl LMLM
15 14 ancoms MLLM
16 15 addridd MLL-M+0=LM
17 16 eqcomd MLLM=L-M+0
18 17 adantl NMLLM=L-M+0
19 simprr NMLL
20 simpl MLM
21 20 adantl NMLM
22 simpl NMLN
23 19 21 22 npncan3d NMLLM+N-L=NM
24 23 eqcomd NMLNM=LM+N-L
25 18 24 oveq12d NMLLM..^NM=L-M+0..^LM+N-L
26 25 ex NMLLM..^NM=L-M+0..^LM+N-L
27 12 13 26 3syl NLXMLLM..^NM=L-M+0..^LM+N-L
28 27 com12 MLNLXLM..^NM=L-M+0..^LM+N-L
29 10 11 28 syl2an M0L0NLXLM..^NM=L-M+0..^LM+N-L
30 29 3adant3 M0L0MLNLXLM..^NM=L-M+0..^LM+N-L
31 9 30 sylbi M0LNLXLM..^NM=L-M+0..^LM+N-L
32 31 imp M0LNLXLM..^NM=L-M+0..^LM+N-L
33 32 eleq2d M0LNLXKLM..^NMKL-M+0..^LM+N-L
34 33 biimpa M0LNLXKLM..^NMKL-M+0..^LM+N-L
35 0zd M0LNLX0
36 elfz2 NLXLXNLNNX
37 zsubcl NLNL
38 37 ancoms LNNL
39 38 3adant2 LXNNL
40 39 adantr LXNLNNXNL
41 36 40 sylbi NLXNL
42 41 adantl M0LNLXNL
43 6 35 42 3jca M0LNLXLM0NL
44 43 adantr M0LNLXKLM..^NMLM0NL
45 fzosubel2 KL-M+0..^LM+N-LLM0NLKLM0..^NL
46 34 44 45 syl2anc M0LNLXKLM..^NMKLM0..^NL
47 46 ex M0LNLXKLM..^NMKLM0..^NL
48 8 47 syld M0LNLXK0..^NM¬K0..^LMKLM0..^NL