/dports/science/quantum-espresso/q-e-qe-6.7.0/KS_Solvers/DENSE/ |
H A D | rotate_HSpsi_gamma.f90 | 79 if (n_start .le. n_end) & 80 …CALL DGEMM( 'T','N', nstart,my_n,kdim, 2.D0, psi,kdmx, hpsi(1,n_start),kdmx, 0.D0, hh(1,n_start),n… 81 …IF ( gstart == 2 ) call DGER( nstart, my_n, -1.D0, psi,kdmx, hpsi(1,n_start),kdmx, hh(1,n_start),n… 92 if (n_start .le. n_end) & 98 if (n_start .le. n_end) & 132 if (n_start .le. n_end) & 134 psi(:,n_start:n_end) = aux(:,n_start:n_end) 140 if (n_start .le. n_end) & 142 hpsi(:,n_start:n_end) = aux(:,n_start:n_end) 150 if (n_start .le. n_end) & [all …]
|
H A D | rotate_wfc_gamma.f90 | 48 INTEGER :: n_start, n_end, my_n local 87 if (n_start .le. n_end) & 88 …GEMM( 'T','N', nstart, my_n, npw2, 2.D0, psi, npwx2, aux(1,n_start), npwx2, 0.D0, hr(1,n_start), n… 89 …tart == 2 ) call DGER( nstart, my_n, -1.D0, psi, npwx2, aux(1,n_start), npwx2, hr(1,n_start), nsta… 99 if (n_start .le. n_end) & 100 …GEMM( 'T','N', nstart, my_n, npw2, 2.D0, psi, npwx2, aux(1,n_start), npwx2, 0.D0, sr(1,n_start), n… 101 …tart == 2 ) CALL DGER( nstart, my_n, -1.D0, psi, npwx2, aux(1,n_start), npwx2, sr(1,n_start), nsta… 105 if (n_start .le. n_end) & 107 …tart == 2 ) CALL DGER( nstart, my_n, -1.D0, psi, npwx2, psi(1,n_start), npwx2, sr(1,n_start), nsta… 127 if (n_start .le. n_end) & [all …]
|
H A D | rotate_HSpsi_k.f90 | 78 if (n_start .le. n_end) & 79 …'N', nstart, my_n, kdim, (1.D0,0.D0), psi, kdmx, hpsi(1,n_start), kdmx, (0.D0,0.D0), hh(1,n_start)… 90 if (n_start .le. n_end) & 95 if (n_start .le. n_end) & 128 if (n_start .le. n_end) & 129 …'N', kdim, my_n, nstart, (1.D0,0.D0), psi, kdmx, vv(1,n_start), nstart, (0.D0,0.D0), aux(1,n_start… 130 psi(:,n_start:n_end) = aux(:,n_start:n_end) 136 if (n_start .le. n_end) & 138 hpsi(:,n_start:n_end) = aux(:,n_start:n_end) 146 if (n_start .le. n_end) & [all …]
|
H A D | rotate_wfc_k.f90 | 46 INTEGER :: n_start, n_end, my_n local 84 CALL divide(inter_bgrp_comm,nstart,n_start,n_end) 85 my_n = n_end - n_start + 1; !write (*,*) nstart,n_start,n_end 86 if (n_start .le. n_end) & 87 …,'N', nstart, my_n, kdim, (1.D0,0.D0), psi, kdmx, aux(1,n_start), kdmx, (0.D0,0.D0), hc(1,n_start)… 96 if (n_start .le. n_end) & 97 …,'N', nstart, my_n, kdim, (1.D0,0.D0), psi, kdmx, aux(1,n_start), kdmx, (0.D0,0.D0), sc(1,n_start)… 101 if (n_start .le. n_end) & 102 …,'N', nstart, my_n, kdim, (1.D0,0.D0), psi, kdmx, psi(1,n_start), kdmx, (0.D0,0.D0), sc(1,n_start)… 122 if (n_start .le. n_end) & [all …]
|
/dports/science/quantum-espresso/q-e-qe-6.7.0/LR_Modules/ |
H A D | cgsolve_all.f90 | 115 INTEGER :: n_start, n_end, my_nbnd local 121 my_nbnd = n_end - n_start + 1 144 call ch_psi (ndim, dpsi(1,n_start), g, e(n_start), ik, my_nbnd) 145 do ibnd = n_start, n_end ; ibnd_ = ibnd - n_start + 1 149 do ibnd = n_start, n_end ; ibnd_ = ibnd - n_start + 1 158 do ibnd = n_start, n_end ; ibnd_ = ibnd - n_start + 1 176 do ibnd = n_end, n_start, -1 ; ibnd_ = ibnd - n_start + 1 187 do ibnd = n_start, n_end 195 do ibnd = n_start, n_end ; ibnd_ = ibnd - n_start + 1 223 do ibnd = n_start, n_end ; ibnd_ = ibnd - n_start + 1 [all …]
|
H A D | ccgsolve_all.f90 | 119 INTEGER :: n_start, n_end, my_nbnd local 125 my_nbnd = n_end - n_start + 1 162 do ibnd = n_start, n_end 168 do ibnd = n_start, n_end ; ibnd_ = ibnd - n_start + 1 172 do ibnd = n_start, n_end ; ibnd_ = ibnd - n_start + 1 182 do ibnd = n_start, n_end ; ibnd_ = ibnd - n_start + 1 204 do ibnd = n_end, n_start, -1 ; ibnd_ = ibnd - n_start + 1 214 do ibnd = n_start, n_end 222 do ibnd = n_start, n_end ; ibnd_ = ibnd - n_start + 1 269 do ibnd = n_start, n_end ; ibnd_ = ibnd - n_start + 1 [all …]
|
/dports/science/quantum-espresso/q-e-qe-6.7.0/KS_Solvers/Davidson/ |
H A D | regterg.f90 | 72 INTEGER :: n_start, n_end, my_n local 172 if (n_start .le. n_end) & 173 …EMM( 'T','N', nbase, my_n, npw2, 2.D0 , psi, npwx2, hpsi(1,n_start), npwx2, 0.D0, hr(1,n_start), n… 174 …tart == 2 ) CALL DGER( nbase, my_n, -1.D0, psi, npwx2, hpsi(1,n_start), npwx2, hr(1,n_start), nvec… 181 if (n_start .le. n_end) & 183 …tart == 2 ) CALL DGER( nbase, my_n, -1.D0, psi, npwx2, spsi(1,n_start), npwx2, sr(1,n_start), nvec… 187 if (n_start .le. n_end) & 189 …start == 2 ) CALL DGER( nbase, my_n, -1.D0, psi, npwx2, psi(1,n_start), npwx2, sr(1,n_start), nvec… 265 if (n_start .le. n_end) & 270 if (n_start .le. n_end) & [all …]
|
H A D | cegterg.f90 | 75 INTEGER :: n_start, n_end, my_n local 185 if (n_start .le. n_end) & 188 if (n_start .le. n_end) CALL mp_sum( hc( 1:nbase, n_start:n_end ), intra_bgrp_comm ) 193 if (n_start .le. n_end) & 199 if (n_start .le. n_end) & 205 if (n_start .le. n_end) CALL mp_sum( sc( 1:nbase, n_start:n_end ), intra_bgrp_comm ) 300 if (n_start .le. n_end) & 306 if (n_start .le. n_end) & 327 if (n_start .le. n_end) & 328 CALL ZGEMM( 'N','N', kdim, notcnv, my_n, ONE, hpsi(1,n_start), kdmx, vc(n_start,1), nvecx, & [all …]
|
/dports/science/quantum-espresso/q-e-qe-6.7.0/KS_Solvers/PPCG/ |
H A D | ppcg_gamma.f90 | 145 if (n_start .le. n_end) & 158 if (n_start .le. n_end) & 161 if (n_start .le. n_end) & 211 if (n_start .le. n_end) & 215 if (n_start .le. n_end) & 227 if (n_start .le. n_end) & 262 if (n_start .le. n_end) & 284 if (n_start .le. n_end) & 311 DO j = n_start, n_end 437 DO j = n_start, n_end [all …]
|
H A D | ppcg_k.f90 | 146 if (n_start .le. n_end) & 158 if (n_start .le. n_end) & 161 if (n_start .le. n_end) & 212 if (n_start .le. n_end) & 215 if (n_start .le. n_end) & 226 if (n_start .le. n_end) & 257 if (n_start .le. n_end) & 277 if (n_start .le. n_end) & 302 DO j = n_start, n_end 416 DO j = n_start, n_end [all …]
|
/dports/www/xapian-omega/xapian-omega-1.4.18/ |
H A D | fields.h | 68 std::string::size_type n_start = n; in parse_fields() local 72 fields.emplace(names->substr(n_start, n - n_start), in parse_fields() 83 std::string::size_type n_start = i; in parse_fields() local 113 std::string name(data, n_start, eq - n_start); in parse_fields()
|
/dports/security/libtasn1/libtasn1-4.18.0/lib/ |
H A D | parser_aux.c | 136 n_start = name; in asn1_find_node() 140 n_start = strchr (n_start, '.'); in asn1_find_node() 141 if (n_start) in asn1_find_node() 142 n_start++; in asn1_find_node() 155 n_start = n_end; in asn1_find_node() 156 n_start++; in asn1_find_node() 165 n_start = NULL; in asn1_find_node() 185 while (n_start) in asn1_find_node() 196 n_start = n_end; in asn1_find_node() 197 n_start++; in asn1_find_node() [all …]
|
/dports/security/gnutls/gnutls-3.6.16/lib/minitasn1/ |
H A D | parser_aux.c | 138 n_start = name; in asn1_find_node() 142 n_start = strchr(n_start, '.'); in asn1_find_node() 143 if (n_start) in asn1_find_node() 144 n_start++; in asn1_find_node() 157 n_start = n_end; in asn1_find_node() 158 n_start++; in asn1_find_node() 167 n_start = NULL; in asn1_find_node() 187 while (n_start) in asn1_find_node() 198 n_start = n_end; in asn1_find_node() 199 n_start++; in asn1_find_node() [all …]
|
/dports/devel/libfastcommon/libfastcommon-1.0.43/src/tests/ |
H A D | test_skiplist_set.c | 138 int n_start; in test_find_range() local 154 n_start = 10; in test_find_range() 156 result = skiplist_set_find_range(&sl, &n_start, &n_end, &iterator); in test_find_range() 159 n_start = -1; in test_find_range() 161 result = skiplist_set_find_range(&sl, &n_start, &n_end, &iterator); in test_find_range() 164 n_start = 0; in test_find_range() 166 result = skiplist_set_find_range(&sl, &n_start, &n_end, &iterator); in test_find_range()
|
/dports/net-mgmt/resource-agents/resource-agents-4.9.0/heartbeat/ |
H A D | EvmsSCC | 111 local n_start="$OCF_RESKEY_CRM_meta_notify_start_uname" 116 start) ocf_log debug "EvmsSCC: Notify: Starting node(s): $n_start." 133 local n_start="$OCF_RESKEY_CRM_meta_notify_start_uname" 135 ocf_log debug "EvmsSCC: Start: starting node(s): $n_start." 152 n_active="$n_active $n_start" 163 local n_first=$(echo $n_start | cut -d ' ' -f 1)
|
/dports/emulators/mess/mame-mame0226/src/devices/cpu/psx/ |
H A D | rcnt.cpp | 65 save_item(NAME(root_counter[ n ].n_start), n); in device_start() 69 root_counter[ n ].n_start = 0; in device_start() 84 root->n_start = gettotalcycles(); in write() 88 root->n_start = gettotalcycles(); in write() 180 n_current = gettotalcycles() - root->n_start; in root_current() 187 root->n_start = gettotalcycles(); in root_current() 240 root->n_start = gettotalcycles(); in device_timer()
|
/dports/emulators/mame/mame-mame0226/src/devices/cpu/psx/ |
H A D | rcnt.cpp | 65 save_item(NAME(root_counter[ n ].n_start), n); in device_start() 69 root_counter[ n ].n_start = 0; in device_start() 84 root->n_start = gettotalcycles(); in write() 88 root->n_start = gettotalcycles(); in write() 180 n_current = gettotalcycles() - root->n_start; in root_current() 187 root->n_start = gettotalcycles(); in root_current() 240 root->n_start = gettotalcycles(); in device_timer()
|
/dports/science/py-scipy/scipy-1.7.1/scipy/optimize/_trustregion_constr/ |
H A D | canonical_constraint.py | 310 n_start = 0 311 v_l = v_ineq[n_start:n_start + n_less] 312 n_start += n_less 313 v_g = v_ineq[n_start:n_start + n_greater] 314 n_start += n_greater 315 v_il = v_ineq[n_start:n_start + n_interval] 316 n_start += n_interval 317 v_ig = v_ineq[n_start:n_start + n_interval]
|
/dports/science/quantum-espresso/q-e-qe-6.7.0/PHonon/PH/ |
H A D | dvpsi_e.f90 | 63 INTEGER :: n_start, n_end local 133 call divide(inter_bgrp_comm,nbnd,n_start,n_end) 134 … if (n_end >= n_start) CALL calbec (npw, vkb, dvpsi(:,n_start:n_end), becp , n_end-n_start+1 )
|
/dports/net/p5-Net-Analysis/Net-Analysis-0.41/lib/Net/Analysis/Listener/ |
H A D | HTTPPipelining.pm | 304 my ($n_start,$n_end) = (0,0); 313 $n_end = $n_start + length($_) - 1; 319 foreach my $pkt (@{ $mono->which_pkts($n_start,$n_end) }) { 325 $n_start = $n_end+1; 355 my ($n_start,$n_end) = (0,0); 360 $n_end = $n_start + length($_) - 1; 366 foreach my $pkt (@{ $mono->which_pkts($n_start,$n_end) }) { 372 $n_start = $n_end+1;
|
/dports/net/openldap25-server/openldap-2.5.9/servers/slapd/ |
H A D | phonetic.c | 215 char *n, *n_start, *n_end; /* pointers to string */ in phonetic() local 285 for (metaph_end = Metaph + MAXPHONEMELEN, n_start = n; in phonetic() 295 if (same(*n) || (n == n_start && vowel(*n))) in phonetic() 320 *Metaph++ = ((n == n_start && !vowel(*(n + 2))) in phonetic() 437 if (n == n_start) in phonetic()
|
/dports/net/openldap25-client/openldap-2.5.9/servers/slapd/ |
H A D | phonetic.c | 215 char *n, *n_start, *n_end; /* pointers to string */ in phonetic() local 285 for (metaph_end = Metaph + MAXPHONEMELEN, n_start = n; in phonetic() 295 if (same(*n) || (n == n_start && vowel(*n))) in phonetic() 320 *Metaph++ = ((n == n_start && !vowel(*(n + 2))) in phonetic() 437 if (n == n_start) in phonetic()
|
/dports/net/openldap24-server/openldap-2.4.59/servers/slapd/ |
H A D | phonetic.c | 215 char *n, *n_start, *n_end; /* pointers to string */ in phonetic() local 285 for (metaph_end = Metaph + MAXPHONEMELEN, n_start = n; in phonetic() 295 if (same(*n) || (n == n_start && vowel(*n))) in phonetic() 320 *Metaph++ = ((n == n_start && !vowel(*(n + 2))) in phonetic() 437 if (n == n_start) in phonetic()
|
/dports/net/openldap24-client/openldap-2.4.59/servers/slapd/ |
H A D | phonetic.c | 215 char *n, *n_start, *n_end; /* pointers to string */ in phonetic() local 285 for (metaph_end = Metaph + MAXPHONEMELEN, n_start = n; in phonetic() 295 if (same(*n) || (n == n_start && vowel(*n))) in phonetic() 320 *Metaph++ = ((n == n_start && !vowel(*(n + 2))) in phonetic() 437 if (n == n_start) in phonetic()
|
/dports/net/openldap26-client/openldap-2.6.0/servers/slapd/ |
H A D | phonetic.c | 215 char *n, *n_start, *n_end; /* pointers to string */ in phonetic() local 285 for (metaph_end = Metaph + MAXPHONEMELEN, n_start = n; in phonetic() 295 if (same(*n) || (n == n_start && vowel(*n))) in phonetic() 320 *Metaph++ = ((n == n_start && !vowel(*(n + 2))) in phonetic() 437 if (n == n_start) in phonetic()
|