/dports/science/tinker/tinker/source/ |
H A D | sniffer.f | 49 real*8 sniffer1,gnorm 190 gnorm = 0.0d0 192 gnorm = gnorm + g(i)**2 194 gnorm = sqrt(gnorm) 195 grms = gnorm / rms 261 gnorm = gnorm + g(i)*g(i) 264 gnorm = sqrt(gnorm) 365 gnorm = 0.0d0 369 gnorm = gnorm + derivs(j,k)**2 372 gnorm = sqrt(gnorm) [all …]
|
H A D | optrigid.f | 31 real*8 grdmin,grms,gnorm 121 gnorm = 0.0d0 124 gnorm = gnorm + derivs(j,i)**2 127 gnorm = sqrt(gnorm) 128 grms = gnorm / sqrt(dble(ngrp)) 138 write (iout,40) minimum,grms,gnorm 143 write (iout,50) minimum,grms,gnorm 150 write (iout,60) minimum,grms,gnorm 155 write (iout,70) minimum,grms,gnorm 162 write (iout,80) minimum,grms,gnorm [all …]
|
H A D | minirot.f | 31 real*8 grdmin,grms,gnorm 121 gnorm = 0.0d0 123 gnorm = gnorm + derivs(i)**2 125 gnorm = sqrt(gnorm) 126 grms = gnorm / sqrt(dble(nomega)) 136 write (iout,40) minimum,grms,gnorm 141 write (iout,50) minimum,grms,gnorm 148 write (iout,60) minimum,grms,gnorm 153 write (iout,70) minimum,grms,gnorm 160 write (iout,80) minimum,grms,gnorm [all …]
|
H A D | optirot.f | 31 real*8 grdmin,gnorm,grms 121 gnorm = 0.0d0 123 gnorm = gnorm + derivs(i)**2 125 gnorm = sqrt(gnorm) 126 grms = gnorm / sqrt(dble(nomega)) 136 write (iout,40) minimum,grms,gnorm 141 write (iout,50) minimum,grms,gnorm 148 write (iout,60) minimum,grms,gnorm 153 write (iout,70) minimum,grms,gnorm 160 write (iout,80) minimum,grms,gnorm [all …]
|
H A D | minrigid.f | 31 real*8 grdmin,grms,gnorm 121 gnorm = 0.0d0 124 gnorm = gnorm + derivs(j,i)**2 127 gnorm = sqrt(gnorm) 128 grms = gnorm / sqrt(dble(ngrp)) 138 write (iout,40) minimum,grms,gnorm 143 write (iout,50) minimum,grms,gnorm 150 write (iout,60) minimum,grms,gnorm 155 write (iout,70) minimum,grms,gnorm 162 write (iout,80) minimum,grms,gnorm [all …]
|
H A D | optimize.f | 32 real*8 grdmin,gnorm,grms 143 gnorm = 0.0d0 147 gnorm = gnorm + derivs(j,k)**2 150 gnorm = sqrt(gnorm) 151 grms = gnorm / sqrt(dble(nvar/3)) 162 write (iout,40) minimum,grms,gnorm 167 write (iout,50) minimum,grms,gnorm 174 write (iout,60) minimum,grms,gnorm 179 write (iout,70) minimum,grms,gnorm 186 write (iout,80) minimum,grms,gnorm [all …]
|
H A D | minimize.f | 33 real*8 grdmin,gnorm,grms 145 gnorm = 0.0d0 149 gnorm = gnorm + derivs(j,k)**2 152 gnorm = sqrt(gnorm) 153 grms = gnorm / sqrt(dble(nvar/3)) 164 write (iout,40) minimum,grms,gnorm 169 write (iout,50) minimum,grms,gnorm 176 write (iout,60) minimum,grms,gnorm 181 write (iout,70) minimum,grms,gnorm 188 write (iout,80) minimum,grms,gnorm [all …]
|
H A D | newtrot.f | 29 real*8 grdmin,gnorm,grms 154 gnorm = 0.0d0 156 gnorm = gnorm + derivs(i)**2 158 gnorm = sqrt(gnorm) 159 grms = gnorm / sqrt(dble(nomega)) 169 write (iout,80) minimum,grms,gnorm 174 write (iout,90) minimum,grms,gnorm 181 write (iout,100) minimum,grms,gnorm 186 write (iout,110) minimum,grms,gnorm 193 write (iout,120) minimum,grms,gnorm [all …]
|
H A D | critical.f | 33 real*8 gnorm,grms 160 gnorm = 0.0d0 164 gnorm = gnorm + derivs(j,k)**2 167 gnorm = sqrt(gnorm) 168 grms = gnorm / sqrt(dble(nvar/3)) 179 write (iout,50) epot,grms,gnorm 184 write (iout,60) epot,grms,gnorm 191 write (iout,70) epot,grms,gnorm 196 write (iout,80) epot,grms,gnorm 203 write (iout,90) epot,grms,gnorm [all …]
|
H A D | newton.f | 30 real*8 gnorm,grms,grdmin 161 gnorm = 0.0d0 165 gnorm = gnorm + derivs(j,k)**2 168 gnorm = sqrt(gnorm) 169 grms = gnorm / sqrt(dble(nvar/3)) 180 write (iout,80) minimum,grms,gnorm 185 write (iout,90) minimum,grms,gnorm 192 write (iout,100) minimum,grms,gnorm 197 write (iout,110) minimum,grms,gnorm 204 write (iout,120) minimum,grms,gnorm [all …]
|
/dports/math/octave-forge-ltfat/ltfat/src/modules/libltfat/src/ |
H A D | windows.c | 10 double tmp, sqrtL, safe, gnorm, gtmp; in LTFAT_NAME() local 19 gnorm = 0; in LTFAT_NAME() 33 gnorm += gtmp * gtmp; in LTFAT_NAME() 38 gnorm = sqrt(gnorm); in LTFAT_NAME() 41 g[lr] /= ( (LTFAT_REAL) gnorm); in LTFAT_NAME() 61 double tmp, sqrtL, safe, gnorm; in LTFAT_NAME_COMPLEX() local 70 gnorm = 0; in LTFAT_NAME_COMPLEX() 91 gnorm += (gReal * gReal + gImag * gImag); in LTFAT_NAME_COMPLEX() 95 gnorm = sqrt(gnorm); in LTFAT_NAME_COMPLEX() 98 g[lr] /= ( (LTFAT_REAL) gnorm ); in LTFAT_NAME_COMPLEX()
|
/dports/science/PETSc/petsc-3.14.1/src/snes/tests/output/ |
H A D | ex241_1.out | 6 Line search: Using full step: fnorm 9.999000000000e-01 gnorm 5.624375006250e-01 10 Line search: Using full step: fnorm 5.624375006250e-01 gnorm 1.405843796004e-01 14 Line search: Using full step: fnorm 1.405843796004e-01 gnorm 3.512111267037e-02 18 Line search: Using full step: fnorm 3.512111267037e-02 gnorm 8.755349147747e-03 22 Line search: Using full step: fnorm 8.755349147747e-03 gnorm 2.164119602175e-03 26 Line search: Using full step: fnorm 2.164119602175e-03 gnorm 5.171340824948e-04 30 Line search: Using full step: fnorm 5.171340824948e-04 gnorm 1.083345041472e-04 34 Line search: Using full step: fnorm 1.083345041472e-04 gnorm 1.408355859831e-05 38 Line search: Using full step: fnorm 1.408355859831e-05 gnorm 4.346520770148e-07 42 Line search: Using full step: fnorm 4.346520770148e-07 gnorm 4.702620662805e-10
|
/dports/math/optpp/optpp-2.4/src/Base/ |
H A D | dogleg.C | 58 real norm_cp, norm_nw, gnorm; in dogleg() local 88 gnorm = Norm2(scaled_grad); in dogleg() 89 CP_length = (gnorm * gnorm * gnorm) / gBg; in dogleg() 102 << "gnorm = " << e(gnorm,12,4) << "\n" in dogleg() 106 alpha = -TR_size / gnorm; in dogleg() 118 alpha = -(gnorm * gnorm / gBg); in dogleg()
|
/dports/x11-toolkits/gtk40/gtk-4.4.1/gsk/gl/resources/ |
H A D | linear_gradient.glsl | 26 // 2. Let gnorm = gradient / gradientLength, then: 27 …// proj = (dot(gnorm * gradientLength, pos) / (gradientLength * gradientLength)) * (gnorm * gradie… 28 // = dot(gnorm, pos) * gnorm 29 // 3. Since gnorm is unit length then: 30 // length(proj) = length(dot(gnorm, pos) * gnorm) = dot(gnorm, pos) 32 // offset = dot(gnorm, pos) / gradientLength = dot(gnorm, pos / gradientLength)
|
/dports/science/dakota/dakota-6.13.0-release-public.src-UI/packages/external/OPTPP/src/Base/ |
H A D | dogleg.C | 64 double norm_cp, norm_nw, gnorm; in dogleg() local 103 gnorm = sqrt(scaled_grad.dot(scaled_grad)); in dogleg() 104 CP_length = (gnorm * gnorm * gnorm) / gBg; in dogleg() 117 << "gnorm = " << e(gnorm,12,4) << "\n" in dogleg() 121 alpha = -TR_size / gnorm; in dogleg() 135 alpha = -(gnorm * gnorm / gBg); in dogleg()
|
/dports/x11-toolkits/gtk40/gtk-4.4.1/gsk/ngl/resources/ |
H A D | linear_gradient.glsl | 27 // 2. Let gnorm = gradient / gradientLength, then: 28 …// proj = (dot(gnorm * gradientLength, pos) / (gradientLength * gradientLength)) * (gnorm * gradie… 29 // = dot(gnorm, pos) * gnorm 30 // 3. Since gnorm is unit length then: 31 // length(proj) = length(dot(gnorm, pos) * gnorm) = dot(gnorm, pos) 33 // offset = dot(gnorm, pos) / gradientLength = dot(gnorm, pos / gradientLength)
|
/dports/graphics/rayshade/rayshade.4.0/libray/libsurf/ |
H A D | surfshade.c | 38 ComputeSurfProps(hitlist, ray, pos, norm, gnorm, surf, smooth) in ComputeSurfProps() argument 42 Vector *norm, *gnorm; /* shading normal, geometric normal (return values) */ 65 *smooth = PrimNormal(prim, pos, norm, gnorm); 105 kp = dotp(&hitlist->data[0].ray.dir, gnorm); 112 VecScale(-1., *gnorm, gnorm); 144 NormalTransform(gnorm, &world2model.itrans); 190 gnorm, surf, &prim2model, &world2model); 193 NormalTransform(gnorm, &world2model.trans);
|
/dports/math/optpp/optpp-2.4/src/Newton/ |
H A D | OptCG.C | 70 double gnorm = Norm2(grad); in checkConvg() local 71 if (gnorm <= rgtol) { in checkConvg() 73 *optout << "checkConvg: gnorm = " << e(gnorm,12,4) in checkConvg() 81 if (gnorm <= gtol) { in checkConvg() 194 double fvalue, gnorm; in initOpt() local 202 gprev = nlp->getGrad(); gnorm = Norm2(gprev); in initOpt() 263 double slope, gnorm; in optimize() local 290 gnorm = sqrt(Dot(grad,grad)); in optimize() 292 step = 1.0/gnorm; in optimize() 325 gnorm = sqrt(Dot(grad,grad)); in optimize() [all …]
|
H A D | OptBCNewtonLike.C | 79 double fvalue, gnorm; in defaultAcceptStep() local 88 gnorm = Norm2(grad); in defaultAcceptStep() 189 double gnorm = Norm2(grad); in checkConvg() local 190 if (gnorm <= rgtol) { in checkConvg() 200 if (gnorm <= gtol) { in checkConvg() 232 gnorm = grad.NormInfinity(); in checkAnalyticFDGrad() 324 Real typx, xmax, gnorm; in initHessian() local 328 gnorm = Norm2(grad); in initHessian() 336 if(gnorm!= 0.0) D = gnorm/typx; in initHessian() 348 double gnorm; in initOpt() local [all …]
|
H A D | OptNewtonLike.C | 82 double fvalue, gnorm; in defaultAcceptStep() local 91 gnorm = Norm2(grad); in defaultAcceptStep() 184 double gnorm = grad.NormInfinity(); in checkAnalyticFDGrad() local 238 double gnorm = Norm2(grad); in checkConvg() local 239 if (gnorm <= rgtol) { in checkConvg() 249 if (gnorm <= gtol) { in checkConvg() 317 double gnorm; in initOpt() local 360 gnorm = Norm2(gprev); in initOpt() 410 Real typx, xmax, gnorm; in initHessian() local 414 gnorm = Norm2(grad); in initHessian() [all …]
|
/dports/science/dakota/dakota-6.13.0-release-public.src-UI/packages/external/OPTPP/src/Newton/ |
H A D | OptCG.C | 71 double gnorm = sqrt(grad.dot(grad)); in checkConvg() local 72 if (gnorm <= rgtol) { in checkConvg() 74 *optout << "checkConvg: gnorm = " << e(gnorm,12,4) in checkConvg() 82 if (gnorm <= gtol) { in checkConvg() 205 double fvalue, gnorm; in initOpt() local 215 gnorm = sqrt(gprev.dot(gprev)); in initOpt() 276 double slope, gnorm; in optimize() local 304 gnorm = sqrt(grad.dot(grad)); in optimize() 306 step = 1.0/gnorm; in optimize() 341 gnorm = sqrt(grad.dot(grad)); in optimize() [all …]
|
/dports/graphics/libpano13/libpano13-2.9.20/ |
H A D | hdrfile.c | 56 double gnorm; in writeHDR() local 61 gnorm = (1 / pow( 65535.0 , 2.2 )); in writeHDR() 64 *fdata++=(float)(pow((double)*srcdata++,2.2) * gnorm); in writeHDR() 65 *fdata++=(float)(pow((double)*srcdata++,2.2) * gnorm); in writeHDR() 66 *fdata++=(float)(pow((double)*srcdata++,2.2) * gnorm); in writeHDR() 72 double gnorm; in writeHDR() local 76 gnorm = (1 / pow( 255.0 , 2.2 )); in writeHDR() 79 *fdata++=(float)(pow((double)*srcdata++,2.2) * gnorm); in writeHDR() 80 *fdata++=(float)(pow((double)*srcdata++,2.2) * gnorm); in writeHDR() 81 *fdata++=(float)(pow((double)*srcdata++,2.2) * gnorm); in writeHDR()
|
/dports/science/PETSc/petsc-3.14.1/src/snes/linesearch/impls/bt/ |
H A D | linesearchbt.c | 58 PetscReal fnorm, xnorm, ynorm, gnorm; in SNESLineSearchApply_BT() local 149 gnorm = fnorm; in SNESLineSearchApply_BT() 152 ierr = VecNorm(G,NORM_2,&gnorm);CHKERRQ(ierr); in SNESLineSearchApply_BT() 154 g = PetscSqr(gnorm); in SNESLineSearchApply_BT() 218 gnorm = fnorm; in SNESLineSearchApply_BT() 223 g = PetscSqr(gnorm); in SNESLineSearchApply_BT() 301 gnorm = fnorm; in SNESLineSearchApply_BT() 306 g = PetscSqr(gnorm); in SNESLineSearchApply_BT() 368 gnorm = fnorm; in SNESLineSearchApply_BT() 371 ierr = VecNorm(G,NORM_2,&gnorm);CHKERRQ(ierr); in SNESLineSearchApply_BT() [all …]
|
/dports/science/cp2k/cp2k-2e995eec7fd208c8a72d9544807bd8b8ba8cd1cc/src/ |
H A D | qs_ot_minimizer.F | 566 qs_ot_env(1)%gnorm = qs_ot_env(1)%gnorm + tmp 592 qs_ot_env(1)%gnorm = qs_ot_env(1)%gnorm + tmp 601 qs_ot_env(1)%gnorm = qs_ot_env(1)%gnorm + tmp 614 qs_ot_env(1)%gnorm = qs_ot_env(1)%gnorm + tmp 706 qs_ot_env(1)%gnorm = qs_ot_env(1)%gnorm + tmp 731 qs_ot_env(1)%gnorm = qs_ot_env(1)%gnorm + tmp 740 qs_ot_env(1)%gnorm = qs_ot_env(1)%gnorm + tmp 755 qs_ot_env(1)%gnorm = qs_ot_env(1)%gnorm + tmp 891 qs_ot_env(1)%gnorm = qs_ot_env(1)%gnorm + tmp 1242 qs_ot_env(1)%gnorm = qs_ot_env(1)%gnorm + tmp [all …]
|
/dports/science/cp2k-data/cp2k-7.1.0/src/ |
H A D | qs_ot_minimizer.F | 566 qs_ot_env(1)%gnorm = qs_ot_env(1)%gnorm + tmp 592 qs_ot_env(1)%gnorm = qs_ot_env(1)%gnorm + tmp 601 qs_ot_env(1)%gnorm = qs_ot_env(1)%gnorm + tmp 614 qs_ot_env(1)%gnorm = qs_ot_env(1)%gnorm + tmp 706 qs_ot_env(1)%gnorm = qs_ot_env(1)%gnorm + tmp 731 qs_ot_env(1)%gnorm = qs_ot_env(1)%gnorm + tmp 740 qs_ot_env(1)%gnorm = qs_ot_env(1)%gnorm + tmp 755 qs_ot_env(1)%gnorm = qs_ot_env(1)%gnorm + tmp 891 qs_ot_env(1)%gnorm = qs_ot_env(1)%gnorm + tmp 1242 qs_ot_env(1)%gnorm = qs_ot_env(1)%gnorm + tmp [all …]
|