diff --git a/include/rotgen/functions/functions.hpp b/include/rotgen/functions/functions.hpp
index 786bf0c..81464bb 100644
--- a/include/rotgen/functions/functions.hpp
+++ b/include/rotgen/functions/functions.hpp
@@ -125,6 +125,12 @@ namespace rotgen
     return a / b;
   }
 
+  template<concepts::entity A>
+  auto square(A const& a)
+  {
+    return mul(a,a);
+  }
+
   //-----------------------------------------------------------------------------------------------
   // Reductions
   //-----------------------------------------------------------------------------------------------