diff options
| -rw-r--r-- | lec06/Fibonacci.hs | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/lec06/Fibonacci.hs b/lec06/Fibonacci.hs index 2b6e343..9993169 100644 --- a/lec06/Fibonacci.hs +++ b/lec06/Fibonacci.hs @@ -21,7 +21,7 @@ streamToList :: Stream a -> [a] streamToList (Cons a s) = a : streamToList s instance Show a => Show (Stream a) where - show s = show $ take 20 $ streamToList s + show s = show $ take 20 $ streamToList s -- Exercise 4 |