Module Cowabloga.Date

type month = int
val short_string_of_month : int -> string
val long_string_of_month : int -> string
val xml_of_month : int -> Cow.Xml.t
type date = {
month : month;
day : int;
year : int;
hour : int;
min : int;
}
val html_of_date : date -> Cow.Html.t
val date : (int * month * int * int * int) -> date
val day : (int * month * int) -> date
val atom_date : date -> int * month * int * int * int