求解对角线元素很小的矩阵的逆矩阵,避免一般求逆的溢出问题,用Fortran编写-small diagonal elements of the matrix inverse matrix inversion generally avoid the overflow problems, Fortran prepared