sig
  type t
  val id : Server.Data.IdentifiedType.t -> int
  val page : Doc.page
  val name : string
  val descr : Markdown.text
end