Advertisement
Guest User

Untitled

a guest
Jan 18th, 2018
181
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
text 0.48 KB | None | 0 0
  1. 2. Napisz operatory (=+=), (=-=), (=*=) oraz (=:=) dla podstawowych działań arytmetycznych dla klasy typów Maybe (niech =:= oznacza dzielenie całkowite). Przykładowo typ dla sumowania:
  2. (=+=) :: Integral a => Maybe a -> Maybe a -> Maybe a
  3.  
  4. ==== DODAWANIE ====
  5. (=+=) :: Num a => Maybe a -> Maybe a -> Maybe a
  6. (=+=) ma mb = do
  7. a <- ma
  8. b <- mb
  9. return (a+b)
  10.  
  11. === ODEJMOWANIE =====
  12. (=-=) :: Num a => Maybe a -> Maybe a -> Maybe a
  13. (=-=) ma mb = do
  14. a <- ma
  15. b <- mb
  16. return (a-b)
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement