`sig
type t
val round :
?dir:[ `Down | `Nearest | `Up | `Zero ] ->
Int_intf.Round.t -> to_multiple_of:Int_intf.Round.t -> Int_intf.Round.t
val round_towards_zero :
Int_intf.Round.t -> to_multiple_of:Int_intf.Round.t -> Int_intf.Round.t
val round_down :
Int_intf.Round.t -> to_multiple_of:Int_intf.Round.t -> Int_intf.Round.t
val round_up :
Int_intf.Round.t -> to_multiple_of:Int_intf.Round.t -> Int_intf.Round.t
val round_nearest :
Int_intf.Round.t -> to_multiple_of:Int_intf.Round.t -> Int_intf.Round.t
end`