Parameters.Display
type t = [
| `Page
| `Popup
| `Touch
| `Wap
]
type error = [
| `Invalid_display of string
val serialize : t -> string
val parse : string -> (t, [> error ]) Stdlib.result