Module Wd_emulation.Screen_orientation

type natural = [
  1. | `Landscape
  2. | `Portrait
]
type type' = [
  1. | `Landscape_primary
  2. | `Landscape_secondary
  3. | `Portrait_primary
  4. | `Portrait_secondary
]
type t
val make : natural:natural -> type':type' -> unit -> t
val jsont : t Jsont.t