H A D | zlalsd.f | 23 * ZLALSD uses the singular value decomposition of A to solve the least argument 117 DOUBLE PRECISION ZERO, ONE, TWO 123 INTEGER BX, BXST, C, DIFL, DIFR, GIVCOL, GIVNUM, 124 $ GIVPTR, I, ICMPQ1, ICMPQ2, IRWB, IRWIB, IRWRB, 125 $ IRWU, IRWVT, IRWWRK, IWK, J, JCOL, JIMAG, 126 $ JREAL, JROW, K, NLVL, NM1, NRWORK, NSIZE, NSUB, 127 $ PERM, POLES, S, SIZEI, SMLSZP, SQRE, ST, ST1, 128 $ U, VT, Z local 129 DOUBLE PRECISION CS, EPS, ORGNRM, R, SN, TOL 133 DOUBLE PRECISION DLAMCH, DLANST [all …]
|