It has classes

  • Speaker [e/em/eir]
    ·
    4 years ago

    It's really just that. A monad is really just a type that admits lawful definitions of map (so it's a functor), pure and ap (so it's an applicative functor) and bind (or flatmap, though depending on your language this may be too powerful compared to a classical bind, cf. Scala). There's a lot of cool stuff that falls out of that, but if you understand "given a value in some context (of type m a, say) and a function that lifts values into that context (possibly at a different type, i.e., a -> m b), I can produce a value in the same context (m b, again, possibly at a different type)", there's not much else to look into. The functor, applicative, and monad laws dictate some of the operational characteristics of such definitions on a particular type, but that's really only relevant if you're making your own.

      • Speaker [e/em/eir]
        ·
        edit-2
        4 years ago

        Lifting is just a fancy word for (in this specific case, anyway) taking a concrete value and putting it some kind of computational context.

        I have a value 1 :: Int. There are a lot of contexts I can put that concrete value in! That is, I can make lots of values of type m Int that represent different views on the same value.

        Let's start by looking at how functors (types that admit a lawful definition of map) lift values.

        map :: Functor f => (a -> b) -> (f a -> f b) -- equivalently (and more usually) (a -> b) -> f a -> f b
        

        Normally, this is explained by saying "given a function a -> b and a value of type f a for some functor f, apply the function on each a in f a and give me the result wrapped up in f". Another way of explaining it (which I've written the type for preferentially) is "given a function a -> b, give me a function f a -> f b. We're lifting the entire function into whatever our functorial context is.

        Examples:

        1 :: Int
        map (+1) :: Functor f => f Int -> f Int
        map show :: Functor f => f Int -> f String
        
        Just 1 :: Maybe Int
        
        map (+1) (Just 1) = Just 2 :: Maybe Int
        map show (Just 1) = Just "1" :: Maybe String
        
        [1] :: [Int]
        
        map (+1) [1] = [2] :: [Int]
        map show [1] = ["1"] :: [String]
        

        Skipping directly up to monads, we really just need pure :: Monad m => a -> m a (a function which does nothing but put a value into a monadic [technically applicative] context) and bind :: Monad m => m a -> (a -> m b) -> m b. To keep it simple, we'll just reproduce map.

        -- We compose our function with pure to get their types into a shape that bind will understand
        incM :: Monad m => (Int -> Int) -> (Int -> m Int)
        incM = pure . (+1)
        
        showM :: Monad m => (Int -> String) -> (Int -> m String)
        showM = pure . show
        
        -- worth noting, Just 1 and [1] are both the same as pure 1 :: f Int with f fixed at Maybe and [], respectively
        
        bind (Just 1) incM = Just 2
        bind (Just 1) showM = Just "1"
        bind [1] incM = [2]
        bind [1] showM = ["1"]
        
        bind (bind (Just 1) incM) showM = Just "2"
        -- bind (Just 2) showM
        
        bind (bind [1,2,3] incM) showM = ["2", "3", "4"]
        -- bind [2,3,4] showM
        

        So you can see that this is a way of getting a value "out of" some context (like pulling the value of a Maybe or all the values out of a list), doing some sort of transformation on it, then wrapping it back up in the initial context; it also lets you chain these transformations, finally wrapping everything back up when you're done. flatmap is called that because bind for the list monad is exactly "map a function over this list and then flatten the list".

        bind ([[1,2,3],[4,5,6]]) id = [1,2,3,4,5,6]
        bind ([[1,2,3],[4,5,6]]) (map (+1)) = [2,3,4,5,6,7]