with Standard_Complex_Numbers; use Standard_Complex_Numbers; with Abstract_Ring; package Standard_Complex_Ring is new Abstract_Ring(Complex_Number,Create(0),Create(1), Create,Equal,Copy,"+","+","-","-","*", Add,Sub,Min,Mul,Clear); -- DESCRIPTION : -- Defines the ring of standard complex numbers.