MultiParamApplicative.kt

fun add(a: Int, b: Int, c: Int) = a + b + c

fun wrap(f: (Int, Int, Int) -> Int) = { x: Int -> { y: Int -> { z: Int -> f(x, y, z) }}}

val result = Functor.Something(1).map(wrap(::add)) // Something({ y -> { z -> add(1, y, z) }})
                                .apply(Functor.Something(2)) // Something({z -> add(1, 2, z) })
                                .apply(Functor.Something(3)) // Something(6)