/dports/math/dsdp/DSDP5.8/src/solver/ |
H A D | dsdpprintout.c | 14 double ppobj,ddobj,pstp,dstp,mu,res,pinfeas,pnorm; in DSDPPrintStatsFile() local 32 info = DSDPGetPnorm(dsdp,&pnorm); DSDPCHKERR(info); in DSDPPrintStatsFile() 41 if (pnorm>1.0e3){ in DSDPPrintStatsFile() 42 fprintf(dsdpoutputfile," %1.0e \n",pnorm); in DSDPPrintStatsFile() 44 fprintf(dsdpoutputfile," %5.2f \n",pnorm); in DSDPPrintStatsFile() 73 double ppobj,ddobj,pstp,dstp,mu,res,pinfeas,pnorm; in DSDPPrintStats() local 90 info = DSDPGetPnorm(dsdp,&pnorm); DSDPCHKERR(info); in DSDPPrintStats() 101 if (pnorm>1.0e3){ in DSDPPrintStats() 102 printf(" %1.0e \n",pnorm); in DSDPPrintStats() 104 printf(" %5.2f \n",pnorm); in DSDPPrintStats()
|
/dports/math/casadi/casadi-3.5.5/external_packages/DSDP/src/solver/ |
H A D | dsdpprintout.c | 14 double ppobj,ddobj,pstp,dstp,mu,res,pinfeas,pnorm; in DSDPPrintStatsFile() local 32 info = DSDPGetPnorm(dsdp,&pnorm); DSDPCHKERR(info); in DSDPPrintStatsFile() 41 if (pnorm>1.0e3){ in DSDPPrintStatsFile() 42 fprintf(dsdpoutputfile," %1.0e \n",pnorm); in DSDPPrintStatsFile() 44 fprintf(dsdpoutputfile," %5.2f \n",pnorm); in DSDPPrintStatsFile() 73 double ppobj,ddobj,pstp,dstp,mu,res,pinfeas,pnorm; in DSDPPrintStats() local 90 info = DSDPGetPnorm(dsdp,&pnorm); DSDPCHKERR(info); in DSDPPrintStats() 101 if (pnorm>1.0e3){ in DSDPPrintStats() 102 printf(" %1.0e \n",pnorm); in DSDPPrintStats() 104 printf(" %5.2f \n",pnorm); in DSDPPrintStats()
|
/dports/audio/praat/praat-6.2.03/external/gsl/ |
H A D | gsl_multimin__conjugate_fr.c | 39 double pnorm; in TraverseHandleDatabase() 121 state->pnorm = gnorm; 162 double pnorm = state->pnorm; 172 if (pnorm == 0.0 || g0norm == 0.0) 187 take_step (x, p, stepc, dir / pnorm, x1, dx); 211 intermediate_point (fdf, x, p, dir / pnorm, pg, 219 minimize (fdf, x, p, dir / pnorm, 232 state->pnorm = g1norm; 241 state->pnorm = gsl_blas_dnrm2 (p);
|
H A D | gsl_multimin__conjugate_pr.c | 39 double pnorm; member 121 state->pnorm = gnorm; in conjugate_pr_set() 162 double pnorm = state->pnorm; in conjugate_pr_iterate() local 172 if (pnorm == 0.0 || g0norm == 0.0) in conjugate_pr_iterate() 187 take_step (x, p, stepc, dir / pnorm, x1, dx); in conjugate_pr_iterate() 211 intermediate_point (fdf, x, p, dir / pnorm, pg, in conjugate_pr_iterate() 219 minimize (fdf, x, p, dir / pnorm, in conjugate_pr_iterate() 232 state->pnorm = g1norm; in conjugate_pr_iterate() 246 state->pnorm = gsl_blas_dnrm2 (p); in conjugate_pr_iterate()
|
H A D | gsl_multifit__lmiterate.c | 21 double pnorm, fnorm1, fnorm1p, gnorm; in iterate() local 67 pnorm = scaled_enorm (diag, dx); in iterate() 71 if (pnorm < state->delta) in iterate() 74 printf("set delta = pnorm = %g\n" , pnorm); in iterate() 76 state->delta = pnorm; in iterate() 115 double t2 = (sqrt(state->par) * pnorm) / state->fnorm; in iterate() 146 state->delta = pnorm / p5; in iterate() 166 state->delta = temp * GSL_MIN_DBL (state->delta, pnorm/p1); in iterate()
|
H A D | gsl_multimin__vector_bfgs.c | 40 double pnorm; 163 state->pnorm = gnorm; 208 double pnorm = state->pnorm; 218 if (pnorm == 0.0 || g0norm == 0.0) 233 take_step (x, p, stepc, dir / pnorm, x1, dx); 257 intermediate_point (fdf, x, p, dir / pnorm, pg, 265 minimize (fdf, x, p, dir / pnorm, 278 state->pnorm = g1norm; 321 state->pnorm = gsl_blas_dnrm2 (p);
|
/dports/math/gsl/gsl-2.7/multimin/ |
H A D | conjugate_fr.c | 39 double pnorm; member 121 state->pnorm = gnorm; in conjugate_fr_set() 162 double pnorm = state->pnorm; in conjugate_fr_iterate() local 172 if (pnorm == 0.0 || g0norm == 0.0) in conjugate_fr_iterate() 187 take_step (x, p, stepc, dir / pnorm, x1, dx); in conjugate_fr_iterate() 211 intermediate_point (fdf, x, p, dir / pnorm, pg, in conjugate_fr_iterate() 219 minimize (fdf, x, p, dir / pnorm, in conjugate_fr_iterate() 232 state->pnorm = g1norm; in conjugate_fr_iterate() 241 state->pnorm = gsl_blas_dnrm2 (p); in conjugate_fr_iterate()
|
H A D | conjugate_pr.c | 39 double pnorm; member 121 state->pnorm = gnorm; in conjugate_pr_set() 162 double pnorm = state->pnorm; in conjugate_pr_iterate() local 172 if (pnorm == 0.0 || g0norm == 0.0) in conjugate_pr_iterate() 187 take_step (x, p, stepc, dir / pnorm, x1, dx); in conjugate_pr_iterate() 211 intermediate_point (fdf, x, p, dir / pnorm, pg, in conjugate_pr_iterate() 219 minimize (fdf, x, p, dir / pnorm, in conjugate_pr_iterate() 232 state->pnorm = g1norm; in conjugate_pr_iterate() 246 state->pnorm = gsl_blas_dnrm2 (p); in conjugate_pr_iterate()
|
H A D | vector_bfgs.c | 40 double pnorm; member 163 state->pnorm = gnorm; in vector_bfgs_set() 208 double pnorm = state->pnorm; in vector_bfgs_iterate() local 218 if (pnorm == 0.0 || g0norm == 0.0) in vector_bfgs_iterate() 233 take_step (x, p, stepc, dir / pnorm, x1, dx); in vector_bfgs_iterate() 257 intermediate_point (fdf, x, p, dir / pnorm, pg, in vector_bfgs_iterate() 265 minimize (fdf, x, p, dir / pnorm, in vector_bfgs_iterate() 278 state->pnorm = g1norm; in vector_bfgs_iterate() 321 state->pnorm = gsl_blas_dnrm2 (p); in vector_bfgs_iterate()
|
/dports/math/R-cran-Rmpfr/Rmpfr/man/ |
H A D | distr-etc.Rd | 3 \alias{pnorm} 19 pnorm(q, mean = 0, sd = 1, lower.tail = TRUE, log.p = FALSE) 26 \code{pnorm()} is based on \code{\link{erf}()} and \code{erfc()} which 28 of \code{pnorm}, \code{erf(x) = 2*pnorm(sqrt(2)*x)} and 29 \code{erfc(x) = 2* pnorm(sqrt(2)*x, lower=FALSE)}. 31 \note{E.g., for \code{pnorm(*, log.p = TRUE)} to be useful, i.e., not to 42 \code{\link[stats:Normal]{pnorm}}, 53 \seealso{\code{\link[stats:Normal]{pnorm}}, 75 ## For pnorm() in the extreme tails, need an exponent range 80 pnorm(tens, lower.tail=FALSE, log.p=TRUE) # "works" [all …]
|
/dports/math/sisl/SISL-SISL-4.6.0-44-g9114631/src/ |
H A D | s1302.c | 135 SISLCurve *pnorm=SISL_NULL; /* Pointer to normalized circle segment */ local 212 s1301(treler,angle,kdim,&pnorm,&kstat); 217 st1 = pnorm -> et; 218 scoef1 = pnorm -> ecoef; 219 kn1 = pnorm -> in; 220 kk1 = pnorm -> ik; 289 if (pnorm != SISL_NULL) freeCurve(pnorm);
|
H A D | s1520.c | 140 SISLCurve *pnorm; /* Pointer to normalized circle segment */ local 257 s1713 (totcurve, spar, epar, &pnorm, &kstat); 263 st1 = pnorm->et; 264 scoef1 = pnorm->ecoef; 265 rcoef1 = pnorm->rcoef; 266 kn1 = pnorm->in; 267 kk1 = pnorm->ik; 350 if (pnorm != SISL_NULL) freeCurve (pnorm);
|
/dports/science/R-cran-DCluster/DCluster/R/ |
H A D | dean_test.R | 7 u <- pnorm(zscore) 34 Pv <- 2 * pnorm(abs(Pb), lower.tail=FALSE) 36 Pv <- pnorm(Pb, lower.tail=FALSE) 37 else Pv <- pnorm(Pb) 56 Pv <- 2 * pnorm(abs(Pb2), lower.tail=FALSE) 58 Pv <- pnorm(Pb2, lower.tail=FALSE) 59 else Pv <- pnorm(Pb2)
|
/dports/math/R-cran-psych/psych/R/ |
H A D | p.rep.R | 4 p.rep <- pnorm(qnorm((1-p))/sqrt(2)) 18 p.rep <- pnorm(qnorm(1-p)/sqrt(2)) 27 p <- 1- pnorm(z) 28 p.rep <- pnorm(qnorm((1-p))/sqrt(2)) 45 p.rep <- pnorm(qnorm((1-p))/sqrt(2)) 53 p <- (1-pnorm(z )) 56 p.rep <- pnorm(qnorm((1-p))/sqrt(2))
|
/dports/math/R-cran-MCMCpack/MCMCpack/src/ |
H A D | MCMCordfactanal.cc | 164 log(1.0 - pnorm(gamma_p[X(i,j)-1] - X_mean[i], 0, 1) ) in MCMCordfactanal_impl() 168 log(pnorm(gamma_p[X(i,j)] - X_mean[i], 0, 1) ) in MCMCordfactanal_impl() 169 - log(pnorm(gamma(X(i,j), j) - X_mean[i], 0, 1) ); in MCMCordfactanal_impl() 172 log(pnorm(gamma_p[X(i,j)] - X_mean[i], 0, 1) in MCMCordfactanal_impl() 173 - pnorm(gamma_p[X(i,j)-1] - X_mean[i], 0, 1) ) in MCMCordfactanal_impl() 174 - log(pnorm(gamma(X(i,j), j) - X_mean[i], 0, 1) - in MCMCordfactanal_impl() 175 pnorm(gamma(X(i,j)-1, j) - X_mean[i], 0, 1) ); in MCMCordfactanal_impl() 182 + log(pnorm(gamma(k+1,j), gamma(k,j), tune[j]) - in MCMCordfactanal_impl() 183 pnorm(gamma_p[k-1], gamma(k,j), tune[j]) ) - in MCMCordfactanal_impl() 184 log(pnorm(gamma_p[k+1], gamma_p[k], tune[j]) - in MCMCordfactanal_impl() [all …]
|
H A D | cMCMCoprobit.cc | 132 cat_prob(i, j) = pnorm(gamma[j+1] - mu[i], 0.0, 1.0); in oprobit_logpost() 173 cat_prob(i, j) = pnorm(gamma[j+1] - mu[i], 0.0, 1.0); in operator ()() 267 - log(pnorm(gamma[Y[i]] - Xbeta[i], 0.0, 1.0) ); in MCMCoprobit_impl() 271 + log(pnorm(gamma_p[Y[i]] - Xbeta[i], 0.0, 1.0) - in MCMCoprobit_impl() 272 pnorm(gamma_p[Y[i]-1] - Xbeta[i], 0.0, 1.0) ) in MCMCoprobit_impl() 273 - log(pnorm(gamma[Y[i]] - Xbeta[i], 0.0, 1.0) - in MCMCoprobit_impl() 274 pnorm(gamma[Y[i]-1] - Xbeta[i], 0.0, 1.0) ); in MCMCoprobit_impl() 279 + log(pnorm(gamma[j+1], gamma[j], tune[0]) - in MCMCoprobit_impl() 280 pnorm(gamma_p[j-1], gamma[j], tune[0]) ) in MCMCoprobit_impl() 281 - log(pnorm(gamma_p[j+1], gamma_p[j], tune[0]) - in MCMCoprobit_impl() [all …]
|
/dports/math/gsl/gsl-2.7/multifit/ |
H A D | lmiterate.c | 23 double pnorm, fnorm1, fnorm1p, gnorm; in iterate() local 64 pnorm = scaled_enorm (diag, dx); in iterate() 68 if (pnorm < state->delta) in iterate() 71 printf("set delta = pnorm = %g\n" , pnorm); in iterate() 73 state->delta = pnorm; in iterate() 112 double t2 = (sqrt(state->par) * pnorm) / state->fnorm; in iterate() 143 state->delta = pnorm / p5; in iterate() 163 state->delta = temp * GSL_MIN_DBL (state->delta, pnorm/p1); in iterate()
|
/dports/science/nwchem-data/nwchem-7.0.2-release/src/argos/ |
H A D | argos_diana_proj.F | 10 real*8 vct(*),val(nfrdim),pnorm,vval 23 pnorm=0.0d0 30 pnorm=pnorm+vct(m)*vct(m) 33 val(k)=val(k)/sqrt(pnorm)
|
/dports/science/nwchem/nwchem-7b21660b82ebd85ef659f6fba7e1e73433b0bd0a/src/argos/ |
H A D | argos_diana_proj.F | 10 real*8 vct(*),val(nfrdim),pnorm,vval 23 pnorm=0.0d0 30 pnorm=pnorm+vct(m)*vct(m) 33 val(k)=val(k)/sqrt(pnorm)
|
/dports/math/scilab/scilab-6.1.1/scilab/modules/scicos/src/scicos_sundials/src/kinsol/ |
H A D | kinsol.c | 1183 realtype pnorm, ratio; in KINFullNewton() local 1190 if (pnorm > mxnewtstep) in KINFullNewton() 1204 stepl = pnorm; in KINFullNewton() 1215 stepl = pnorm; in KINFullNewton() 1258 pnorm *= HALF; in KINFullNewton() 1259 stepl = pnorm; in KINFullNewton() 1364 stepl = pnorm; in KINLineSearch() 1374 stepl = pnorm; in KINLineSearch() 1391 stepl = pnorm; in KINLineSearch() 1434 pnorm *= HALF; in KINLineSearch() [all …]
|
/dports/science/sparta/sparta-20Oct2021/src/KOKKOS/ |
H A D | compute_surf_kokkos.h | 109 double pdelta[3],pnorm[3],ptang[3],pdelta_force[3]; 188 MathExtraKokkos::scale3(MathExtraKokkos::dot3(pdelta,norm),norm,pnorm); 190 a_array_surf_tally(itally,k++) -= pnorm[0] * fluxscale; 198 MathExtraKokkos::scale3(MathExtraKokkos::dot3(pdelta,norm),norm,pnorm); 200 a_array_surf_tally(itally,k++) -= pnorm[1] * fluxscale; 208 MathExtraKokkos::scale3(MathExtraKokkos::dot3(pdelta,norm),norm,pnorm); 210 a_array_surf_tally(itally,k++) -= pnorm[2] * fluxscale; 218 MathExtraKokkos::scale3(MathExtraKokkos::dot3(pdelta,norm),norm,pnorm); 219 MathExtraKokkos::sub3(pdelta,pnorm,ptang); 230 MathExtraKokkos::sub3(pdelta,pnorm,ptang); [all …]
|
/dports/math/R-cran-gss/gss/R/ |
H A D | family.surv.R | 78 -sum(wt*(delta*(-xx.wk^2/2-log(1-pnorm(xx.wk))+log.nu) 79 +log((1-pnorm(xx.wk))/(1-pnorm(zz.wk))))) 86 s.xx <- ifelse(xx<7,dnorm(xx)/(1-pnorm(xx)),xx+1/xx) 87 s.zz <- ifelse(zz<7,dnorm(zz)/(1-pnorm(zz)),zz+1/zz) 118 s.xx <- log(1-pnorm(xx)) 119 s.zz <- log(1-pnorm(zz)) 133 s.xx <- ifelse(xx<7,log(1-pnorm(xx)),-xx^2/2-log(xx+.15)-log(2*pi)/2) 134 s.zz <- ifelse(zz<7,log(1-pnorm(zz)),-zz^2/2-log(zz+.15)-log(2*pi)/2) 163 -sum(wt*(delta*(-xx.wk^2/2-log(1-pnorm(xx.wk))) 164 +log((1-pnorm(xx.wk))/(1-pnorm(zz.wk))))) [all …]
|
/dports/math/R-cran-stabledist/stabledist/inst/xtraR/ |
H A D | Levy.R | 36 log(2) + pnorm(u, lower.tail = FALSE, log.p=TRUE) 37 else log(2 * pnorm(u) - 1) 40 2* pnorm(u, lower.tail = FALSE) 41 else 2*pnorm(u) - 1
|
/dports/math/R-cran-truncnorm/truncnorm/src/ |
H A D | truncnorm.c | 42 const double Phi_a = pnorm(alpha, 0.0, 1.0, FALSE, TRUE); in e_lefttruncnorm() 58 const double Phi_a = pnorm(alpha, 0.0, 1.0, TRUE, TRUE); in e_truncnorm() 60 const double Phi_b = pnorm(beta, 0.0, 1.0, TRUE, TRUE); in e_truncnorm() 81 const double Phi_b = pnorm(beta, 0.0, 1.0, TRUE, TRUE); in e_righttruncnorm() 88 const double Phi_a = pnorm(alpha, 0.0, 1.0, TRUE, FALSE); in v_lefttruncnorm() 104 const double pi1 = pnorm(a, mean, sd, TRUE, FALSE); in v_truncnorm() 106 pnorm(b, mean, sd, TRUE, FALSE) - pnorm(a, mean, sd, TRUE, FALSE); in v_truncnorm() 129 const double c1 = pnorm(q, mean, sd, TRUE, FALSE); in ptruncnorm() 130 const double c2 = pnorm(a, mean, sd, TRUE, FALSE); in ptruncnorm() 131 const double c3 = pnorm(b, mean, sd, TRUE, FALSE); in ptruncnorm() [all …]
|
/dports/graphics/opencv/opencv-4.5.3/modules/dnn/src/layers/ |
H A D | normalize_bbox_layer.cpp | 62 pnorm = params.get<float>("p", 2); in NormalizeBBoxLayerImpl() 68 CV_Assert(pnorm > 0); in NormalizeBBoxLayerImpl() 75 if (pnorm != 2) in supportBackend() 85 (backendId == DNN_BACKEND_CUDA && (pnorm == 1 || pnorm == 2)); in supportBackend() 146 pow(abs_mat, pnorm, buffer); in forward_ocl() 152 float norm = pow(absSum, 1.0f / pnorm); in forward_ocl() 162 cv::pow(norm, -1.0f / pnorm, norm); in forward_ocl() 228 cv::pow(abs(src), pnorm, buffer); in forward() 244 cv::pow(norm, -1.0f / pnorm, norm); in forward() 372 if(pnorm != 1 && pnorm != 2) in initCUDA() [all …]
|