Introduction - If you have any usage issues, please Google them yourself
//Singular value decomposition method for generalized inverse// this function return value is less than 0 in the singular value decomposition process,// in the iterative value of more than 60 are unable to meet the precision requirement.// Return value greater than 0 indicated a normal return.// a-length m* n array, return its diagonal singular value is given followed by the remaining elements to 0// m-matrix rows// n-matrix the number of rows// aa-length n* m array, retrievable storage A generalized inverse// eps-precision// u-length m* m of the array, return deposited the left singular value decomposition singular quantity U// v-length of n* n of the array, return deposited the left singular value decomposition singular volume V// ka-integer variables, its value is max (n, m)+ 1// call the function: dluav ()