Proved prefixS-lemma in FreshId (2)
This commit is contained in:
parent
6e17e69936
commit
f467c096bf
1 changed files with 1 additions and 1 deletions
|
@ -118,7 +118,7 @@ module IdBase
|
|||
prefixS-lemma x
|
||||
rewrite toList∘fromList ((reverse ∘ dropWhile P? ∘ reverse ∘ toList) x)
|
||||
| reverse-involutive ((dropWhile P? ∘ reverse ∘ toList) x)
|
||||
= {!dropWhile-lemma P? ((reverse ∘ toList) x) !}
|
||||
= dropWhile-lemma P? ((reverse ∘ toList) x)
|
||||
|
||||
prefix : Id → Prefix
|
||||
prefix x = ⟨ prefixS x , prefixS-lemma x ⟩
|
||||
|
|
Loading…
Reference in a new issue