/dports/science/cp2k-data/cp2k-7.1.0/src/ |
H A D | qs_condnum.F | 73 REAL(KIND=dp) :: amnorm, anorm, eps_ev, max_ev, min_ev, & local 126 min_ev = eigvals(1) 137 IF (min_ev > 0) THEN 141 … "CN : max/min ev: ", max_ev, " / ", min_ev, "=", max_ev/min_ev, "Log(2-CN):", LOG10(max_ev/min_ev) 144 "CN : max/min EV: ", max_ev, " / ", min_ev, "Log(CN): infinity" 153 CALL arnoldi_extremal(smat, max_ev, min_ev, & 157 IF (min_ev > 0) THEN 159 … "CN : max/min ev: ", max_ev, " / ", min_ev, "=", max_ev/min_ev, "Log(2-CN):", LOG10(max_ev/min_ev) 162 "CN : max/min ev: ", max_ev, " / ", min_ev, "Log(CN): infinity" 167 IF (min_ev == 0) THEN [all …]
|
H A D | iterate_matrix.F | 569 min_ev = min_ev*scalingf 597 min_ev = min_ev*(2.0_dp - min_ev) 615 min_ev = min_ev*2.0_dp/(min_ev + 1.0_dp) 616 CALL dbcsr_scale(matrix_inverse, 2.0_dp/(min_ev + 1.0_dp)) 1105 max_ev, min_ev, oa, ob, oc, & local 1148 CALL arnoldi_extremal(matrix_sqrt, max_ev, min_ev, threshold=eps_lanczos, & 1154 … WRITE (unit_nr, '(T6,A,1X,E12.3)') "Est. condition number :", max_ev/MAX(min_ev, EPSILON(min_ev)) 1158 scaling = 2.0_dp/(max_ev + min_ev + 100*eps_lanczos) 1386 CALL arnoldi_extremal(matrixS, max_ev, min_ev, threshold=eps_lanczos, & 1392 … WRITE (unit_nr, '(T6,A,1X,E12.3)') "Est. condition number :", max_ev/MAX(min_ev, EPSILON(min_ev)) [all …]
|
H A D | dm_ls_chebyshev.F | 115 interval_b, max_ev, min_ev, occ, orbital_occ, summa, t1, t2 local 195 …CALL arnoldi_extremal(matrix_F, max_ev, min_ev, converged=converged, max_iter=ls_scf_env%max_iter_… 198 "smallest largest eigenvalue", min_ev, max_ev, " converged ", converged 203 interval_a = (max_ev - min_ev)*scale_evals/2 204 interval_b = (max_ev + min_ev)/2 353 chev_E(igrid) = min_ev + (igrid - 1)*(max_ev - min_ev)/(n_gridpoint_dos - 1)
|
H A D | preconditioner_solvers.F | 275 REAL(KIND=dp) :: max_ev, min_ev local 294 min_ev = REAL(get_selected_ritz_val(my_arnoldi, 1), dp) 297 cond_num = max_ev/min_ev
|
H A D | preconditioner_makes.F | 695 REAL(KIND=dp) :: max_ev, min_ev, pre_shift local 784 pre_shift = MAX(1.5_dp*(min_ev - max_ev), energy_gap) 785 IF (min_ev .LT. pre_shift) THEN 786 pre_shift = pre_shift - min_ev
|
H A D | qs_ot.F | 766 REAL(KIND=dp) :: max_ev, min_ev, threshold local 779 CALL arnoldi_extremal(qs_ot_env%matrix_p, max_ev, min_ev, converged, threshold, max_iter) 780 qs_ot_env%largest_eval_upper_bound = MAX(max_ev, ABS(min_ev))
|
/dports/science/cp2k/cp2k-2e995eec7fd208c8a72d9544807bd8b8ba8cd1cc/src/ |
H A D | qs_condnum.F | 73 REAL(KIND=dp) :: amnorm, anorm, eps_ev, max_ev, min_ev, & local 126 min_ev = eigvals(1) 137 IF (min_ev > 0) THEN 141 … "CN : max/min ev: ", max_ev, " / ", min_ev, "=", max_ev/min_ev, "Log(2-CN):", LOG10(max_ev/min_ev) 144 "CN : max/min EV: ", max_ev, " / ", min_ev, "Log(CN): infinity" 153 CALL arnoldi_extremal(smat, max_ev, min_ev, & 157 IF (min_ev > 0) THEN 159 … "CN : max/min ev: ", max_ev, " / ", min_ev, "=", max_ev/min_ev, "Log(2-CN):", LOG10(max_ev/min_ev) 162 "CN : max/min ev: ", max_ev, " / ", min_ev, "Log(CN): infinity" 167 IF (min_ev == 0) THEN [all …]
|
H A D | dm_ls_chebyshev.F | 115 interval_b, max_ev, min_ev, occ, orbital_occ, summa, t1, t2 local 195 …CALL arnoldi_extremal(matrix_F, max_ev, min_ev, converged=converged, max_iter=ls_scf_env%max_iter_… 198 "smallest largest eigenvalue", min_ev, max_ev, " converged ", converged 203 interval_a = (max_ev - min_ev)*scale_evals/2 204 interval_b = (max_ev + min_ev)/2 353 chev_E(igrid) = min_ev + (igrid - 1)*(max_ev - min_ev)/(n_gridpoint_dos - 1)
|
H A D | iterate_matrix.F | 576 min_ev = min_ev*scalingf 604 min_ev = min_ev*(2.0_dp - min_ev) 622 min_ev = min_ev*2.0_dp/(min_ev + 1.0_dp) 623 CALL dbcsr_scale(matrix_inverse, 2.0_dp/(min_ev + 1.0_dp)) 1359 max_ev, min_ev, oa, ob, oc, & local 1402 CALL arnoldi_extremal(matrix_sqrt, max_ev, min_ev, threshold=eps_lanczos, & 1408 … WRITE (unit_nr, '(T6,A,1X,E12.3)') "Est. condition number :", max_ev/MAX(min_ev, EPSILON(min_ev)) 1412 scaling = 2.0_dp/(max_ev + min_ev + 100*eps_lanczos) 1640 CALL arnoldi_extremal(matrixS, max_ev, min_ev, threshold=eps_lanczos, & 1646 … WRITE (unit_nr, '(T6,A,1X,E12.3)') "Est. condition number :", max_ev/MAX(min_ev, EPSILON(min_ev)) [all …]
|
H A D | hfx_ri.F | 351 REAL(dp) :: max_ev, min_ev local 492 CALL arnoldi_extremal(t_2c_int_pot(1), max_ev, min_ev, threshold=ri_data%eps_lanczos, & 501 IF (min_ev > 0) THEN 503 … "CN : max/min ev: ", max_ev, " / ", min_ev, "=", max_ev/min_ev, "Log(2-CN):", LOG10(max_ev/min_ev) 506 "CN : max/min ev: ", max_ev, " / ", min_ev, "Log(CN): infinity" 511 CALL arnoldi_extremal(t_2c_int_RI(1), max_ev, min_ev, threshold=ri_data%eps_lanczos, & 520 IF (min_ev > 0) THEN 522 … "CN : max/min ev: ", max_ev, " / ", min_ev, "=", max_ev/min_ev, "Log(2-CN):", LOG10(max_ev/min_ev) 525 "CN : max/min ev: ", max_ev, " / ", min_ev, "Log(CN): infinity"
|
H A D | preconditioner_solvers.F | 275 REAL(KIND=dp) :: max_ev, min_ev local 294 min_ev = REAL(get_selected_ritz_val(my_arnoldi, 1), dp) 297 cond_num = max_ev/min_ev
|
H A D | preconditioner_makes.F | 695 REAL(KIND=dp) :: max_ev, min_ev, pre_shift local 784 pre_shift = MAX(1.5_dp*(min_ev - max_ev), energy_gap) 785 IF (min_ev .LT. pre_shift) THEN 786 pre_shift = pre_shift - min_ev
|
H A D | qs_ot.F | 766 REAL(KIND=dp) :: max_ev, min_ev, threshold local 779 CALL arnoldi_extremal(qs_ot_env%matrix_p, max_ev, min_ev, converged, threshold, max_iter) 780 qs_ot_env%largest_eval_upper_bound = MAX(max_ev, ABS(min_ev))
|
/dports/graphics/pcl-pointclouds/pcl-pcl-1.12.0/filters/include/pcl/filters/impl/ |
H A D | covariance_sampling.hpp | 101 const double min_ev = solver.eigenvalues (). minCoeff (); in computeConditionNumber() local 102 return (max_ev / min_ev); in computeConditionNumber()
|
/dports/science/liggghts/LIGGGHTS-PUBLIC-3.8.0-26-g6e873439/lib/hotint/HotInt_V1/MBSKernelLib/ |
H A D | optimization.cpp | 189 double min_ev = 1e100; in PerformNewtonIteration() local 193 min_ev = min(min_ev, ev(i)); in PerformNewtonIteration() 195 if(max_ev > 0. && min_ev < 1e100) in PerformNewtonIteration() 198 double cond_H = abs(max_ev)/abs(min_ev); in PerformNewtonIteration()
|
/dports/science/cp2k-data/cp2k-7.1.0/src/emd/ |
H A D | rt_propagator_init.F | 316 REAL(dp) :: max_ev, min_ev, norm2, scale, t local 349 CALL arnoldi_extremal(tmp2, max_ev, min_ev, threshold=rtp%lanzcos_threshold, & 351 norm2 = 2.0_dp*MAX(ABS(min_ev), ABS(max_ev))
|
/dports/science/cp2k/cp2k-2e995eec7fd208c8a72d9544807bd8b8ba8cd1cc/src/emd/ |
H A D | rt_propagator_init.F | 316 REAL(dp) :: max_ev, min_ev, norm2, scale, t local 349 CALL arnoldi_extremal(tmp2, max_ev, min_ev, threshold=rtp%lanzcos_threshold, & 351 norm2 = 2.0_dp*MAX(ABS(min_ev), ABS(max_ev))
|
/dports/science/cp2k/cp2k-2e995eec7fd208c8a72d9544807bd8b8ba8cd1cc/src/arnoldi/ |
H A D | arnoldi_api.F | 255 SUBROUTINE arnoldi_extremal(matrix_a, max_ev, min_ev, converged, threshold, max_iter) argument 257 REAL(KIND=dp), INTENT(OUT) :: max_ev, min_ev local
|
/dports/science/cp2k-data/cp2k-7.1.0/src/arnoldi/ |
H A D | arnoldi_api.F | 255 SUBROUTINE arnoldi_extremal(matrix_a, max_ev, min_ev, converged, threshold, max_iter) argument 257 REAL(KIND=dp), INTENT(OUT) :: max_ev, min_ev local
|
/dports/graphics/darktable38/darktable-3.8.0/src/iop/ |
H A D | toneequal.c | 713 const int min_ev = -8; in apply_toneequalizer() local 719 dt_omp_firstprivate(in, out, num_elem, luminance, lut, min_ev, max_ev, ch) in apply_toneequalizer() 724 const float exposure = fast_clamp(log2f(luminance[k]), min_ev, max_ev); in apply_toneequalizer() 725 float correction = lut[(unsigned)roundf((exposure - min_ev) * LUT_RESOLUTION)]; in apply_toneequalizer() 1176 const int min_ev = -8; in compute_correction_lut() local 1177 assert(PIXEL_CHAN == -min_ev); in compute_correction_lut() 1182 float exposure = (float)j / (float)LUT_RESOLUTION + min_ev; in compute_correction_lut()
|
/dports/graphics/darktable/darktable-3.6.1/src/iop/ |
H A D | toneequal.c | 693 const int min_ev = -8; in apply_toneequalizer() local 699 dt_omp_firstprivate(in, out, num_elem, luminance, lut, min_ev, max_ev, ch) in apply_toneequalizer() 704 const float exposure = fast_clamp(log2f(luminance[k]), min_ev, max_ev); in apply_toneequalizer() 705 float correction = lut[(unsigned)roundf((exposure - min_ev) * LUT_RESOLUTION)]; in apply_toneequalizer() 1151 const int min_ev = -8; in compute_correction_lut() local 1152 assert(PIXEL_CHAN == -min_ev); in compute_correction_lut() 1157 float exposure = (float)j / (float)LUT_RESOLUTION + min_ev; in compute_correction_lut()
|