idris-lang/Idris2
1
1
Fork 0
mirror of https://github.com/idris-lang/Idris2.git synced 2024-09-21 10:18:23 +03:00
Code Issues Projects Releases Wiki Activity

Fix annotaion in Stream

Browse Source
This commit is contained in:
Edwin Brady 2020-12-27 20:13:21 +00:00
parent 61ba5e086f
commit 5b97cd4499
1 changed files with 1 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
libs/base/Data/Stream.idr
View File

@ -124,6 +124,6 @@ Monad Stream where
-- Properties
--------------------------------------------------------------------------------
lengthTake : (1 n : Nat) -> (xs : Stream a) -> length (take n xs) = n
lengthTake : (n : Nat) -> (xs : Stream a) -> length (take n xs) = n
lengthTake Z _ = Refl
lengthTake (S n) (x :: xs) = cong S (lengthTake n xs)