MonadExample.kt

// All return a type Monad

val split: (String) -> Monad<Pair<StringPair, StringPair>> = { str ->
    ..
    Monad.Something(Pair(..))
}

val convertToInt: (pair: Pair<StringPair, StringPair>) -> Monad<Pair<IntPair, IntPair>> = { pair ->
    ..
    Monad.Something(Pair(..))
}

val transform: (pair: Pair<IntPair, IntPair>) -> Monad<Int> = { pair ->
    ..
    Monad.Something(Int)
}

val test = "10,2,3,1"

val result = Monad.Something(test) // Monad("10,2,3,1")
                        .flatMap(split) // Monad((("10", "2"), ("3", "1")))
                        .flatMap(convertToInt) // Monad(((10, 2), (3, 1)))
                        .flatMap(transform) // Monad(3)