Function Matrix-Trace

Part of:

package cl-mathstats
( matrix-trace < matrix > )