Andy Melnikov (nponeccop) wrote,
Andy Melnikov
nponeccop

Открыл для себя Data.Functor.Foldable.project

Захотелось мне написать на Х-е шутку про i = i + 1. В результате произошел сабж:

{-# LANGUAGE NoMonomorphismRestriction, TypeFamilies #-}
import Data.Functor.Foldable

type instance Base Int = Maybe

instance Foldable Int where
project 0 = Nothing
project x = Just (x - 1)

и теперь я могу по-новому писать id:

myId = cata (maybe 0 (+1))

Но важно то, что теперь для того, чтобы можно было воспользоваться библиотечными ката- и параморфизмами, мне не надо конструировать фиксированную точку функтора в явном виде!
Subscribe

  • Post a new comment

    Error

    default userpic

    Your reply will be screened

    Your IP address will be recorded 

    When you submit the form an invisible reCAPTCHA check will be performed.
    You must follow the Privacy Policy and Google Terms of use.
  • 2 comments