Foundation.Link
type t = string * Uri.t
type links = t list
val link : ?cl:string -> (string * Uri.t) -> Cow.Xml.t
val top_nav : ?align:[< `Left | `Right Right ] -> links -> Cow.Xml.t
val button_group : links -> Cow.Xml.t
val side_nav : links -> Cow.Xml.t
val bottom_nav : links -> Cow.Xml.t