From 3ee7836238cee2466248f3ceedb8e033c726512e Mon Sep 17 00:00:00 2001
From: Richard Kreckel <kreckel@ginac.de>
Date: Thu, 16 Jan 2014 22:00:42 +0000
Subject: [PATCH] Revert "Convert complex numbers to real numbers if imaginary
 part is floating-point 0.0."

This reverts commit 536a0ac50f6c90198982267943af4d551612a9d9.

Cf. <http://www.ginac.de/pipermail/ginac-devel/2014-January/002086.html/>.
---
 src/complex/elem/cl_C_from_R_R_complex1.cc | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/src/complex/elem/cl_C_from_R_R_complex1.cc b/src/complex/elem/cl_C_from_R_R_complex1.cc
index f7df240..c4ebe99 100644
--- a/src/complex/elem/cl_C_from_R_R_complex1.cc
+++ b/src/complex/elem/cl_C_from_R_R_complex1.cc
@@ -17,7 +17,7 @@ const cl_N complex (const cl_R& a, const cl_R& b)
 {
 // Methode:
 // Falls b=0, nur a. sonst komplexe Zahl erzeugen.
-	if (zerop(b))
+	if (eq(b,0))
 		return a;
 	else
 		return allocate_complex(a,b);