Module GRing.Zmodule_isComRing

type 'r axioms_ = {
  1. one : 'r;
  2. mul : 'r -> 'r -> 'r;
}
type ('r, 'vlocal) phant_axioms = 'r axioms_