sig
  val is_valid : year:int -> month:int -> day:int -> bool
  val of_cjd :
    ?wday:int Stdlib.ref -> ?yday:int Stdlib.ref -> int -> int * int * int
  val to_cjd : year:int -> month:int -> day:int -> int
  val to_cjd_unsafe : year:int -> month:int -> day:int -> int
  val of_mjd :
    ?wday:int Stdlib.ref -> ?yday:int Stdlib.ref -> int -> int * int * int
  val to_mjd : year:int -> month:int -> day:int -> int
end