Mat matrixAllocTrans(Mat source) { Mat dest; dest = matrixAlloc(source.clm, source.row); matrixTrans(dest, source); return dest; }
LIBRARY_API bool matrixPseudoInv (matrix &in, matrix &out) { matrix in_T, inTin, inTinInv; bool state; state = matrixTrans (in, in_T); state = state ? matrixMult (in_T, in, inTin) : state; state = state ? matrixInv (inTin, inTinInv) : state; state = state ? matrixMult (inTinInv, in_T, out) : state; return state; }