diff --git a/include/xo/numeric/NumericPrimitives.hpp b/include/xo/numeric/NumericPrimitives.hpp
index 376f94b9..3eab681a 100644
--- a/include/xo/numeric/NumericPrimitives.hpp
+++ b/include/xo/numeric/NumericPrimitives.hpp
@@ -14,7 +14,9 @@ namespace xo {
          **/
         class NumericPrimitives {
         public:
-            /** poly divide **/
+            /** polymorphic (in both arguments) multiply **/
+            static DPrimitive_gco_2_gco_gco s_mul_gco_gco_pm;
+            /** polymorphic (in both arguments) divide **/
             static DPrimitive_gco_2_gco_gco s_div_gco_gco_pm;
         };
     }
diff --git a/src/numeric/NumericPrimitives.cpp b/src/numeric/NumericPrimitives.cpp
index 5666a751..a17de848 100644
--- a/src/numeric/NumericPrimitives.cpp
+++ b/src/numeric/NumericPrimitives.cpp
@@ -11,6 +11,10 @@ namespace xo {
 
     namespace scm {
 
+        DPrimitive_gco_2_gco_gco
+        NumericPrimitives::s_mul_gco_gco_pm("_mul",
+                                            &NumericDispatch::multiply);
+
         DPrimitive_gco_2_gco_gco
         NumericPrimitives::s_div_gco_gco_pm("_div",
                                             &NumericDispatch::divide);