diff --git a/src/OpenFOAM/dimensionSet/dimensionSet.C b/src/OpenFOAM/dimensionSet/dimensionSet.C
index 858a262cd7..03f0687a3c 100644
--- a/src/OpenFOAM/dimensionSet/dimensionSet.C
+++ b/src/OpenFOAM/dimensionSet/dimensionSet.C
@@ -137,6 +137,12 @@ Foam::FixedList<Foam::scalar,7>& Foam::dimensionSet::values()
 }
 
 
+void Foam::dimensionSet::clear()
+{
+    exponents_ = Zero;
+}
+
+
 void Foam::dimensionSet::reset(const dimensionSet& ds)
 {
     exponents_ = ds.exponents_;
diff --git a/src/OpenFOAM/dimensionSet/dimensionSet.H b/src/OpenFOAM/dimensionSet/dimensionSet.H
index 3d9fe12758..c1cd80668a 100644
--- a/src/OpenFOAM/dimensionSet/dimensionSet.H
+++ b/src/OpenFOAM/dimensionSet/dimensionSet.H
@@ -217,6 +217,9 @@ public:
         //- Return non-const access to the exponents as a list
         FixedList<scalar,7>& values();
 
+        //- Reset exponents to be dimensionless
+        void clear();
+
         //- Copy assign the exponents from the dimensionSet
         void reset(const dimensionSet& ds);