--- a/MatrixAccessor.st	Wed Aug 21 23:06:43 2019 +0200
+++ b/MatrixAccessor.st	Wed Aug 21 23:31:45 2019 +0200
@@ -187,6 +187,11 @@
     ^ array at:index put:val.
 !
 
+dimensions
+    ^ dimensions 
+
+!
+
 size
     ^ dimensions inject:1 into:[:szSoFar :thisDim | szSoFar * thisDim].
 ! !