jon.recoil.org

Module Value.Axis

type 'a t =
  1. | Monadic : 'a Mode.Value.Monadic.Axis.t -> 'a Mode.Value.Axis.t
  2. | Comonadic : 'a Mode.Value.Comonadic.Axis.t -> 'a Mode.Value.Axis.t

Represents a mode axis in this product whose constant is 'a, and whose allowance is 'd1 given the product's allowance 'd0.

include Mode_intf.Axis with type 'a t := 'a Mode.Value.Axis.t
val compare : 'a Mode.Value.Axis.t -> 'b Mode.Value.Axis.t -> int

Compare two axes in implication order. If A implies B, then A is before B.

type packed =
  1. | P : 'a Mode.Value.Axis.t -> Mode.Value.Axis.packed
val print : Stdlib.Format.formatter -> 'a Mode.Value.Axis.t -> unit
val all : Mode.Value.Axis.packed list

List of all axes, ordered by compare.