val day_name : (Date.day -> string) ref
val name_of_day : Date.day -> string
val short_name_of_day : Date.day -> string
val month_name : (Date.month -> string) ref
val name_of_month : Date.month -> string
val short_name_of_month : Date.month -> string
val set_word_regexp : Str.regexp -> unit
module type S =
  sig
    type t
    val fprint : string -> Format.formatter -> t -> unit
    val print : string -> t -> unit
    val dprint : t -> unit
    val sprint : string -> t -> string
    val to_string : t -> string
    val from_fstring : string -> string -> t
    val from_string : string -> t
  end
module Date :
  sig
    type t = Date.t
    val fprint : string -> Format.formatter -> t -> unit
    val print : string -> t -> unit
    val dprint : t -> unit
    val sprint : string -> t -> string
    val to_string : t -> string
    val from_fstring : string -> string -> t
    val from_string : string -> t
  end
module DatePrinter :
  sig
    type t = Date.t
    val fprint : string -> Format.formatter -> t -> unit
    val print : string -> t -> unit
    val dprint : t -> unit
    val sprint : string -> t -> string
    val to_string : t -> string
    val from_fstring : string -> string -> t
    val from_string : string -> t
  end
module Time :
  sig
    type t = Time.t
    val fprint : string -> Format.formatter -> t -> unit
    val print : string -> t -> unit
    val dprint : t -> unit
    val sprint : string -> t -> string
    val to_string : t -> string
    val from_fstring : string -> string -> t
    val from_string : string -> t
  end
module TimePrinter :
  sig
    type t = Time.t
    val fprint : string -> Format.formatter -> t -> unit
    val print : string -> t -> unit
    val dprint : t -> unit
    val sprint : string -> t -> string
    val to_string : t -> string
    val from_fstring : string -> string -> t
    val from_string : string -> t
  end
module Ftime :
  sig
    type t = Ftime.t
    val fprint : string -> Format.formatter -> t -> unit
    val print : string -> t -> unit
    val dprint : t -> unit
    val sprint : string -> t -> string
    val to_string : t -> string
    val from_fstring : string -> string -> t
    val from_string : string -> t
  end
module Precise_Calendar :
  sig
    type t = Calendar.Precise.t
    val fprint : string -> Format.formatter -> t -> unit
    val print : string -> t -> unit
    val dprint : t -> unit
    val sprint : string -> t -> string
    val to_string : t -> string
    val from_fstring : string -> string -> t
    val from_string : string -> t
  end
module Calendar :
  sig
    type t = Calendar.t
    val fprint : string -> Format.formatter -> t -> unit
    val print : string -> t -> unit
    val dprint : t -> unit
    val sprint : string -> t -> string
    val to_string : t -> string
    val from_fstring : string -> string -> t
    val from_string : string -> t
  end
module CalendarPrinter :
  sig
    type t = Calendar.t
    val fprint : string -> Format.formatter -> t -> unit
    val print : string -> t -> unit
    val dprint : t -> unit
    val sprint : string -> t -> string
    val to_string : t -> string
    val from_fstring : string -> string -> t
    val from_string : string -> t
  end
module Precise_Fcalendar :
  sig
    type t = Fcalendar.Precise.t
    val fprint : string -> Format.formatter -> t -> unit
    val print : string -> t -> unit
    val dprint : t -> unit
    val sprint : string -> t -> string
    val to_string : t -> string
    val from_fstring : string -> string -> t
    val from_string : string -> t
  end
module Fcalendar :
  sig
    type t = Fcalendar.t
    val fprint : string -> Format.formatter -> t -> unit
    val print : string -> t -> unit
    val dprint : t -> unit
    val sprint : string -> t -> string
    val to_string : t -> string
    val from_fstring : string -> string -> t
    val from_string : string -> t
  end