package higher_kinded

  1. Overview
  2. Docs
type witness2
type 'z witness1 = ('z, witness2) t
type ('a, 'z) witness = ('a, 'z witness1) t
val inject : ('a, 'z) Base.Type_equal.t -> ('a, 'z) witness
val project : ('a, 'z) witness -> ('a, 'z) Base.Type_equal.t