Customize operator in reasonml

App.re

open CustomizedOperator.Op; /* In order to use operator from another file. */

Js.Dict.empty()
>>= ((obj) => { Js.Dict.set(obj, "title", "myTitle"); obj}, 1 == 2)
>>= ((obj) => { Js.Dict.set(obj, "id", 123); obj}, true = true);

/*
Result will be:
{id: 123}
*/

CustomizedOperator.re

module Op = {
  let (>>=) = (obj, (func, cond)) => cond ? func(obj) : obj;
};

/* Inspired by: https://twitter.com/_astrocoders/status/1013466409156870147 */