I feel like this is a roman à clef and I'm missing the clef. What's the story with the repeated John Carpenter references?
Haskell - fib (Just n) Nothing = Just (fibs !! n) fib Nothing (Just x) = let (n, x') = head (filter (\(_,y) -> y >= x) (enumerate fibs)) in if x == x' then Just n else Nothing fibs = 1 : 1 : zipWith (+) fibs (tail fibs)…
I feel like this is a roman à clef and I'm missing the clef. What's the story with the repeated John Carpenter references?
Haskell - fib (Just n) Nothing = Just (fibs !! n) fib Nothing (Just x) = let (n, x') = head (filter (\(_,y) -> y >= x) (enumerate fibs)) in if x == x' then Just n else Nothing fibs = 1 : 1 : zipWith (+) fibs (tail fibs)…