diff --git a/remove-complex-oper.scm b/remove-complex-oper.scm
index 4d688fc..76f87d1 100644
--- a/remove-complex-oper.scm
+++ b/remove-complex-oper.scm
@@ -96,7 +96,7 @@
           (append assoc-list (list `(,var ,exp-tmp)))))
       (set! new-body
         (if (symbol? exp-tmp)
-          (if elide-tmp (substitute-var exp-tmp var new-body) new-body)
+          new-body ;(substitute-var exp-tmp var new-body) new-body)
           `(let ([,var ,exp-tmp]) ,new-body)))
       (values (wrap-associations assoc-list new-body)
               new-tmpcount))]))