Step * 1 of Lemma disj_un_tr_ap_inl_lemma


1. Top@i
2. Top@i
3. tr2 Top@i
4. tr1 Top@i
⊢ tr1 tr2 (inl x) ~ λs.(tr1 s)
BY
Try (RW (AddrC [1] (UnfoldC `disjoint-union-tr` ANDTHENC ReduceC)) 0)⋅ }

1
1. Top@i
2. Top@i
3. tr2 Top@i
4. tr1 Top@i
⊢ λs.(tr1 s) ~ λs.(tr1 s)


Latex:


Latex:

1.  x  :  Top@i
2.  i  :  Top@i
3.  tr2  :  Top@i
4.  tr1  :  Top@i
\mvdash{}  tr1  +  tr2  i  (inl  x)  \msim{}  \mlambda{}s.(tr1  i  x  s)


By


Latex:
Try  (RW  (AddrC  [1]  (UnfoldC  `disjoint-union-tr`  ANDTHENC  ReduceC))  0)\mcdot{}




Home Index