Crossing.Axistype 'a t = | Monadic : 'a Value.Monadic.Axis.t -> 'a Monadic.Atom.t t| Comonadic : 'a Value.Comonadic.Axis.t -> 'a Comonadic.Atom.t t'a t specifies an axis whose mode crossing capability is represented as 'a
val of_modality : Modality.Axis.packed -> packedval to_modality : packed -> Modality.Axis.packed