Home
last modified time | relevance | path

Searched defs:approx_l1_norm_sd (Results 1 – 2 of 2) sorted by relevance

/dports/science/cp2k/cp2k-2e995eec7fd208c8a72d9544807bd8b8ba8cd1cc/src/
H A Dqs_localization_methods.F93 SUBROUTINE approx_l1_norm_sd(C, iterations, eps, converged, sweeps) subroutine
100 CHARACTER(len=*), PARAMETER :: routineN = 'approx_l1_norm_sd', & argument
101 routineP = moduleN//':'//routineN
103 REAL(KIND=dp), PARAMETER :: alpha = 0.1_dp, f2_eps = 0.01_dp
105 INTEGER :: handle, i, istep, k, n, ncol_local, &
106 nrow_local, output_unit, p
107 REAL(KIND=dp) :: expfactor, f2, f2old, gnorm, tnorm
108 TYPE(cp_blacs_env_type), POINTER :: context
109 TYPE(cp_fm_struct_type), POINTER :: fm_struct_k_k
110 TYPE(cp_fm_type), POINTER :: CTmp, G, Gp1, Gp2, U local
[all …]
/dports/science/cp2k-data/cp2k-7.1.0/src/
H A Dqs_localization_methods.F93 SUBROUTINE approx_l1_norm_sd(C, iterations, eps, converged, sweeps) subroutine
100 CHARACTER(len=*), PARAMETER :: routineN = 'approx_l1_norm_sd', & argument
101 routineP = moduleN//':'//routineN
103 REAL(KIND=dp), PARAMETER :: alpha = 0.1_dp, f2_eps = 0.01_dp
105 INTEGER :: handle, i, istep, k, n, ncol_local, &
106 nrow_local, output_unit, p
107 REAL(KIND=dp) :: expfactor, f2, f2old, gnorm, tnorm
108 TYPE(cp_blacs_env_type), POINTER :: context
109 TYPE(cp_fm_struct_type), POINTER :: fm_struct_k_k
110 TYPE(cp_fm_type), POINTER :: CTmp, G, Gp1, Gp2, U local
[all …]