Searched refs:errO (Results 1 – 1 of 1) sorted by relevance
| /phasta/svLS/ |
| H A D | CGRAD.f | 56 REAL*8 errO, err, alpha, eps, time local
66 errO = NORMS(mynNo, commu, R)
67 ls%iNorm = errO
68 eps = MAX(ls%absTol,ls%relTol*errO)
72 err = errO
80 errO = err
97 alpha = errO/DOTS(mynNo, commu, P, SP)
102 P = R + err/errO*P
107 ls%dB = 5D0*LOG(err/errO)
131 REAL*8 errO, err, alpha, eps local
[all …]
|