Source

Prelude


  1. foldr (\ x l -> case l of Nothing -> Just x _ -> l) Nothing [1, 2]
  2. foldr (\ x l -> case l of Nothing -> Just x _ -> l) Nothing (1 : [2])
  3. (\ x l -> case l of Nothing -> Just x _ -> l) 1 (foldr (\ x l -> case l of Nothing -> Just x _ -> l) Nothing [2])
  4. case foldr (\ x l -> case l of Nothing -> Just x _ -> l) Nothing [2] of Nothing -> Just 1 _ -> foldr (\ x l -> case l of Nothing -> Just x _ -> l) Nothing [2]
  5. case foldr (\ x l -> case l of Nothing -> Just x _ -> l) Nothing (2 : []) of Nothing -> Just 1 _ -> foldr (\ x l -> case l of Nothing -> Just x _ -> l) Nothing [2]
  6. case (\ x l -> case l of Nothing -> Just x _ -> l) 2 (foldr (\ x l -> case l of Nothing -> Just x _ -> l) Nothing []) of Nothing -> Just 1 _ -> foldr (\ x l -> case l of Nothing -> Just x _ -> l) Nothing [2]
  7. case case foldr (\ x l -> case l of Nothing -> Just x _ -> l) Nothing [] of Nothing -> Just 2 _ -> foldr (\ x l -> case l of Nothing -> Just x _ -> l) Nothing [] of Nothing -> Just 1 _ -> foldr (\ x l -> case l of Nothing -> Just x _ -> l) Nothing [2]
  8. case case Nothing of Nothing -> Just 2 _ -> foldr (\ x l -> case l of Nothing -> Just x _ -> l) Nothing [] of Nothing -> Just 1 _ -> foldr (\ x l -> case l of Nothing -> Just x _ -> l) Nothing [2]
  9. case Just 2 of Nothing -> Just 1 _ -> foldr (\ x l -> case l of Nothing -> Just x _ -> l) Nothing [2]
  10. case Just 2 of _ -> foldr (\ x l -> case l of Nothing -> Just x _ -> l) Nothing [2]
  11. foldr (\ x l -> case l of Nothing -> Just x _ -> l) Nothing [2]
  12. foldr (\ x l -> case l of Nothing -> Just x _ -> l) Nothing (2 : [])
  13. (\ x l -> case l of Nothing -> Just x _ -> l) 2 (foldr (\ x l -> case l of Nothing -> Just x _ -> l) Nothing [])
  14. case foldr (\ x l -> case l of Nothing -> Just x _ -> l) Nothing [] of Nothing -> Just 2 _ -> foldr (\ x l -> case l of Nothing -> Just x _ -> l) Nothing []
  15. case Nothing of Nothing -> Just 2 _ -> foldr (\ x l -> case l of Nothing -> Just x _ -> l) Nothing []
  16. Just 2