cubicBezier = (mX1 = 0.5, mY1 = 0.0, mX2 = 0.5, mY2 = 1.0) => (mX1 === mY1 && mX2 === mY2) ? none :
  t => t === 0 || t === 1 ? t :
  calcBezier(binarySubdivide(t, mX1, mX2), mY1, mY2)
@param  {Number} [mX1]
@param  {Number} [mY1]
@param  {Number} [mX2]
@param  {Number} [mY2]
@return {EasingFunction}