It exposes flatMap, which allows to have a
value in a context (F<A>) and then feed that into a function that
takes a normal value and returns a value in a context
(A => F<B>).
One motivation for separating this out from Monad is that there are
situations where we can implement flatMap but not pure. For example,
we can implement map or flatMap that transforms the values of a
Map<K, ?> type, but we can't implement pure (because we wouldn't
know what key to use when instantiating the new Map).
Note that having an Monad instance implies
Functor and Apply implementations are also available,
as FlatMap is a subtype of these.
Implementation notes
Even though in TypeScript the Funfix library is using abstract class to
express type classes, when implementing this type class it is recommended
that you implement it as a mixin using "implements", instead of extending
it directly with "extends". See
TypeScript: Mixins
for details and note that we already have applyMixins defined.
Implementation example:
import {
HK, FlatMap, Either,
registerTypeClassInstance,
applyMixins
} from"../src/funfix"// Type alias defined for readability.// HK is our encoding for higher-kinded types.type BoxK<T> = HK<Box<any>, T>
class Box<T> implements HK<Box<any>, T> {
constructor(public value: T) {}
// Implements HK<Box<any>, A>, not really needed, but useful in order// to avoid type casts. Note they can and should be undefined:
readonly _funKindF: Box<any>
readonly _funKindA: T
}
class BoxFlatMap implements FlatMap<Box<any>> {
map<A, B>(fa: BoxK<A>, f: (a: A) => B): Box<B> {
returnnewBox(f((fa as Box<A>).value))
}
flatMap<A, B>(fa: BoxK<A>, f: (a: A) => BoxK<B>): Box<B> {
returnf((fa as Box<A>).value) asBox<B>
}
tailRecM<A, B>(a: A, f: (a: A) => BoxK<Either<A, B>>): Box<B> {
letcursor = awhile (true) {
constbox = f(cursor) asBox<Either<A, B>>
constv = box.valueif (v.isRight()) returnnewBox(v.get())
cursor = v.swap().get()
}
}
// Mixed-in, asthesehavedefaultimplementationsmap2: <A, B, Z>(fa: BoxK<A>, fb: BoxK<B>, f: (a: A, b: B) => Z) => Box<Z>
ap: <A, B>(fa: BoxK<A>, ff: BoxK<(a: A) => B>) => Box<B>
product: <A, B> (fa: BoxK<A>, fb: BoxK<B>) => Box<[A, B]>
unit: () => Box<void>
followedBy: <A, B>(fa: BoxK<A>, fb: BoxK<B>) => Box<B>
followedByL: <A, B>(fa: BoxK<A>, fb: () => BoxK<B>) => Box<B>
forEffect: <A, B>(fa: BoxK<A>, fb: BoxK<B>) => Box<A>
forEffectL: <A, B>(fa: BoxK<A>, fb: () => BoxK<B>) => Box<A>
}
// Call needed in order to implement `map`, `map2`, `product`, etc.// using the default implementations defined by `FlatMap`, because// we are using `implements` instead of `extends` above and// because in this sample we want the default implementations,// but note that you can always provide your own
applyMixins(BoxFlatMap, [FlatMap])
// Registering global Functor instance for Box, needed in order// for the `functorOf(Box)`, `applyOf(Box)`, `applicativeOf(Box)`// and `flatMapOf(Box)` calls to work
registerTypeClassInstance(FlatMap)(Box, new BoxFunctor())
We are using implements in order to support multiple inheritance and to
avoid inheriting any static members. In the Flow definitions (e.g.
.js.flow files) for Funfix these type classes are defined with
"interface", as they are meant to be interfaces that sometimes have
default implementations and not classes.
Credits
This type class is inspired by the equivalent in Haskell's
standard library and the implementation is inspired by the
Typelevel Cats project.
The
FlatMaptype class is a lightweight Monad.It exposes flatMap, which allows to have a value in a context (
F<A>) and then feed that into a function that takes a normal value and returns a value in a context (A => F<B>).One motivation for separating this out from
Monadis that there are situations where we can implementflatMapbut notpure. For example, we can implementmaporflatMapthat transforms the values of aMap<K, ?>type, but we can't implementpure(because we wouldn't know what key to use when instantiating the newMap).Must obey the laws defined in FlatMapLaws.
Note that having an
Monadinstance implies Functor and Apply implementations are also available, asFlatMapis a subtype of these.Implementation notes
Even though in TypeScript the Funfix library is using
abstract classto express type classes, when implementing this type class it is recommended that you implement it as a mixin using "implements", instead of extending it directly with "extends". See TypeScript: Mixins for details and note that we already haveapplyMixinsdefined.Implementation example:
import { HK, FlatMap, Either, registerTypeClassInstance, applyMixins } from "../src/funfix" // Type alias defined for readability. // HK is our encoding for higher-kinded types. type BoxK<T> = HK<Box<any>, T> class Box<T> implements HK<Box<any>, T> { constructor(public value: T) {} // Implements HK<Box<any>, A>, not really needed, but useful in order // to avoid type casts. Note they can and should be undefined: readonly _funKindF: Box<any> readonly _funKindA: T } class BoxFlatMap implements FlatMap<Box<any>> { map<A, B>(fa: BoxK<A>, f: (a: A) => B): Box<B> { return new Box(f((fa as Box<A>).value)) } flatMap<A, B>(fa: BoxK<A>, f: (a: A) => BoxK<B>): Box<B> { return f((fa as Box<A>).value) as Box<B> } tailRecM<A, B>(a: A, f: (a: A) => BoxK<Either<A, B>>): Box<B> { let cursor = a while (true) { const box = f(cursor) as Box<Either<A, B>> const v = box.value if (v.isRight()) return new Box(v.get()) cursor = v.swap().get() } } // Mixed-in, as these have default implementations map2: <A, B, Z>(fa: BoxK<A>, fb: BoxK<B>, f: (a: A, b: B) => Z) => Box<Z> ap: <A, B>(fa: BoxK<A>, ff: BoxK<(a: A) => B>) => Box<B> product: <A, B> (fa: BoxK<A>, fb: BoxK<B>) => Box<[A, B]> unit: () => Box<void> followedBy: <A, B>(fa: BoxK<A>, fb: BoxK<B>) => Box<B> followedByL: <A, B>(fa: BoxK<A>, fb: () => BoxK<B>) => Box<B> forEffect: <A, B>(fa: BoxK<A>, fb: BoxK<B>) => Box<A> forEffectL: <A, B>(fa: BoxK<A>, fb: () => BoxK<B>) => Box<A> } // Call needed in order to implement `map`, `map2`, `product`, etc. // using the default implementations defined by `FlatMap`, because // we are using `implements` instead of `extends` above and // because in this sample we want the default implementations, // but note that you can always provide your own applyMixins(BoxFlatMap, [FlatMap]) // Registering global Functor instance for Box, needed in order // for the `functorOf(Box)`, `applyOf(Box)`, `applicativeOf(Box)` // and `flatMapOf(Box)` calls to work registerTypeClassInstance(FlatMap)(Box, new BoxFunctor())We are using
implementsin order to support multiple inheritance and to avoid inheriting anystaticmembers. In the Flow definitions (e.g..js.flowfiles) for Funfix these type classes are defined with "interface", as they are meant to be interfaces that sometimes have default implementations and not classes.Credits
This type class is inspired by the equivalent in Haskell's standard library and the implementation is inspired by the Typelevel Cats project.