/dports/math/cminpack/cminpack-1.3.6/examples/ |
H A D | hybdrv.f | 27 double precision factor,fnorm1,fnorm2,one,ten,tol 54 fnorm2 = enorm(n,fvec) 59 fnm(ic) = fnorm2 60 write (nwrite,70) fnorm1,fnorm2,nfev,info,(x(i), i = 1, n)
|
H A D | hybdrv.c | 88 real factor,fnorm1,fnorm2,tol; in main() local 123 fnorm2 = __cminpack_func__(enorm)(n,fvec); in main() 132 fnm[ic] = fnorm2; in main() 140 (double)fnorm1, (double)fnorm2, hybrdtest.nfev, hybrdtest.njev, info); in main()
|
H A D | hybdrv_.c | 89 real factor,fnorm1,fnorm2,tol; in main() local 125 fnorm2 = __minpack_func__(enorm)(&n,fvec); in main() 134 fnm[ic] = fnorm2; in main() 142 (double)fnorm1, (double)fnorm2, hybrdtest.nfev, hybrdtest.njev, info); in main()
|
H A D | hyjdrv_.c | 90 real factor,fnorm1,fnorm2,tol; in main() local 129 fnorm2 = __minpack_func__(enorm)(&n,fvec); in main() 137 fnm[ic] = fnorm2; in main() 145 (double)fnorm1, (double)fnorm2, hybrjtest.nfev, hybrjtest.njev, info); in main()
|
H A D | lmfdrv_.c | 90 real factor,fnorm1,fnorm2,tol; in main() local 137 fnorm2 = __minpack_func__(enorm)(&m,fvec); in main() 147 fnm[ic] = fnorm2; in main() 155 (double)fnorm1, (double)fnorm2, lmdiftest.nfev, lmdiftest.njev, info); in main()
|
H A D | hyjdrv.c | 89 real factor,fnorm1,fnorm2,tol; in main() local 127 fnorm2 = __cminpack_func__(enorm)(n,fvec); in main() 135 fnm[ic] = fnorm2; in main() 143 (double)fnorm1, (double)fnorm2, hybrjtest.nfev, hybrjtest.njev, info); in main()
|
H A D | hyjdrv.f | 28 double precision factor,fnorm1,fnorm2,one,ten,tol 57 fnorm2 = enorm(n,fvec) 63 fnm(ic) = fnorm2 65 1 fnorm1,fnorm2,nfev,njev,info,(x(i), i = 1, n)
|
H A D | lmddrv_.c | 91 real factor,fnorm1,fnorm2,tol; in main() local 141 fnorm2 = __minpack_func__(enorm)(&m,fvec); in main() 150 fnm[ic] = fnorm2; in main() 158 (double)fnorm1, (double)fnorm2, lmdertest.nfev, lmdertest.njev, info); in main()
|
H A D | lmfdrv.c | 89 real factor,fnorm1,fnorm2,tol; in main() local 135 fnorm2 = __cminpack_func__(enorm)(m,fvec); in main() 145 fnm[ic] = fnorm2; in main() 153 (double)fnorm1, (double)fnorm2, lmdiftest.nfev, lmdiftest.njev, info); in main()
|
H A D | lmfdrv.f | 27 double precision factor,fnorm1,fnorm2,one,ten,tol 56 fnorm2 = enorm(m,fvec) 64 fnm(ic) = fnorm2 66 * fnorm1,fnorm2,nfev,njev,info,(x(i), i = 1, n)
|
H A D | lmddrv.f | 28 double precision factor,fnorm1,fnorm2,one,ten,tol 59 fnorm2 = enorm(m,fvec) 66 fnm(ic) = fnorm2 68 * fnorm1,fnorm2,nfev,njev,info,(x(i), i = 1, n)
|
H A D | lmsdrv.c | 89 real factor,fnorm1,fnorm2,tol; in main() local 139 fnorm2 = __cminpack_func__(enorm)(m,fvec); in main() 148 fnm[ic] = fnorm2; in main() 156 (double)fnorm1, (double)fnorm2, lmstrtest.nfev, lmstrtest.njev, info); in main()
|
H A D | lmsdrv.f | 28 double precision factor,fnorm1,fnorm2,one,ten,tol 59 fnorm2 = enorm(m,fvec) 66 fnm(ic) = fnorm2 68 * fnorm1,fnorm2,nfev,njev,info,(x(i), i = 1, n)
|
H A D | lmsdrv_.c | 90 real factor,fnorm1,fnorm2,tol; in main() local 141 fnorm2 = __minpack_func__(enorm)(&m,fvec); in main() 150 fnm[ic] = fnorm2; in main() 158 (double)fnorm1, (double)fnorm2, lmstrtest.nfev, lmstrtest.njev, info); in main()
|
H A D | lmddrv.c | 90 real factor,fnorm1,fnorm2,tol; in main() local 139 fnorm2 = __cminpack_func__(enorm)(m,fvec); in main() 148 fnm[ic] = fnorm2; in main() 156 (double)fnorm1, (double)fnorm2, lmdertest.nfev, lmdertest.njev, info); in main()
|
/dports/science/nwchem/nwchem-7b21660b82ebd85ef659f6fba7e1e73433b0bd0a/src/argos/ |
H A D | argos_congra.F | 22 real*8 dxsmax,dxwmax,fnorm1,fnorm2,ypa,ypb,pnorm,dxstep 420 fnorm2=zero 429 fnorm2=fnorm2+fw(iwm,ix,iwa)**2 440 fnorm2=fnorm2+fs(isa,ix)**2 447 call ga_dgop(mrg_d13,fnorm2,1,'+') 449 beta1=sqrt(fnorm2/fnorm1) 450 fnorm1=fnorm2
|
/dports/science/nwchem-data/nwchem-7.0.2-release/src/argos/ |
H A D | argos_congra.F | 22 real*8 dxsmax,dxwmax,fnorm1,fnorm2,ypa,ypb,pnorm,dxstep 420 fnorm2=zero 429 fnorm2=fnorm2+fw(iwm,ix,iwa)**2 440 fnorm2=fnorm2+fs(isa,ix)**2 447 call ga_dgop(mrg_d13,fnorm2,1,'+') 449 beta1=sqrt(fnorm2/fnorm1) 450 fnorm1=fnorm2
|
/dports/math/dsdp/DSDP5.8/src/vecmat/ |
H A D | onemat.c | 143 static int ConstMatFNorm2(void*AA, int n, double *fnorm2){ in ConstMatFNorm2() argument 145 *fnorm2=A->cnst*A->cnst*n*n; in ConstMatFNorm2()
|
/dports/math/casadi/casadi-3.5.5/external_packages/DSDP/src/vecmat/ |
H A D | onemat.c | 143 static int ConstMatFNorm2(void*AA, int n, double *fnorm2){ in ConstMatFNorm2() argument 145 *fnorm2=A->cnst*A->cnst*n*n; in ConstMatFNorm2()
|
/dports/math/dsdp/DSDP5.8/src/sdp/ |
H A D | dsdpdatamat.c | 175 int DSDPDataMatFNorm2(DSDPDataMat A, int n, double *fnorm2){ in DSDPDataMatFNorm2() argument 179 *fnorm2=0.0; in DSDPDataMatFNorm2() 180 info=(A.dsdpops->matfnorm2)(A.matdata,n,fnorm2); DSDPChkDataError(A,info); in DSDPDataMatFNorm2()
|
H A D | dsdpxmat.c | 330 double fnorm0,fnorm1,fnorm2,fnorm3,fnorm4; in DSDPVMatCheck() local 347 info=DSDPVMatNormF2(X,&fnorm2);DSDPCHKERR(info); in DSDPVMatCheck() 348 if (fabs(fnorm2-n*n)>eps) printf("Check DSDPXGetArray()\n"); in DSDPVMatCheck()
|
/dports/math/casadi/casadi-3.5.5/external_packages/DSDP/src/sdp/ |
H A D | dsdpdatamat.c | 175 int DSDPDataMatFNorm2(DSDPDataMat A, int n, double *fnorm2){ in DSDPDataMatFNorm2() argument 179 *fnorm2=0.0; in DSDPDataMatFNorm2() 180 info=(A.dsdpops->matfnorm2)(A.matdata,n,fnorm2); DSDPChkDataError(A,info); in DSDPDataMatFNorm2()
|
H A D | dsdpxmat.c | 330 double fnorm0,fnorm1,fnorm2,fnorm3,fnorm4; in DSDPVMatCheck() local 347 info=DSDPVMatNormF2(X,&fnorm2);DSDPCHKERR(info); in DSDPVMatCheck() 348 if (fabs(fnorm2-n*n)>eps) printf("Check DSDPXGetArray()\n"); in DSDPVMatCheck()
|
/dports/science/dakota/dakota-6.13.0-release-public.src-UI/packages/external/trilinos/packages/rol/example/PDE-OPT/topo-opt/poisson/ |
H A D | example_02.cpp | 166 RealT objScaling = objFactor, fnorm2 = fp->dot(*fp); in main() local 167 if (fnorm2 > 1e2*ROL::ROL_EPSILON<RealT>()) { in main() 168 objScaling /= fnorm2; in main()
|
/dports/science/dakota/dakota-6.13.0-release-public.src-UI/packages/external/trilinos/packages/rol/example/PDE-OPT/topo-opt/elasticity/old/ |
H A D | example_07.cpp | 241 RealT objScaling = objFactor, fnorm2 = fp->dot(*fp); in main() local 242 if (fnorm2 > 1e2*ROL::ROL_EPSILON<RealT>()) { in main() 243 objScaling /= fnorm2; in main()
|