79157417

Date: 2024-11-05 01:16:30
Score: 1.5
Natty:
Report link
--This will work (already tested):
zipMaybe :: [a] -> [b] -> [(Maybe a, Maybe b)]
zipMaybe [] [] = []
zipMaybe (x:xs) [] = [(Just x, Nothing)] ++ zipMaybe xs []
zipMaybe [] (y:ys) = [(Nothing, Just y)] ++ zipMaybe [] ys
zipMaybe (x:xs) (y:ys) = [(Just x, Just y)] ++ zipMaybe xs ys
Reasons:
  • Low length (0.5):
  • Has code block (-0.5):
  • Unregistered user (0.5):
  • Low reputation (1):
Posted by: Ali