An example of the trailing lambda pattern in Elm

TrailingLambda.elm

import Html exposing (text)

main =
    let result =
        bind readNumber <| \x ->
        bind readNumber <| \y ->
        bind readNumber <| \z ->
        Ok (x + y + z)
    in
    text (Debug.toString result)

bind result f =
    case result of
        Ok x -> f x
        Err x -> Err x

readNumber = Ok 1