Parameter Euclidean_Ring.2-A

val make : E.t Q.arbitrary