Home
last modified time | relevance | path

Searched refs:orb_j (Results 1 – 4 of 4) sorted by relevance

/dports/science/chemps2/CheMPS2-1.8.10/CheMPS2/
H A DThreeDM.cpp429 const int orb_j = jkl[ 0 ]; in fill_site() local
452 const int orb_j = L - 1 - jkl[ 1 ]; in fill_site() local
459 … const double d3 = diagram3( denT, F0tensors[orb_i][orb_k-orb_j][orb_j-1-orb_i], workmem ); in fill_site()
474 const int orb_j = jkl[ 0 ]; in fill_site() local
522 const int orb_j = jkl[ 0 ]; in fill_site() local
548 if ( orb_j < orb_k ){ in fill_site()
646 const int orb_j = jkl[ 0 ]; in fill_site() local
897 const int orb_j = jkl[ 0 ]; in fill_site() local
1226 const int orb_j = jkl[ 0 ]; in fill_site() local
1307 for ( int orb_j = 0; orb_j < orb_i; orb_j++ ){ in fill_site() local
[all …]
H A DDMRGoperators3RDM.cpp108 for ( int orb_j = 0; orb_j < boundary; orb_j++ ){ in update_3rdm_operators() local
109 for ( int orb_k = orb_j; orb_k < boundary; orb_k++ ){ in update_3rdm_operators()
112 const int cnt1 = orb_k - orb_j; in update_3rdm_operators()
116 const int own_S_jk = MPIchemps2::owner_absigma( orb_j, orb_k ); in update_3rdm_operators()
117 const int own_F_jk = MPIchemps2::owner_cdf( L, orb_j, orb_k ); in update_3rdm_operators()
141 const int orb_j = jkl[ 0 ]; in update_3rdm_operators()
146 const int cnt1 = orb_k - orb_j; in update_3rdm_operators()
203 const int own_S_jk = MPIchemps2::owner_absigma( orb_j, orb_k ); in update_3rdm_operators()
204 const int own_F_jk = MPIchemps2::owner_cdf( L, orb_j, orb_k ); in update_3rdm_operators()
284 const int orb_j = orb_k - cnt1; in allocate_3rdm_operators() local
[all …]
/dports/science/cp2k-data/cp2k-7.1.0/src/
H A Dalmo_scf_optimizer.F6897 nblkcols_tot, nblkrows_tot, ncores, orb_i, orb_j, row, unit_nr, zero_neg_eiv local
7103 DO orb_j = 1, mo_block_sizes(row)
7107 IF (orb_i .EQ. orb_j .AND. row .EQ. col) THEN
/dports/science/cp2k/cp2k-2e995eec7fd208c8a72d9544807bd8b8ba8cd1cc/src/
H A Dalmo_scf_optimizer.F8331 nblkcols_tot, nblkrows_tot, ncores, orb_i, orb_j, row, unit_nr, zero_neg_eiv local
8537 DO orb_j = 1, mo_block_sizes(row)
8541 IF (orb_i .EQ. orb_j .AND. row .EQ. col) THEN