diff --git a/src/core/Complex.pm b/src/core/Complex.pm
index 82bd768b79b..a9340cebcb6 100644
--- a/src/core/Complex.pm
+++ b/src/core/Complex.pm
@@ -305,9 +305,7 @@ multi sub infix:</>(Complex $a, $b) {
 }
 
 multi sub infix:</>($a, Complex $b) {
-    my $d = $b.re * $b.re + $b.im * $b.im;
-    Complex.new(($a * $b.re) / $d,
-                ($a * $b.im) / $d);
+    Complex.new($a, 0) / $b;
 }
 
 multi sub postfix:<i>($x) {