Composition.Axiom
type 'a interior
and 'a exterior
val swap : 'a exterior interior -> 'a interior exterior