2.37 need to improve matrix-*-matrix function