Step
*
1
of Lemma
s-tl_wf
1. A : Type
2. s : stream(A)
⊢ snd(s) ∈ stream(A)
BY
{ ((Assert s ∈ A × stream(A) BY ((InstLemma `stream-ext` [⌜A⌝]⋅ THENM D -1) THEN Auto)) THEN Auto) }
Latex:
Latex:
1.  A  :  Type
2.  s  :  stream(A)
\mvdash{}  snd(s)  \mmember{}  stream(A)
By
Latex:
((Assert  s  \mmember{}  A  \mtimes{}  stream(A)  BY  ((InstLemma  `stream-ext`  [\mkleeneopen{}A\mkleeneclose{}]\mcdot{}  THENM  D  -1)  THEN  Auto))  THEN  Auto)
Home
Index