2017-11-14 03:32:46 +04:00
|
|
|
(**************************************************************************)
|
|
|
|
(* *)
|
2017-11-14 03:36:14 +04:00
|
|
|
(* Copyright (c) 2014 - 2017. *)
|
2017-11-14 03:32:46 +04:00
|
|
|
(* Dynamic Ledger Solutions, Inc. <contact@tezos.com> *)
|
|
|
|
(* *)
|
|
|
|
(* All rights reserved. No warranty, explicit or implicit, provided. *)
|
|
|
|
(* *)
|
|
|
|
(**************************************************************************)
|
2016-09-08 21:13:10 +04:00
|
|
|
|
|
|
|
type t
|
|
|
|
|
|
|
|
val add : t -> int64 -> t
|
|
|
|
val diff : t -> t -> int64
|
|
|
|
|
|
|
|
val equal : t -> t -> bool
|
|
|
|
val compare : t -> t -> int
|
|
|
|
|
|
|
|
val (=) : t -> t -> bool
|
|
|
|
val (<>) : t -> t -> bool
|
|
|
|
val (<) : t -> t -> bool
|
|
|
|
val (<=) : t -> t -> bool
|
|
|
|
val (>=) : t -> t -> bool
|
|
|
|
val (>) : t -> t -> bool
|
|
|
|
val min : t -> t -> t
|
|
|
|
val max : t -> t -> t
|
|
|
|
|
|
|
|
val of_seconds : int64 -> t
|
|
|
|
val to_seconds : t -> int64
|
|
|
|
|
|
|
|
val of_notation : string -> t option
|
|
|
|
val of_notation_exn : string -> t
|
|
|
|
val to_notation : t -> string
|
|
|
|
|
|
|
|
val encoding : t Data_encoding.t
|
|
|
|
val rfc_encoding : t Data_encoding.t
|
|
|
|
|
|
|
|
val pp_hum : Format.formatter -> t -> unit
|
|
|
|
|
|
|
|
|
|
|
|
|