theorem Th41: :: GAUSSINT:41
for x being G_INTEG st Re x <> 0 & Im x <> 0 & Re x <> Im x & - (Re x) <> Im x holds
not x *' is_associated_to x