sig
type t = {
year : int;
month : int;
day : int;
hour : int;
minute : int;
second : int;
zone : int;
week_day : int;
}
val localzone : int
val create : ?zone:int -> float -> Netdate.t
val parse : ?zone:int -> string -> Netdate.t
val since_epoch : Netdate.t -> float
val parse_epoch : ?zone:int -> string -> float
val format_to :
Netchannels.out_obj_channel -> fmt:string -> Netdate.t -> unit
val format : fmt:string -> Netdate.t -> string
val mk_mail_date : ?zone:int -> float -> string
val mk_usenet_date : ?zone:int -> float -> string
val mk_internet_date : ?zone:int -> float -> string
end
