'From Cuis 6.0 [latest update: #5661] on 26 February 2023 at 5:43:18 am'!

!Complex class methodsFor: 'instance creation' stamp: 'KenD 2/26/2023 05:42:14'!
real: realPart imaginary: imaginaryPart

	"This implementation allows reducing Complex to Integer or Fraction, avoiding instances of Complex where the imaginary part is zero. It is currently disabled."
	
	^ (imaginaryPart isFloat not and: [ imaginaryPart isZero ])
		ifTrue: [ realPart ]
		ifFalse: [ self basicReal: realPart imaginary: imaginaryPart ]
	

	"We allow for instances of Complex that actually just real numbers"
	"^ self basicReal: realPart imaginary: imaginaryPart"! !
