Users' Mathboxes Mathbox for Norm Megill < Previous   Next >
Nearby theorems
Mirrors  >  Home  >  MPE Home  >  Th. List  >   Mathboxes  >  mapdhval2 Unicode version

Theorem mapdhval2 32213
Description: Lemmma for ~? mapdh . (Contributed by NM, 3-Apr-2015.)
Hypotheses
Ref Expression
mapdh.q  |-  Q  =  ( 0g `  C
)
mapdh.i  |-  I  =  ( x  e.  _V  |->  if ( ( 2nd `  x
)  =  .0.  ,  Q ,  ( iota_ h  e.  D ( ( M `  ( N `
 { ( 2nd `  x ) } ) )  =  ( J `
 { h }
)  /\  ( M `  ( N `  {
( ( 1st `  ( 1st `  x ) ) 
.-  ( 2nd `  x
) ) } ) )  =  ( J `
 { ( ( 2nd `  ( 1st `  x ) ) R h ) } ) ) ) ) )
mapdh2.x  |-  ( ph  ->  X  e.  A )
mapdh2.f  |-  ( ph  ->  F  e.  B )
mapdh2.y  |-  ( ph  ->  Y  e.  ( V 
\  {  .0.  }
) )
Assertion
Ref Expression
mapdhval2  |-  ( ph  ->  ( I `  <. X ,  F ,  Y >. )  =  ( iota_ h  e.  D ( ( M `  ( N `
 { Y }
) )  =  ( J `  { h } )  /\  ( M `  ( N `  { ( X  .-  Y ) } ) )  =  ( J `
 { ( F R h ) } ) ) ) )
Distinct variable groups:    x, D    x, h, F    x, J    x, M    x, N    x,  .0.    x, Q    x, R    x, 
.-    h, X, x    h, Y, x    ph, h    .0. , h
Allowed substitution hints:    ph( x)    A( x, h)    B( x, h)    C( x, h)    D( h)    Q( h)    R( h)    I( x, h)    J( h)    M( h)    .- ( h)    N( h)    V( x, h)

Proof of Theorem mapdhval2
StepHypRef Expression
1 mapdh.q . . 3  |-  Q  =  ( 0g `  C
)
2 mapdh.i . . 3  |-  I  =  ( x  e.  _V  |->  if ( ( 2nd `  x
)  =  .0.  ,  Q ,  ( iota_ h  e.  D ( ( M `  ( N `
 { ( 2nd `  x ) } ) )  =  ( J `
 { h }
)  /\  ( M `  ( N `  {
( ( 1st `  ( 1st `  x ) ) 
.-  ( 2nd `  x
) ) } ) )  =  ( J `
 { ( ( 2nd `  ( 1st `  x ) ) R h ) } ) ) ) ) )
3 mapdh2.x . . 3  |-  ( ph  ->  X  e.  A )
4 mapdh2.f . . 3  |-  ( ph  ->  F  e.  B )
5 mapdh2.y . . 3  |-  ( ph  ->  Y  e.  ( V 
\  {  .0.  }
) )
61, 2, 3, 4, 5mapdhval 32211 . 2  |-  ( ph  ->  ( I `  <. X ,  F ,  Y >. )  =  if ( Y  =  .0.  ,  Q ,  ( iota_ h  e.  D ( ( M `  ( N `
 { Y }
) )  =  ( J `  { h } )  /\  ( M `  ( N `  { ( X  .-  Y ) } ) )  =  ( J `
 { ( F R h ) } ) ) ) ) )
7 eldifsni 3892 . . . 4  |-  ( Y  e.  ( V  \  {  .0.  } )  ->  Y  =/=  .0.  )
87neneqd 2587 . . 3  |-  ( Y  e.  ( V  \  {  .0.  } )  ->  -.  Y  =  .0.  )
9 iffalse 3710 . . 3  |-  ( -.  Y  =  .0.  ->  if ( Y  =  .0. 
,  Q ,  (
iota_ h  e.  D
( ( M `  ( N `  { Y } ) )  =  ( J `  {
h } )  /\  ( M `  ( N `
 { ( X 
.-  Y ) } ) )  =  ( J `  { ( F R h ) } ) ) ) )  =  ( iota_ h  e.  D ( ( M `  ( N `
 { Y }
) )  =  ( J `  { h } )  /\  ( M `  ( N `  { ( X  .-  Y ) } ) )  =  ( J `
 { ( F R h ) } ) ) ) )
105, 8, 93syl 19 . 2  |-  ( ph  ->  if ( Y  =  .0.  ,  Q , 
( iota_ h  e.  D
( ( M `  ( N `  { Y } ) )  =  ( J `  {
h } )  /\  ( M `  ( N `
 { ( X 
.-  Y ) } ) )  =  ( J `  { ( F R h ) } ) ) ) )  =  ( iota_ h  e.  D ( ( M `  ( N `
 { Y }
) )  =  ( J `  { h } )  /\  ( M `  ( N `  { ( X  .-  Y ) } ) )  =  ( J `
 { ( F R h ) } ) ) ) )
116, 10eqtrd 2440 1  |-  ( ph  ->  ( I `  <. X ,  F ,  Y >. )  =  ( iota_ h  e.  D ( ( M `  ( N `
 { Y }
) )  =  ( J `  { h } )  /\  ( M `  ( N `  { ( X  .-  Y ) } ) )  =  ( J `
 { ( F R h ) } ) ) ) )
Colors of variables: wff set class
Syntax hints:   -. wn 3    -> wi 4    /\ wa 359    = wceq 1649    e. wcel 1721   _Vcvv 2920    \ cdif 3281   ifcif 3703   {csn 3778   <.cotp 3782    e. cmpt 4230   ` cfv 5417  (class class class)co 6044   1stc1st 6310   2ndc2nd 6311   iota_crio 6505   0gc0g 13682
This theorem is referenced by:  mapdhcl  32214  mapdheq  32215
This theorem was proved from axioms:  ax-1 5  ax-2 6  ax-3 7  ax-mp 8  ax-gen 1552  ax-5 1563  ax-17 1623  ax-9 1662  ax-8 1683  ax-13 1723  ax-14 1725  ax-6 1740  ax-7 1745  ax-11 1757  ax-12 1946  ax-ext 2389  ax-sep 4294  ax-nul 4302  ax-pow 4341  ax-pr 4367  ax-un 4664
This theorem depends on definitions:  df-bi 178  df-or 360  df-an 361  df-3an 938  df-tru 1325  df-ex 1548  df-nf 1551  df-sb 1656  df-eu 2262  df-mo 2263  df-clab 2395  df-cleq 2401  df-clel 2404  df-nfc 2533  df-ne 2573  df-ral 2675  df-rex 2676  df-reu 2677  df-rab 2679  df-v 2922  df-sbc 3126  df-dif 3287  df-un 3289  df-in 3291  df-ss 3298  df-nul 3593  df-if 3704  df-sn 3784  df-pr 3785  df-op 3787  df-ot 3788  df-uni 3980  df-br 4177  df-opab 4231  df-mpt 4232  df-id 4462  df-xp 4847  df-rel 4848  df-cnv 4849  df-co 4850  df-dm 4851  df-rn 4852  df-iota 5381  df-fun 5419  df-fv 5425  df-ov 6047  df-1st 6312  df-2nd 6313  df-riota 6512
  Copyright terms: Public domain W3C validator