This is an alternative site for discovering Elm packages. You may be looking for the official Elm package site instead.

CmdM.Infix

Infix notation for CmdM

module CmdM.Infix exposing (..)

{-|Infix notation for `CmdM`
@docs (<$>), (>>=), (<*>), (<+>)
-}

import CmdM exposing (..)

{-|Infix notation for *CmdM.map*.-}
(<$>) : CmdM a -> (a -> b) -> CmdM b
(<$>) m f = CmdM.map f m

{-|Infix notation for *CmdM.bind*.-}
(>>=) : CmdM a -> (a -> CmdM b) -> CmdM b
(>>=) m f = CmdM.bind f m

{-|Infix notation for *CmdM.ap*.-}
(<*>) : CmdM (a -> b) -> CmdM a -> CmdM b
(<*>) = CmdM.ap

{-|Infix notation for *CmdM.combine*.-}
(<+>) : CmdM a -> CmdM a -> CmdM a
(<+>) = CmdM.combine