eul2 lim = iter 1 1
  where
    iter a b
      | a > lim = 0
      | even a = a + (iter b (b + a))
      | otherwise = iter b (b + a)
eul2 lim = iter 1 1
  where
    iter a b
      | a > lim = 0
      | even a = a + (iter b (b + a))
      | otherwise = iter b (b + a)
eul2 lim = iter 1 1
  where
    iter a b
      | a > lim = 0
      | even a = a + (iter b (b + a))
      | otherwise = iter b (b + a)