Module type Composition.Axiom

type 'a interior
and 'a exterior
val swap : 'a exterior interior -> 'a interior exterior