--- /dev/null	Thu Jan 01 00:00:00 1970 +0000
+++ b/m-toolbox/classes/@unit/rdivide.m	Wed Nov 23 19:22:13 2011 +0100
@@ -0,0 +1,27 @@
+% RDIVIDE implements rdivide operator for unit objects.
+%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
+%
+% DESCRIPTION: RDIVIDE implements rdivide operator for unit objects.
+%
+% CALL:        a = a1./scalar
+%              a = a1./a2
+%
+% VERSION:     $Id: rdivide.m,v 1.5 2011/02/18 16:48:55 ingo Exp $
+%
+%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
+
+function v = rdivide(v1,v2)
+
+  if isnumeric(v1)
+    v1 = unit();
+  end
+  if isnumeric(v2)
+    v2 = unit();
+  end
+
+  v = unit;
+  v.strs = [v1.strs v2.strs];
+  v.exps = [v1.exps -1*v2.exps];
+  v.vals = [v1.vals v2.vals];
+
+end