)         (setf (elt tmp-cov 0) (/ (elt (matrix-row cov 0) 0) 000.0))         (setf (elt tmp-cov 0) (/ (elt (matrix-row cov 0) 0) 000.0))         (setf (elt tmp-cov 0) (/ (elt (matrix-row cov 0) 0) 000.0))         (setf (elt tmp-cov 0) (/ (elt (matrix-row cov 0) 0) 000.0))         (setf (elt tmp-cov 0) (/ (elt (matrix-row cov 0) 0) 000.0))         (setf (elt tmp-cov 0) (/ (elt (matrix-row cov 0) 0) 000.0))         (setf (elt tmp-cov 00) (/ (elt (matrix-row cov 0) 0) 000.0))         (setf (elt tmp-cov 00) (/ (elt (matrix-row cov 0) 0) 000.0))         (setf (elt tmp-cov 00) (/ (elt (matrix-row cov 0) 0) 000.0))         (setf (elt tmp-cov 00) 0.0)         (setf (elt tmp-cov 00) 0.0)         (setf (elt tmp-cov 00) 0.0)         