Implementation in reason of https://material-ui-next.com/customization/css-in-js/#other-html-element to allow creation of <noscript id="jss-insertion-point> for injecting material-ui at the start of the index.html and let others libraries css taking precedence over material-ui 's

InsertionPoint.re

type jssObj = {
  .
  "options": {. [@bs.set] "insertionPoint": Dom.element},
};

[@bs.module "jss"] external createJss : {.} => jssObj = "create";

[@bs.module "material-ui/styles"]
external jssPreset : unit => {.} = "jssPreset";

[@bs.module "material-ui/styles"]
external createGenerateClassName : unit => string = "createGenerateClassName";

let genClassName = createGenerateClassName();

let jss = createJss(jssPreset());

exception NoScriptIdNotFound(string);

let updateInsertionPoint = (noscriptId) => {
  switch(ReactDOMRe._getElementById(noscriptId)) {
    | Some(el) => jss##options##insertionPoint#=el
    | None => raise(NoScriptIdNotFound("noscriptId " ++ noscriptId ++ " not found"))
  }
};