diff --git a/src/core/core.dst b/src/core/core.dst
index fb93723f..350a6e66 100644
--- a/src/core/core.dst
+++ b/src/core/core.dst
@@ -326,12 +326,12 @@
          $accum))
 
 (defn sum [xs]
-  (var accum 0.0)
+  (var accum 0)
   (loop [x :in xs] (+= accum x))
   accum)
 
 (defn product [xs]
-  (var accum 0.0)
+  (var accum 1)
   (loop [x :in xs] (*= accum x))
   accum)