Module Fn.Compose_syntax

val (>>) : ('a -> 'b) -> ('b -> 'c) -> 'a -> 'c

f >> g is Fn.compose g f.

Example:

let f = String.(Compose_syntax.(strip >> lowercase >> equal "test")
in f " TEST " (* --> true *)