let mk_int = { dom = Dom.Int; lo = None; hi = None }