sig
  val day_name : (Date.day -> string) Stdlib.ref
  val name_of_day : Date.day -> string
  val short_name_of_day : Date.day -> string
  val month_name : (Date.month -> string) Stdlib.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 -> Stdlib.Format.formatter -> Printer.S.t -> unit
      val print : string -> Printer.S.t -> unit
      val dprint : Printer.S.t -> unit
      val sprint : string -> Printer.S.t -> string
      val to_string : Printer.S.t -> string
      val from_fstring : string -> string -> Printer.S.t
      val from_string : string -> Printer.S.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
end