Inlined a method. We'll need to add tests before refactoring this method.

Author: hemalvarambhia

src/Math-Complex/PMComplex.class.st

@@ -557,12 +557,6 @@ PMComplex >> isNumber [
 	^ true
 ]
 
-{ #category : #testing }
-PMComplex >> isReal [
-
-	^ imaginary = 0 and: [ real >= 0 ]
-]
-
 { #category : #testing }
 PMComplex >> isZero [
 	^ real isZero and: [imaginary isZero]
@@ -717,7 +711,8 @@ PMComplex >> sqrt [
 	"Return the square root of the receiver with a positive imaginary part."
 
 	| u v |
-	self isReal ifTrue: [ ^ self class real: real sqrt imaginary: 0 ].
+	(imaginary = 0 and: [ real >= 0 ]) ifTrue: [ 
+		^ self class real: real sqrt imaginary: 0 ].
 	v := (self abs - real / 2) sqrt.
 	u := imaginary / 2 / v.
 	^ self class real: u imaginary: v