Step * 1 of Lemma hdf-union-eq-disju


1. Type
2. Type
3. Type
4. hdataflow(A;B)
5. hdataflow(A;C)
6. valueall-type(C)
7. valueall-type(B)
8. inputs List
⊢ hdf-halted(X Y*(inputs)) hdf-halted((λx.(inl x)) || x.(inr )) Y*(inputs))
BY
(RepeatFor (MoveToConcl (-4)) THEN ListInd (-1) THEN Reduce THEN Auto) }

1
1. Type
2. Type
3. Type
4. valueall-type(C)
5. valueall-type(B)
6. hdataflow(A;B)@i
7. hdataflow(A;C)@i
⊢ hdf-halted(X Y) hdf-halted((λx.(inl x)) || x.(inr )) Y)

2
1. Type
2. Type
3. Type
4. valueall-type(C)
5. valueall-type(B)
6. A
7. List
8. ∀X:hdataflow(A;B). ∀Y:hdataflow(A;C).  hdf-halted(X Y*(v)) hdf-halted((λx.(inl x)) || x.(inr )) Y*(v))
9. hdataflow(A;B)@i
10. hdataflow(A;C)@i
⊢ hdf-halted(fst(X Y(u))*(v)) hdf-halted(fst((λx.(inl x)) || x.(inr )) Y(u))*(v))


Latex:



1.  A  :  Type
2.  B  :  Type
3.  C  :  Type
4.  X  :  hdataflow(A;B)
5.  Y  :  hdataflow(A;C)
6.  valueall-type(C)
7.  valueall-type(B)
8.  inputs  :  A  List
\mvdash{}  hdf-halted(X  +  Y*(inputs))  =  hdf-halted((\mlambda{}x.(inl  x))  o  X  ||  (\mlambda{}x.(inr  x  ))  o  Y*(inputs))


By

(RepeatFor  2  (MoveToConcl  (-4))  THEN  ListInd  (-1)  THEN  Reduce  0  THEN  Auto)




Home Index