Input.BlockTime
type input = Block_time.t
val arg_typ : ( Block_time.t option, input option ) Schema.Arg.arg_typ