1
0
mirror of https://github.com/ikoHSE/sc-task-1.git synced 2024-10-05 21:48:34 +03:00

Fixed formatting

This commit is contained in:
iko 2020-02-02 22:09:44 +03:00
parent e8f7615d98
commit a9ae2aa5de

View File

@ -1,6 +1,7 @@
module Task
(
) where
)
where
-- Implement a function that returns the first element of a list, if there is one.
-- Hint: `Maybe a` is already defined as so:
@ -91,7 +92,7 @@ constructTree = undefined
-- / \ /
-- 4 6 5
leftmost :: Tree a -> Maybe a
leftmost = undefined
leftmost = undefined
-- Returns the rightmost element of the given tree.
--
@ -107,7 +108,7 @@ leftmost = undefined
-- / \ /
-- 4 6 5
rightmost :: Tree a -> Maybe a
rightmost = undefined
rightmost = undefined
-- Returns the sum of all elements in the tree
-- For this tree the result should be 6: