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

Theorem eupth2lemsfi 16460
Description: Lemma for eupth2fi 16461 (induction step): The only vertices of odd degree in a graph with an Eulerian path are the endpoints, and then only if the endpoints are distinct, if the Eulerian path shortened by one edge has this property. (Contributed by Mario Carneiro, 8-Apr-2015.) (Revised by AV, 26-Feb-2021.)
Hypotheses
Ref Expression
eupth2.v  |-  V  =  (Vtx `  G )
eupth2.i  |-  I  =  (iEdg `  G )
eupth2fi.g  |-  ( ph  ->  G  e. UMGraph )
eupth2.f  |-  ( ph  ->  Fun  I )
eupth2.p  |-  ( ph  ->  F (EulerPaths `  G
) P )
eupth2fi.fi  |-  ( ph  ->  V  e.  Fin )
Assertion
Ref Expression
eupth2lemsfi  |-  ( (
ph  /\  n  e.  NN0 )  ->  ( (
n  <_  ( `  F
)  ->  { x  e.  V  |  -.  2  ||  ( (VtxDeg `  <. V ,  ( I  |`  ( F " (
0..^ n ) ) ) >. ) `  x
) }  =  if ( ( P ` 
0 )  =  ( P `  n ) ,  (/) ,  { ( P `  0 ) ,  ( P `  n ) } ) )  ->  ( (
n  +  1 )  <_  ( `  F )  ->  { x  e.  V  |  -.  2  ||  (
(VtxDeg `  <. V , 
( I  |`  ( F " ( 0..^ ( n  +  1 ) ) ) ) >.
) `  x ) }  =  if (
( P `  0
)  =  ( P `
 ( n  + 
1 ) ) ,  (/) ,  { ( P `
 0 ) ,  ( P `  (
n  +  1 ) ) } ) ) ) )
Distinct variable groups:    ph, x    x, F    x, I    x, V   
x, n
Allowed substitution hints:    ph( n)    P( x, n)    F( n)    G( x, n)    I( n)    V( n)

Proof of Theorem eupth2lemsfi
Dummy variable  y is distinct from all other variables.
StepHypRef Expression
1 nn0re 9501 . . . . . 6  |-  ( n  e.  NN0  ->  n  e.  RR )
21adantl 277 . . . . 5  |-  ( (
ph  /\  n  e.  NN0 )  ->  n  e.  RR )
32lep1d 9201 . . . 4  |-  ( (
ph  /\  n  e.  NN0 )  ->  n  <_  ( n  +  1 ) )
4 peano2re 8405 . . . . . 6  |-  ( n  e.  RR  ->  (
n  +  1 )  e.  RR )
52, 4syl 14 . . . . 5  |-  ( (
ph  /\  n  e.  NN0 )  ->  ( n  +  1 )  e.  RR )
6 eupth2.p . . . . . . . 8  |-  ( ph  ->  F (EulerPaths `  G
) P )
7 eupthiswlk 16437 . . . . . . . 8  |-  ( F (EulerPaths `  G ) P  ->  F (Walks `  G ) P )
8 wlkcl 16314 . . . . . . . 8  |-  ( F (Walks `  G ) P  ->  ( `  F )  e.  NN0 )
96, 7, 83syl 17 . . . . . . 7  |-  ( ph  ->  ( `  F )  e.  NN0 )
109nn0red 9550 . . . . . 6  |-  ( ph  ->  ( `  F )  e.  RR )
1110adantr 276 . . . . 5  |-  ( (
ph  /\  n  e.  NN0 )  ->  ( `  F
)  e.  RR )
12 letr 8352 . . . . 5  |-  ( ( n  e.  RR  /\  ( n  +  1
)  e.  RR  /\  ( `  F )  e.  RR )  ->  (
( n  <_  (
n  +  1 )  /\  ( n  + 
1 )  <_  ( `  F ) )  ->  n  <_  ( `  F )
) )
132, 5, 11, 12syl3anc 1274 . . . 4  |-  ( (
ph  /\  n  e.  NN0 )  ->  ( (
n  <_  ( n  +  1 )  /\  ( n  +  1
)  <_  ( `  F
) )  ->  n  <_  ( `  F )
) )
143, 13mpand 429 . . 3  |-  ( (
ph  /\  n  e.  NN0 )  ->  ( (
n  +  1 )  <_  ( `  F )  ->  n  <_  ( `  F
) ) )
1514imim1d 75 . 2  |-  ( (
ph  /\  n  e.  NN0 )  ->  ( (
n  <_  ( `  F
)  ->  { x  e.  V  |  -.  2  ||  ( (VtxDeg `  <. V ,  ( I  |`  ( F " (
0..^ n ) ) ) >. ) `  x
) }  =  if ( ( P ` 
0 )  =  ( P `  n ) ,  (/) ,  { ( P `  0 ) ,  ( P `  n ) } ) )  ->  ( (
n  +  1 )  <_  ( `  F )  ->  { x  e.  V  |  -.  2  ||  (
(VtxDeg `  <. V , 
( I  |`  ( F " ( 0..^ n ) ) ) >.
) `  x ) }  =  if (
( P `  0
)  =  ( P `
 n ) ,  (/) ,  { ( P `
 0 ) ,  ( P `  n
) } ) ) ) )
16 fveq2 5669 . . . . . . . . 9  |-  ( x  =  y  ->  (
(VtxDeg `  <. V , 
( I  |`  ( F " ( 0..^ ( n  +  1 ) ) ) ) >.
) `  x )  =  ( (VtxDeg `  <. V ,  ( I  |`  ( F " (
0..^ ( n  + 
1 ) ) ) ) >. ) `  y
) )
1716breq2d 4120 . . . . . . . 8  |-  ( x  =  y  ->  (
2  ||  ( (VtxDeg ` 
<. V ,  ( I  |`  ( F " (
0..^ ( n  + 
1 ) ) ) ) >. ) `  x
)  <->  2  ||  (
(VtxDeg `  <. V , 
( I  |`  ( F " ( 0..^ ( n  +  1 ) ) ) ) >.
) `  y )
) )
1817notbid 673 . . . . . . 7  |-  ( x  =  y  ->  ( -.  2  ||  ( (VtxDeg `  <. V ,  ( I  |`  ( F " ( 0..^ ( n  +  1 ) ) ) ) >. ) `  x )  <->  -.  2  ||  ( (VtxDeg `  <. V ,  ( I  |`  ( F " ( 0..^ ( n  +  1 ) ) ) )
>. ) `  y ) ) )
1918elrab 2972 . . . . . 6  |-  ( y  e.  { x  e.  V  |  -.  2  ||  ( (VtxDeg `  <. V ,  ( I  |`  ( F " ( 0..^ ( n  +  1 ) ) ) )
>. ) `  x ) }  <->  ( y  e.  V  /\  -.  2  ||  ( (VtxDeg `  <. V ,  ( I  |`  ( F " ( 0..^ ( n  +  1 ) ) ) )
>. ) `  y ) ) )
20 eupth2.v . . . . . . . . 9  |-  V  =  (Vtx `  G )
21 eupth2.i . . . . . . . . 9  |-  I  =  (iEdg `  G )
22 eupth2fi.g . . . . . . . . . 10  |-  ( ph  ->  G  e. UMGraph )
2322ad3antrrr 492 . . . . . . . . 9  |-  ( ( ( ( ph  /\  n  e.  NN0 )  /\  ( ( n  + 
1 )  <_  ( `  F )  /\  {
x  e.  V  |  -.  2  ||  ( (VtxDeg `  <. V ,  ( I  |`  ( F " ( 0..^ n ) ) ) >. ) `  x ) }  =  if ( ( P ` 
0 )  =  ( P `  n ) ,  (/) ,  { ( P `  0 ) ,  ( P `  n ) } ) ) )  /\  y  e.  V )  ->  G  e. UMGraph )
24 eupth2.f . . . . . . . . . 10  |-  ( ph  ->  Fun  I )
2524ad3antrrr 492 . . . . . . . . 9  |-  ( ( ( ( ph  /\  n  e.  NN0 )  /\  ( ( n  + 
1 )  <_  ( `  F )  /\  {
x  e.  V  |  -.  2  ||  ( (VtxDeg `  <. V ,  ( I  |`  ( F " ( 0..^ n ) ) ) >. ) `  x ) }  =  if ( ( P ` 
0 )  =  ( P `  n ) ,  (/) ,  { ( P `  0 ) ,  ( P `  n ) } ) ) )  /\  y  e.  V )  ->  Fun  I )
266ad3antrrr 492 . . . . . . . . 9  |-  ( ( ( ( ph  /\  n  e.  NN0 )  /\  ( ( n  + 
1 )  <_  ( `  F )  /\  {
x  e.  V  |  -.  2  ||  ( (VtxDeg `  <. V ,  ( I  |`  ( F " ( 0..^ n ) ) ) >. ) `  x ) }  =  if ( ( P ` 
0 )  =  ( P `  n ) ,  (/) ,  { ( P `  0 ) ,  ( P `  n ) } ) ) )  /\  y  e.  V )  ->  F
(EulerPaths `  G ) P )
27 eupth2fi.fi . . . . . . . . . 10  |-  ( ph  ->  V  e.  Fin )
2827ad3antrrr 492 . . . . . . . . 9  |-  ( ( ( ( ph  /\  n  e.  NN0 )  /\  ( ( n  + 
1 )  <_  ( `  F )  /\  {
x  e.  V  |  -.  2  ||  ( (VtxDeg `  <. V ,  ( I  |`  ( F " ( 0..^ n ) ) ) >. ) `  x ) }  =  if ( ( P ` 
0 )  =  ( P `  n ) ,  (/) ,  { ( P `  0 ) ,  ( P `  n ) } ) ) )  /\  y  e.  V )  ->  V  e.  Fin )
29 eqid 2232 . . . . . . . . 9  |-  <. V , 
( I  |`  ( F " ( 0..^ n ) ) ) >.  =  <. V ,  ( I  |`  ( F " ( 0..^ n ) ) ) >.
30 eqid 2232 . . . . . . . . 9  |-  <. V , 
( I  |`  ( F " ( 0..^ ( n  +  1 ) ) ) ) >.  =  <. V ,  ( I  |`  ( F " ( 0..^ ( n  +  1 ) ) ) ) >.
31 simpr 110 . . . . . . . . . 10  |-  ( (
ph  /\  n  e.  NN0 )  ->  n  e.  NN0 )
3231ad2antrr 488 . . . . . . . . 9  |-  ( ( ( ( ph  /\  n  e.  NN0 )  /\  ( ( n  + 
1 )  <_  ( `  F )  /\  {
x  e.  V  |  -.  2  ||  ( (VtxDeg `  <. V ,  ( I  |`  ( F " ( 0..^ n ) ) ) >. ) `  x ) }  =  if ( ( P ` 
0 )  =  ( P `  n ) ,  (/) ,  { ( P `  0 ) ,  ( P `  n ) } ) ) )  /\  y  e.  V )  ->  n  e.  NN0 )
33 simprl 531 . . . . . . . . . 10  |-  ( ( ( ph  /\  n  e.  NN0 )  /\  (
( n  +  1 )  <_  ( `  F
)  /\  { x  e.  V  |  -.  2  ||  ( (VtxDeg `  <. V ,  ( I  |`  ( F " (
0..^ n ) ) ) >. ) `  x
) }  =  if ( ( P ` 
0 )  =  ( P `  n ) ,  (/) ,  { ( P `  0 ) ,  ( P `  n ) } ) ) )  ->  (
n  +  1 )  <_  ( `  F )
)
3433adantr 276 . . . . . . . . 9  |-  ( ( ( ( ph  /\  n  e.  NN0 )  /\  ( ( n  + 
1 )  <_  ( `  F )  /\  {
x  e.  V  |  -.  2  ||  ( (VtxDeg `  <. V ,  ( I  |`  ( F " ( 0..^ n ) ) ) >. ) `  x ) }  =  if ( ( P ` 
0 )  =  ( P `  n ) ,  (/) ,  { ( P `  0 ) ,  ( P `  n ) } ) ) )  /\  y  e.  V )  ->  (
n  +  1 )  <_  ( `  F )
)
35 simpr 110 . . . . . . . . 9  |-  ( ( ( ( ph  /\  n  e.  NN0 )  /\  ( ( n  + 
1 )  <_  ( `  F )  /\  {
x  e.  V  |  -.  2  ||  ( (VtxDeg `  <. V ,  ( I  |`  ( F " ( 0..^ n ) ) ) >. ) `  x ) }  =  if ( ( P ` 
0 )  =  ( P `  n ) ,  (/) ,  { ( P `  0 ) ,  ( P `  n ) } ) ) )  /\  y  e.  V )  ->  y  e.  V )
36 simplrr 538 . . . . . . . . 9  |-  ( ( ( ( ph  /\  n  e.  NN0 )  /\  ( ( n  + 
1 )  <_  ( `  F )  /\  {
x  e.  V  |  -.  2  ||  ( (VtxDeg `  <. V ,  ( I  |`  ( F " ( 0..^ n ) ) ) >. ) `  x ) }  =  if ( ( P ` 
0 )  =  ( P `  n ) ,  (/) ,  { ( P `  0 ) ,  ( P `  n ) } ) ) )  /\  y  e.  V )  ->  { x  e.  V  |  -.  2  ||  ( (VtxDeg `  <. V ,  ( I  |`  ( F " (
0..^ n ) ) ) >. ) `  x
) }  =  if ( ( P ` 
0 )  =  ( P `  n ) ,  (/) ,  { ( P `  0 ) ,  ( P `  n ) } ) )
3720, 21, 23, 25, 26, 28, 29, 30, 32, 34, 35, 36eupth2lem3fi 16458 . . . . . . . 8  |-  ( ( ( ( ph  /\  n  e.  NN0 )  /\  ( ( n  + 
1 )  <_  ( `  F )  /\  {
x  e.  V  |  -.  2  ||  ( (VtxDeg `  <. V ,  ( I  |`  ( F " ( 0..^ n ) ) ) >. ) `  x ) }  =  if ( ( P ` 
0 )  =  ( P `  n ) ,  (/) ,  { ( P `  0 ) ,  ( P `  n ) } ) ) )  /\  y  e.  V )  ->  ( -.  2  ||  ( (VtxDeg `  <. V ,  ( I  |`  ( F " ( 0..^ ( n  +  1 ) ) ) ) >. ) `  y )  <->  y  e.  if ( ( P ` 
0 )  =  ( P `  ( n  +  1 ) ) ,  (/) ,  { ( P `  0 ) ,  ( P `  ( n  +  1
) ) } ) ) )
3837pm5.32da 452 . . . . . . 7  |-  ( ( ( ph  /\  n  e.  NN0 )  /\  (
( n  +  1 )  <_  ( `  F
)  /\  { x  e.  V  |  -.  2  ||  ( (VtxDeg `  <. V ,  ( I  |`  ( F " (
0..^ n ) ) ) >. ) `  x
) }  =  if ( ( P ` 
0 )  =  ( P `  n ) ,  (/) ,  { ( P `  0 ) ,  ( P `  n ) } ) ) )  ->  (
( y  e.  V  /\  -.  2  ||  (
(VtxDeg `  <. V , 
( I  |`  ( F " ( 0..^ ( n  +  1 ) ) ) ) >.
) `  y )
)  <->  ( y  e.  V  /\  y  e.  if ( ( P `
 0 )  =  ( P `  (
n  +  1 ) ) ,  (/) ,  {
( P `  0
) ,  ( P `
 ( n  + 
1 ) ) } ) ) ) )
39 0elpw 4276 . . . . . . . . . . . 12  |-  (/)  e.  ~P V
4039a1i 9 . . . . . . . . . . 11  |-  ( ( ( ph  /\  n  e.  NN0 )  /\  (
( n  +  1 )  <_  ( `  F
)  /\  { x  e.  V  |  -.  2  ||  ( (VtxDeg `  <. V ,  ( I  |`  ( F " (
0..^ n ) ) ) >. ) `  x
) }  =  if ( ( P ` 
0 )  =  ( P `  n ) ,  (/) ,  { ( P `  0 ) ,  ( P `  n ) } ) ) )  ->  (/)  e.  ~P V )
4120wlkepvtx 16357 . . . . . . . . . . . . . . . 16  |-  ( F (Walks `  G ) P  ->  ( ( P `
 0 )  e.  V  /\  ( P `
 ( `  F
) )  e.  V
) )
4241simpld 112 . . . . . . . . . . . . . . 15  |-  ( F (Walks `  G ) P  ->  ( P ` 
0 )  e.  V
)
436, 7, 423syl 17 . . . . . . . . . . . . . 14  |-  ( ph  ->  ( P `  0
)  e.  V )
4443ad2antrr 488 . . . . . . . . . . . . 13  |-  ( ( ( ph  /\  n  e.  NN0 )  /\  (
( n  +  1 )  <_  ( `  F
)  /\  { x  e.  V  |  -.  2  ||  ( (VtxDeg `  <. V ,  ( I  |`  ( F " (
0..^ n ) ) ) >. ) `  x
) }  =  if ( ( P ` 
0 )  =  ( P `  n ) ,  (/) ,  { ( P `  0 ) ,  ( P `  n ) } ) ) )  ->  ( P `  0 )  e.  V )
4520wlkp 16316 . . . . . . . . . . . . . . . 16  |-  ( F (Walks `  G ) P  ->  P : ( 0 ... ( `  F
) ) --> V )
466, 7, 453syl 17 . . . . . . . . . . . . . . 15  |-  ( ph  ->  P : ( 0 ... ( `  F
) ) --> V )
4746ad2antrr 488 . . . . . . . . . . . . . 14  |-  ( ( ( ph  /\  n  e.  NN0 )  /\  (
( n  +  1 )  <_  ( `  F
)  /\  { x  e.  V  |  -.  2  ||  ( (VtxDeg `  <. V ,  ( I  |`  ( F " (
0..^ n ) ) ) >. ) `  x
) }  =  if ( ( P ` 
0 )  =  ( P `  n ) ,  (/) ,  { ( P `  0 ) ,  ( P `  n ) } ) ) )  ->  P : ( 0 ... ( `  F )
) --> V )
48 peano2nn0 9532 . . . . . . . . . . . . . . . . . . 19  |-  ( n  e.  NN0  ->  ( n  +  1 )  e. 
NN0 )
4948adantl 277 . . . . . . . . . . . . . . . . . 18  |-  ( (
ph  /\  n  e.  NN0 )  ->  ( n  +  1 )  e. 
NN0 )
5049adantr 276 . . . . . . . . . . . . . . . . 17  |-  ( ( ( ph  /\  n  e.  NN0 )  /\  (
( n  +  1 )  <_  ( `  F
)  /\  { x  e.  V  |  -.  2  ||  ( (VtxDeg `  <. V ,  ( I  |`  ( F " (
0..^ n ) ) ) >. ) `  x
) }  =  if ( ( P ` 
0 )  =  ( P `  n ) ,  (/) ,  { ( P `  0 ) ,  ( P `  n ) } ) ) )  ->  (
n  +  1 )  e.  NN0 )
51 nn0uz 9885 . . . . . . . . . . . . . . . . 17  |-  NN0  =  ( ZZ>= `  0 )
5250, 51eleqtrdi 2325 . . . . . . . . . . . . . . . 16  |-  ( ( ( ph  /\  n  e.  NN0 )  /\  (
( n  +  1 )  <_  ( `  F
)  /\  { x  e.  V  |  -.  2  ||  ( (VtxDeg `  <. V ,  ( I  |`  ( F " (
0..^ n ) ) ) >. ) `  x
) }  =  if ( ( P ` 
0 )  =  ( P `  n ) ,  (/) ,  { ( P `  0 ) ,  ( P `  n ) } ) ) )  ->  (
n  +  1 )  e.  ( ZZ>= `  0
) )
539ad2antrr 488 . . . . . . . . . . . . . . . . 17  |-  ( ( ( ph  /\  n  e.  NN0 )  /\  (
( n  +  1 )  <_  ( `  F
)  /\  { x  e.  V  |  -.  2  ||  ( (VtxDeg `  <. V ,  ( I  |`  ( F " (
0..^ n ) ) ) >. ) `  x
) }  =  if ( ( P ` 
0 )  =  ( P `  n ) ,  (/) ,  { ( P `  0 ) ,  ( P `  n ) } ) ) )  ->  ( `  F )  e.  NN0 )
5453nn0zd 9694 . . . . . . . . . . . . . . . 16  |-  ( ( ( ph  /\  n  e.  NN0 )  /\  (
( n  +  1 )  <_  ( `  F
)  /\  { x  e.  V  |  -.  2  ||  ( (VtxDeg `  <. V ,  ( I  |`  ( F " (
0..^ n ) ) ) >. ) `  x
) }  =  if ( ( P ` 
0 )  =  ( P `  n ) ,  (/) ,  { ( P `  0 ) ,  ( P `  n ) } ) ) )  ->  ( `  F )  e.  ZZ )
55 elfz5 10347 . . . . . . . . . . . . . . . 16  |-  ( ( ( n  +  1 )  e.  ( ZZ>= ` 
0 )  /\  ( `  F )  e.  ZZ )  ->  ( ( n  +  1 )  e.  ( 0 ... ( `  F ) )  <->  ( n  +  1 )  <_ 
( `  F ) ) )
5652, 54, 55syl2anc 411 . . . . . . . . . . . . . . 15  |-  ( ( ( ph  /\  n  e.  NN0 )  /\  (
( n  +  1 )  <_  ( `  F
)  /\  { x  e.  V  |  -.  2  ||  ( (VtxDeg `  <. V ,  ( I  |`  ( F " (
0..^ n ) ) ) >. ) `  x
) }  =  if ( ( P ` 
0 )  =  ( P `  n ) ,  (/) ,  { ( P `  0 ) ,  ( P `  n ) } ) ) )  ->  (
( n  +  1 )  e.  ( 0 ... ( `  F
) )  <->  ( n  +  1 )  <_ 
( `  F ) ) )
5733, 56mpbird 167 . . . . . . . . . . . . . 14  |-  ( ( ( ph  /\  n  e.  NN0 )  /\  (
( n  +  1 )  <_  ( `  F
)  /\  { x  e.  V  |  -.  2  ||  ( (VtxDeg `  <. V ,  ( I  |`  ( F " (
0..^ n ) ) ) >. ) `  x
) }  =  if ( ( P ` 
0 )  =  ( P `  n ) ,  (/) ,  { ( P `  0 ) ,  ( P `  n ) } ) ) )  ->  (
n  +  1 )  e.  ( 0 ... ( `  F )
) )
5847, 57ffvelcdmd 5812 . . . . . . . . . . . . 13  |-  ( ( ( ph  /\  n  e.  NN0 )  /\  (
( n  +  1 )  <_  ( `  F
)  /\  { x  e.  V  |  -.  2  ||  ( (VtxDeg `  <. V ,  ( I  |`  ( F " (
0..^ n ) ) ) >. ) `  x
) }  =  if ( ( P ` 
0 )  =  ( P `  n ) ,  (/) ,  { ( P `  0 ) ,  ( P `  n ) } ) ) )  ->  ( P `  ( n  +  1 ) )  e.  V )
5944, 58prssd 3852 . . . . . . . . . . . 12  |-  ( ( ( ph  /\  n  e.  NN0 )  /\  (
( n  +  1 )  <_  ( `  F
)  /\  { x  e.  V  |  -.  2  ||  ( (VtxDeg `  <. V ,  ( I  |`  ( F " (
0..^ n ) ) ) >. ) `  x
) }  =  if ( ( P ` 
0 )  =  ( P `  n ) ,  (/) ,  { ( P `  0 ) ,  ( P `  n ) } ) ) )  ->  { ( P `  0 ) ,  ( P `  ( n  +  1
) ) }  C_  V )
60 prexg 4324 . . . . . . . . . . . . . 14  |-  ( ( ( P `  0
)  e.  V  /\  ( P `  ( n  +  1 ) )  e.  V )  ->  { ( P ` 
0 ) ,  ( P `  ( n  +  1 ) ) }  e.  _V )
6144, 58, 60syl2anc 411 . . . . . . . . . . . . 13  |-  ( ( ( ph  /\  n  e.  NN0 )  /\  (
( n  +  1 )  <_  ( `  F
)  /\  { x  e.  V  |  -.  2  ||  ( (VtxDeg `  <. V ,  ( I  |`  ( F " (
0..^ n ) ) ) >. ) `  x
) }  =  if ( ( P ` 
0 )  =  ( P `  n ) ,  (/) ,  { ( P `  0 ) ,  ( P `  n ) } ) ) )  ->  { ( P `  0 ) ,  ( P `  ( n  +  1
) ) }  e.  _V )
62 elpwg 3676 . . . . . . . . . . . . 13  |-  ( { ( P `  0
) ,  ( P `
 ( n  + 
1 ) ) }  e.  _V  ->  ( { ( P ` 
0 ) ,  ( P `  ( n  +  1 ) ) }  e.  ~P V  <->  { ( P `  0
) ,  ( P `
 ( n  + 
1 ) ) } 
C_  V ) )
6361, 62syl 14 . . . . . . . . . . . 12  |-  ( ( ( ph  /\  n  e.  NN0 )  /\  (
( n  +  1 )  <_  ( `  F
)  /\  { x  e.  V  |  -.  2  ||  ( (VtxDeg `  <. V ,  ( I  |`  ( F " (
0..^ n ) ) ) >. ) `  x
) }  =  if ( ( P ` 
0 )  =  ( P `  n ) ,  (/) ,  { ( P `  0 ) ,  ( P `  n ) } ) ) )  ->  ( { ( P ` 
0 ) ,  ( P `  ( n  +  1 ) ) }  e.  ~P V  <->  { ( P `  0
) ,  ( P `
 ( n  + 
1 ) ) } 
C_  V ) )
6459, 63mpbird 167 . . . . . . . . . . 11  |-  ( ( ( ph  /\  n  e.  NN0 )  /\  (
( n  +  1 )  <_  ( `  F
)  /\  { x  e.  V  |  -.  2  ||  ( (VtxDeg `  <. V ,  ( I  |`  ( F " (
0..^ n ) ) ) >. ) `  x
) }  =  if ( ( P ` 
0 )  =  ( P `  n ) ,  (/) ,  { ( P `  0 ) ,  ( P `  n ) } ) ) )  ->  { ( P `  0 ) ,  ( P `  ( n  +  1
) ) }  e.  ~P V )
6527ad2antrr 488 . . . . . . . . . . . 12  |-  ( ( ( ph  /\  n  e.  NN0 )  /\  (
( n  +  1 )  <_  ( `  F
)  /\  { x  e.  V  |  -.  2  ||  ( (VtxDeg `  <. V ,  ( I  |`  ( F " (
0..^ n ) ) ) >. ) `  x
) }  =  if ( ( P ` 
0 )  =  ( P `  n ) ,  (/) ,  { ( P `  0 ) ,  ( P `  n ) } ) ) )  ->  V  e.  Fin )
66 fidceq 7123 . . . . . . . . . . . 12  |-  ( ( V  e.  Fin  /\  ( P `  0 )  e.  V  /\  ( P `  ( n  +  1 ) )  e.  V )  -> DECID  ( P `  0 )  =  ( P `  ( n  +  1
) ) )
6765, 44, 58, 66syl3anc 1274 . . . . . . . . . . 11  |-  ( ( ( ph  /\  n  e.  NN0 )  /\  (
( n  +  1 )  <_  ( `  F
)  /\  { x  e.  V  |  -.  2  ||  ( (VtxDeg `  <. V ,  ( I  |`  ( F " (
0..^ n ) ) ) >. ) `  x
) }  =  if ( ( P ` 
0 )  =  ( P `  n ) ,  (/) ,  { ( P `  0 ) ,  ( P `  n ) } ) ) )  -> DECID  ( P `  0
)  =  ( P `
 ( n  + 
1 ) ) )
6840, 64, 67ifcldcd 3659 . . . . . . . . . 10  |-  ( ( ( ph  /\  n  e.  NN0 )  /\  (
( n  +  1 )  <_  ( `  F
)  /\  { x  e.  V  |  -.  2  ||  ( (VtxDeg `  <. V ,  ( I  |`  ( F " (
0..^ n ) ) ) >. ) `  x
) }  =  if ( ( P ` 
0 )  =  ( P `  n ) ,  (/) ,  { ( P `  0 ) ,  ( P `  n ) } ) ) )  ->  if ( ( P ` 
0 )  =  ( P `  ( n  +  1 ) ) ,  (/) ,  { ( P `  0 ) ,  ( P `  ( n  +  1
) ) } )  e.  ~P V )
6968elpwid 3679 . . . . . . . . 9  |-  ( ( ( ph  /\  n  e.  NN0 )  /\  (
( n  +  1 )  <_  ( `  F
)  /\  { x  e.  V  |  -.  2  ||  ( (VtxDeg `  <. V ,  ( I  |`  ( F " (
0..^ n ) ) ) >. ) `  x
) }  =  if ( ( P ` 
0 )  =  ( P `  n ) ,  (/) ,  { ( P `  0 ) ,  ( P `  n ) } ) ) )  ->  if ( ( P ` 
0 )  =  ( P `  ( n  +  1 ) ) ,  (/) ,  { ( P `  0 ) ,  ( P `  ( n  +  1
) ) } ) 
C_  V )
7069sseld 3236 . . . . . . . 8  |-  ( ( ( ph  /\  n  e.  NN0 )  /\  (
( n  +  1 )  <_  ( `  F
)  /\  { x  e.  V  |  -.  2  ||  ( (VtxDeg `  <. V ,  ( I  |`  ( F " (
0..^ n ) ) ) >. ) `  x
) }  =  if ( ( P ` 
0 )  =  ( P `  n ) ,  (/) ,  { ( P `  0 ) ,  ( P `  n ) } ) ) )  ->  (
y  e.  if ( ( P `  0
)  =  ( P `
 ( n  + 
1 ) ) ,  (/) ,  { ( P `
 0 ) ,  ( P `  (
n  +  1 ) ) } )  -> 
y  e.  V ) )
7170pm4.71rd 394 . . . . . . 7  |-  ( ( ( ph  /\  n  e.  NN0 )  /\  (
( n  +  1 )  <_  ( `  F
)  /\  { x  e.  V  |  -.  2  ||  ( (VtxDeg `  <. V ,  ( I  |`  ( F " (
0..^ n ) ) ) >. ) `  x
) }  =  if ( ( P ` 
0 )  =  ( P `  n ) ,  (/) ,  { ( P `  0 ) ,  ( P `  n ) } ) ) )  ->  (
y  e.  if ( ( P `  0
)  =  ( P `
 ( n  + 
1 ) ) ,  (/) ,  { ( P `
 0 ) ,  ( P `  (
n  +  1 ) ) } )  <->  ( y  e.  V  /\  y  e.  if ( ( P `
 0 )  =  ( P `  (
n  +  1 ) ) ,  (/) ,  {
( P `  0
) ,  ( P `
 ( n  + 
1 ) ) } ) ) ) )
7238, 71bitr4d 191 . . . . . 6  |-  ( ( ( ph  /\  n  e.  NN0 )  /\  (
( n  +  1 )  <_  ( `  F
)  /\  { x  e.  V  |  -.  2  ||  ( (VtxDeg `  <. V ,  ( I  |`  ( F " (
0..^ n ) ) ) >. ) `  x
) }  =  if ( ( P ` 
0 )  =  ( P `  n ) ,  (/) ,  { ( P `  0 ) ,  ( P `  n ) } ) ) )  ->  (
( y  e.  V  /\  -.  2  ||  (
(VtxDeg `  <. V , 
( I  |`  ( F " ( 0..^ ( n  +  1 ) ) ) ) >.
) `  y )
)  <->  y  e.  if ( ( P ` 
0 )  =  ( P `  ( n  +  1 ) ) ,  (/) ,  { ( P `  0 ) ,  ( P `  ( n  +  1
) ) } ) ) )
7319, 72bitrid 192 . . . . 5  |-  ( ( ( ph  /\  n  e.  NN0 )  /\  (
( n  +  1 )  <_  ( `  F
)  /\  { x  e.  V  |  -.  2  ||  ( (VtxDeg `  <. V ,  ( I  |`  ( F " (
0..^ n ) ) ) >. ) `  x
) }  =  if ( ( P ` 
0 )  =  ( P `  n ) ,  (/) ,  { ( P `  0 ) ,  ( P `  n ) } ) ) )  ->  (
y  e.  { x  e.  V  |  -.  2  ||  ( (VtxDeg `  <. V ,  ( I  |`  ( F " (
0..^ ( n  + 
1 ) ) ) ) >. ) `  x
) }  <->  y  e.  if ( ( P ` 
0 )  =  ( P `  ( n  +  1 ) ) ,  (/) ,  { ( P `  0 ) ,  ( P `  ( n  +  1
) ) } ) ) )
7473eqrdv 2230 . . . 4  |-  ( ( ( ph  /\  n  e.  NN0 )  /\  (
( n  +  1 )  <_  ( `  F
)  /\  { x  e.  V  |  -.  2  ||  ( (VtxDeg `  <. V ,  ( I  |`  ( F " (
0..^ n ) ) ) >. ) `  x
) }  =  if ( ( P ` 
0 )  =  ( P `  n ) ,  (/) ,  { ( P `  0 ) ,  ( P `  n ) } ) ) )  ->  { x  e.  V  |  -.  2  ||  ( (VtxDeg `  <. V ,  ( I  |`  ( F " (
0..^ ( n  + 
1 ) ) ) ) >. ) `  x
) }  =  if ( ( P ` 
0 )  =  ( P `  ( n  +  1 ) ) ,  (/) ,  { ( P `  0 ) ,  ( P `  ( n  +  1
) ) } ) )
7574exp32 365 . . 3  |-  ( (
ph  /\  n  e.  NN0 )  ->  ( (
n  +  1 )  <_  ( `  F )  ->  ( { x  e.  V  |  -.  2  ||  ( (VtxDeg `  <. V ,  ( I  |`  ( F " ( 0..^ n ) ) )
>. ) `  x ) }  =  if ( ( P `  0
)  =  ( P `
 n ) ,  (/) ,  { ( P `
 0 ) ,  ( P `  n
) } )  ->  { x  e.  V  |  -.  2  ||  (
(VtxDeg `  <. V , 
( I  |`  ( F " ( 0..^ ( n  +  1 ) ) ) ) >.
) `  x ) }  =  if (
( P `  0
)  =  ( P `
 ( n  + 
1 ) ) ,  (/) ,  { ( P `
 0 ) ,  ( P `  (
n  +  1 ) ) } ) ) ) )
7675a2d 26 . 2  |-  ( (
ph  /\  n  e.  NN0 )  ->  ( (
( n  +  1 )  <_  ( `  F
)  ->  { x  e.  V  |  -.  2  ||  ( (VtxDeg `  <. V ,  ( I  |`  ( F " (
0..^ n ) ) ) >. ) `  x
) }  =  if ( ( P ` 
0 )  =  ( P `  n ) ,  (/) ,  { ( P `  0 ) ,  ( P `  n ) } ) )  ->  ( (
n  +  1 )  <_  ( `  F )  ->  { x  e.  V  |  -.  2  ||  (
(VtxDeg `  <. V , 
( I  |`  ( F " ( 0..^ ( n  +  1 ) ) ) ) >.
) `  x ) }  =  if (
( P `  0
)  =  ( P `
 ( n  + 
1 ) ) ,  (/) ,  { ( P `
 0 ) ,  ( P `  (
n  +  1 ) ) } ) ) ) )
7715, 76syld 45 1  |-  ( (
ph  /\  n  e.  NN0 )  ->  ( (
n  <_  ( `  F
)  ->  { x  e.  V  |  -.  2  ||  ( (VtxDeg `  <. V ,  ( I  |`  ( F " (
0..^ n ) ) ) >. ) `  x
) }  =  if ( ( P ` 
0 )  =  ( P `  n ) ,  (/) ,  { ( P `  0 ) ,  ( P `  n ) } ) )  ->  ( (
n  +  1 )  <_  ( `  F )  ->  { x  e.  V  |  -.  2  ||  (
(VtxDeg `  <. V , 
( I  |`  ( F " ( 0..^ ( n  +  1 ) ) ) ) >.
) `  x ) }  =  if (
( P `  0
)  =  ( P `
 ( n  + 
1 ) ) ,  (/) ,  { ( P `
 0 ) ,  ( P `  (
n  +  1 ) ) } ) ) ) )
Colors of variables: wff set class
Syntax hints:   -. wn 3    -> wi 4    /\ wa 104    <-> wb 105  DECID wdc 842    = wceq 1398    e. wcel 2203   {crab 2524   _Vcvv 2812    C_ wss 3210   (/)c0 3507   ifcif 3619   ~Pcpw 3668   {cpr 3689   <.cop 3691   class class class wbr 4108    |` cres 4750   "cima 4751   Fun wfun 5345   -->wf 5347   ` cfv 5351  (class class class)co 6049   Fincfn 6974   RRcr 8122   0cc0 8123   1c1 8124    + caddc 8126    <_ cle 8305   2c2 9284   NN0cn0 9492   ZZcz 9573   ZZ>=cuz 9849   ...cfz 10338  ..^cfzo 10472  ♯chash 11133    || cdvds 12466  Vtxcvtx 15994  iEdgciedg 15995  UMGraphcumgr 16074  VtxDegcvtxdg 16268  Walkscwlks 16299  EulerPathsceupth 16424
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 619  ax-in2 620  ax-io 717  ax-5 1496  ax-7 1497  ax-gen 1498  ax-ie1 1542  ax-ie2 1543  ax-8 1553  ax-10 1554  ax-11 1555  ax-i12 1556  ax-bndl 1558  ax-4 1559  ax-17 1575  ax-i9 1579  ax-ial 1583  ax-i5r 1584  ax-13 2205  ax-14 2206  ax-ext 2214  ax-coll 4224  ax-sep 4227  ax-nul 4235  ax-pow 4286  ax-pr 4321  ax-un 4553  ax-setind 4658  ax-iinf 4709  ax-cnex 8214  ax-resscn 8215  ax-1cn 8216  ax-1re 8217  ax-icn 8218  ax-addcl 8219  ax-addrcl 8220  ax-mulcl 8221  ax-mulrcl 8222  ax-addcom 8223  ax-mulcom 8224  ax-addass 8225  ax-mulass 8226  ax-distr 8227  ax-i2m1 8228  ax-0lt1 8229  ax-1rid 8230  ax-0id 8231  ax-rnegex 8232  ax-precex 8233  ax-cnre 8234  ax-pre-ltirr 8235  ax-pre-ltwlin 8236  ax-pre-lttrn 8237  ax-pre-apti 8238  ax-pre-ltadd 8239  ax-pre-mulgt0 8240  ax-pre-mulext 8241  ax-arch 8242
This theorem depends on definitions:  df-bi 117  df-stab 839  df-dc 843  df-ifp 987  df-3or 1006  df-3an 1007  df-tru 1401  df-fal 1404  df-xor 1421  df-nf 1510  df-sb 1812  df-eu 2083  df-mo 2084  df-clab 2219  df-cleq 2225  df-clel 2228  df-nfc 2373  df-ne 2413  df-nel 2508  df-ral 2525  df-rex 2526  df-reu 2527  df-rmo 2528  df-rab 2529  df-v 2814  df-sbc 3042  df-csb 3138  df-dif 3212  df-un 3214  df-in 3216  df-ss 3223  df-nul 3508  df-if 3620  df-pw 3670  df-sn 3694  df-pr 3695  df-op 3697  df-uni 3914  df-int 3949  df-iun 3992  df-br 4109  df-opab 4171  df-mpt 4172  df-tr 4208  df-id 4413  df-po 4416  df-iso 4417  df-iord 4486  df-on 4488  df-ilim 4489  df-suc 4491  df-iom 4712  df-xp 4754  df-rel 4755  df-cnv 4756  df-co 4757  df-dm 4758  df-rn 4759  df-res 4760  df-ima 4761  df-iota 5311  df-fun 5353  df-fn 5354  df-f 5355  df-f1 5356  df-fo 5357  df-f1o 5358  df-fv 5359  df-riota 6002  df-ov 6052  df-oprab 6053  df-mpo 6054  df-1st 6333  df-2nd 6334  df-recs 6535  df-irdg 6600  df-frec 6621  df-1o 6646  df-2o 6647  df-oadd 6650  df-er 6766  df-map 6883  df-en 6975  df-dom 6976  df-fin 6977  df-pnf 8306  df-mnf 8307  df-xr 8308  df-ltxr 8309  df-le 8310  df-sub 8442  df-neg 8443  df-reap 8845  df-ap 8852  df-div 8943  df-inn 9234  df-2 9292  df-3 9293  df-4 9294  df-5 9295  df-6 9296  df-7 9297  df-8 9298  df-9 9299  df-n0 9493  df-z 9574  df-dec 9706  df-uz 9850  df-q 9948  df-rp 9983  df-xadd 10102  df-fz 10339  df-fzo 10473  df-fl 10626  df-mod 10681  df-seqfrec 10806  df-exp 10897  df-ihash 11134  df-word 11218  df-cj 11520  df-re 11521  df-im 11522  df-rsqrt 11676  df-abs 11677  df-dvds 12467  df-ndx 13204  df-slot 13205  df-base 13207  df-edgf 15987  df-vtx 15996  df-iedg 15997  df-edg 16040  df-uhgrm 16051  df-ushgrm 16052  df-upgren 16075  df-umgren 16076  df-uspgren 16137  df-subgr 16236  df-vtxdg 16269  df-wlks 16300  df-trls 16363  df-eupth 16425
This theorem is referenced by:  eupth2fi  16461
  Copyright terms: Public domain W3C validator