Searched refs:znorm (Results 1 – 1 of 1) sorted by relevance
| /petsc/src/tao/leastsquares/impls/pounders/ |
| H A D | gqt.c | 8 PetscReal e, temp, w, wm, ynorm, znorm, s, sm; in estsv() local
77 PetscCallBLAS("BLASnrm2", znorm = 1.0 / BLASnrm2_(&blasn, z, &blas1)); in estsv()
78 *svmin = ynorm * znorm; in estsv()
79 PetscCallBLAS("BLASscal", BLASscal_(&blasn, &znorm, z, &blas1)); in estsv()
|