package base

  1. Overview
  2. Docs
Legend:
Library
Module
Module type
Parameter
Class
Class type
type ('left, 'right) t = [
  1. | `Left of 'left
  2. | `Right of 'right
  3. | `Both of 'left * 'right
]
val compare : ('left -> 'left -> int) -> ('right -> 'right -> int) -> ('left, 'right) t -> ('left, 'right) t -> int
val equal : ('left -> 'left -> bool) -> ('right -> 'right -> bool) -> ('left, 'right) t -> ('left, 'right) t -> bool
val sexp_of_t : ('left -> Sexplib0.Sexp.t) -> ('right -> Sexplib0.Sexp.t) -> ('left, 'right) t -> Sexplib0.Sexp.t
val left : ('left, _) t -> 'left option
val right : (_, 'right) t -> 'right option
val left_value : ('left, _) t -> default:'left -> 'left
val right_value : (_, 'right) t -> default:'right -> 'right
val values : ('left, 'right) t -> left_default:'left -> right_default:'right -> 'left * 'right