/dports/science/nwchem/nwchem-7b21660b82ebd85ef659f6fba7e1e73433b0bd0a/src/tce/ccsdtq_lambda/ |
H A D | ccsdtq_lambda2_13.F | 34 INTEGER h3b_1 184 &- 1 + noab * (h3b_1 - 1 + noab * (h14b_1 - 1))))))))) 196 &- 1 + noab * (h3b_1 - 1 + noab * (h14b_1 - 1))))))))) 207 &- 1 + noab * (h3b_1 - 1 + noab * (h14b_1 - 1))))))))) 218 &- 1 + noab * (h3b_1 - 1 + noab * (h14b_1 - 1))))))))) 230 &- 1 + noab * (h3b_1 - 1 + noab * (h14b_1 - 1))))))))) 241 &- 1 + noab * (h3b_1 - 1 + noab * (h14b_1 - 1))))))))) 252 &- 1 + noab * (h3b_1 - 1 + noab * (h14b_1 - 1))))))))) 263 &- 1 + noab * (h3b_1 - 1 + noab * (h14b_1 - 1))))))))) 274 &- 1 + noab * (h3b_1 - 1 + noab * (h14b_1 - 1))))))))) [all …]
|
H A D | ccsdtq_lambda2_30_2_1_1.F | 29 INTEGER h3b_1 133 &1 + noab * (h3b_1 - 1 + noab * (h7b_1 - 1))))))))) 144 &1 + noab * (h3b_1 - 1 + noab * (h7b_1 - 1))))))))) 155 &1 + noab * (h3b_1 - 1 + noab * (h7b_1 - 1))))))))) 166 &1 + noab * (h3b_1 - 1 + noab * (h7b_1 - 1))))))))) 177 &1 + noab * (h3b_1 - 1 + noab * (h7b_1 - 1))))))))) 188 &1 + noab * (h3b_1 - 1 + noab * (h7b_1 - 1))))))))) 199 &1 + noab * (h3b_1 - 1 + noab * (h7b_1 - 1))))))))) 210 &1 + noab * (h3b_1 - 1 + noab * (h7b_1 - 1))))))))) 221 &1 + noab * (h7b_1 - 1 + noab * (h3b_1 - 1))))))))) [all …]
|
H A D | ccsdtq_lambda2_30_2_1_2.F | 29 INTEGER h3b_1 133 &1 + noab * (h3b_1 - 1 + noab * (h7b_1 - 1))))))))) 144 &1 + noab * (h3b_1 - 1 + noab * (h7b_1 - 1))))))))) 155 &1 + noab * (h3b_1 - 1 + noab * (h7b_1 - 1))))))))) 166 &1 + noab * (h3b_1 - 1 + noab * (h7b_1 - 1))))))))) 177 &1 + noab * (h3b_1 - 1 + noab * (h7b_1 - 1))))))))) 188 &1 + noab * (h3b_1 - 1 + noab * (h7b_1 - 1))))))))) 199 &1 + noab * (h3b_1 - 1 + noab * (h7b_1 - 1))))))))) 210 &1 + noab * (h3b_1 - 1 + noab * (h7b_1 - 1))))))))) 221 &1 + noab * (h7b_1 - 1 + noab * (h3b_1 - 1))))))))) [all …]
|
H A D | ccsdtq_lambda2_24.F | 35 INTEGER h3b_1 167 &- 1 + noab * (h3b_1 - 1 + noab * (h13b_1 - 1))))))))) 178 &- 1 + noab * (h3b_1 - 1 + noab * (h13b_1 - 1))))))))) 189 &- 1 + noab * (h3b_1 - 1 + noab * (h13b_1 - 1))))))))) 200 &- 1 + noab * (h3b_1 - 1 + noab * (h13b_1 - 1))))))))) 211 &- 1 + noab * (h3b_1 - 1 + noab * (h13b_1 - 1))))))))) 222 &- 1 + noab * (h3b_1 - 1 + noab * (h13b_1 - 1))))))))) 233 &- 1 + noab * (h3b_1 - 1 + noab * (h13b_1 - 1))))))))) 244 &- 1 + noab * (h3b_1 - 1 + noab * (h13b_1 - 1))))))))) 255 &- 1 + noab * (h13b_1 - 1 + noab * (h3b_1 - 1))))))))) [all …]
|
/dports/science/nwchem/nwchem-7b21660b82ebd85ef659f6fba7e1e73433b0bd0a/src/tce/eomccsdtq/ |
H A D | eomccsdtq_y2_12.F | 34 INTEGER h3b_1 184 &- 1 + noab * (h3b_1 - 1 + noab * (h14b_1 - 1))))))))) 196 &- 1 + noab * (h3b_1 - 1 + noab * (h14b_1 - 1))))))))) 207 &- 1 + noab * (h3b_1 - 1 + noab * (h14b_1 - 1))))))))) 218 &- 1 + noab * (h3b_1 - 1 + noab * (h14b_1 - 1))))))))) 230 &- 1 + noab * (h3b_1 - 1 + noab * (h14b_1 - 1))))))))) 241 &- 1 + noab * (h3b_1 - 1 + noab * (h14b_1 - 1))))))))) 252 &- 1 + noab * (h3b_1 - 1 + noab * (h14b_1 - 1))))))))) 263 &- 1 + noab * (h3b_1 - 1 + noab * (h14b_1 - 1))))))))) 274 &- 1 + noab * (h3b_1 - 1 + noab * (h14b_1 - 1))))))))) [all …]
|
H A D | eomccsdtq_y2_29_2_1_1.F | 29 INTEGER h3b_1 133 &1 + noab * (h3b_1 - 1 + noab * (h7b_1 - 1))))))))) 144 &1 + noab * (h3b_1 - 1 + noab * (h7b_1 - 1))))))))) 155 &1 + noab * (h3b_1 - 1 + noab * (h7b_1 - 1))))))))) 166 &1 + noab * (h3b_1 - 1 + noab * (h7b_1 - 1))))))))) 177 &1 + noab * (h3b_1 - 1 + noab * (h7b_1 - 1))))))))) 188 &1 + noab * (h3b_1 - 1 + noab * (h7b_1 - 1))))))))) 199 &1 + noab * (h3b_1 - 1 + noab * (h7b_1 - 1))))))))) 210 &1 + noab * (h3b_1 - 1 + noab * (h7b_1 - 1))))))))) 221 &1 + noab * (h7b_1 - 1 + noab * (h3b_1 - 1))))))))) [all …]
|
H A D | eomccsdtq_y2_29_2_1_2.F | 29 INTEGER h3b_1 133 &1 + noab * (h3b_1 - 1 + noab * (h7b_1 - 1))))))))) 144 &1 + noab * (h3b_1 - 1 + noab * (h7b_1 - 1))))))))) 155 &1 + noab * (h3b_1 - 1 + noab * (h7b_1 - 1))))))))) 166 &1 + noab * (h3b_1 - 1 + noab * (h7b_1 - 1))))))))) 177 &1 + noab * (h3b_1 - 1 + noab * (h7b_1 - 1))))))))) 188 &1 + noab * (h3b_1 - 1 + noab * (h7b_1 - 1))))))))) 199 &1 + noab * (h3b_1 - 1 + noab * (h7b_1 - 1))))))))) 210 &1 + noab * (h3b_1 - 1 + noab * (h7b_1 - 1))))))))) 221 &1 + noab * (h7b_1 - 1 + noab * (h3b_1 - 1))))))))) [all …]
|
H A D | eomccsdtq_y2_23.F | 35 INTEGER h3b_1 167 &- 1 + noab * (h3b_1 - 1 + noab * (h13b_1 - 1))))))))) 178 &- 1 + noab * (h3b_1 - 1 + noab * (h13b_1 - 1))))))))) 189 &- 1 + noab * (h3b_1 - 1 + noab * (h13b_1 - 1))))))))) 200 &- 1 + noab * (h3b_1 - 1 + noab * (h13b_1 - 1))))))))) 211 &- 1 + noab * (h3b_1 - 1 + noab * (h13b_1 - 1))))))))) 222 &- 1 + noab * (h3b_1 - 1 + noab * (h13b_1 - 1))))))))) 233 &- 1 + noab * (h3b_1 - 1 + noab * (h13b_1 - 1))))))))) 244 &- 1 + noab * (h3b_1 - 1 + noab * (h13b_1 - 1))))))))) 255 &- 1 + noab * (h13b_1 - 1 + noab * (h3b_1 - 1))))))))) [all …]
|
H A D | eomccsdtq_x3_11_5.F | 41 INTEGER h3b_1 103 &,p9b_1,p10b_1,h1b_1,h2b_1,h3b_1,h8b_1) 118 CALL GET_HASH_BLOCK(d_a,dbl_mb(k_a),dima,int_mb(k_a_offset),(h3b_1 129 CALL GET_HASH_BLOCK(d_a,dbl_mb(k_a),dima,int_mb(k_a_offset),(h3b_1 140 CALL GET_HASH_BLOCK(d_a,dbl_mb(k_a),dima,int_mb(k_a_offset),(h3b_1 151 & - 1 + noab * (h3b_1 - 1 + noab * (h2b_1 - 1 + noab * (h1b_1 - 1 + 161 CALL GET_HASH_BLOCK(d_a,dbl_mb(k_a),dima,int_mb(k_a_offset),(h3b_1 172 CALL GET_HASH_BLOCK(d_a,dbl_mb(k_a),dima,int_mb(k_a_offset),(h3b_1 183 CALL GET_HASH_BLOCK(d_a,dbl_mb(k_a),dima,int_mb(k_a_offset),(h3b_1 195 & - 1 + noab * (h3b_1 - 1 + noab * (h2b_1 - 1 + noab * (h1b_1 - 1 + [all …]
|
H A D | eomccsdtq_x3_13_5.F | 41 INTEGER h3b_1 103 &p7b_1,p8b_1,h1b_1,h2b_1,h3b_1,h9b_1) 118 CALL GET_HASH_BLOCK(d_a,dbl_mb(k_a),dima,int_mb(k_a_offset),(h3b_1 128 CALL GET_HASH_BLOCK(d_a,dbl_mb(k_a),dima,int_mb(k_a_offset),(h3b_1 138 CALL GET_HASH_BLOCK(d_a,dbl_mb(k_a),dima,int_mb(k_a_offset),(h3b_1 149 & - 1 + noab * (h3b_1 - 1 + noab * (h2b_1 - 1 + noab * (h1b_1 - 1 + 159 CALL GET_HASH_BLOCK(d_a,dbl_mb(k_a),dima,int_mb(k_a_offset),(h3b_1 170 CALL GET_HASH_BLOCK(d_a,dbl_mb(k_a),dima,int_mb(k_a_offset),(h3b_1 181 CALL GET_HASH_BLOCK(d_a,dbl_mb(k_a),dima,int_mb(k_a_offset),(h3b_1 193 & - 1 + noab * (h3b_1 - 1 + noab * (h2b_1 - 1 + noab * (h1b_1 - 1 + [all …]
|
H A D | eomccsdtq_x4_9_6.F | 41 INTEGER h3b_1 103 &_1,p11b_1,p12b_1,h1b_1,h2b_1,h3b_1,h10b_1) 119 CALL GET_HASH_BLOCK(d_a,dbl_mb(k_a),dima,int_mb(k_a_offset),(h3b_1 130 CALL GET_HASH_BLOCK(d_a,dbl_mb(k_a),dima,int_mb(k_a_offset),(h3b_1 141 CALL GET_HASH_BLOCK(d_a,dbl_mb(k_a),dima,int_mb(k_a_offset),(h3b_1 152 &1 - 1 + noab * (h3b_1 - 1 + noab * (h2b_1 - 1 + noab * (h1b_1 - 1 162 CALL GET_HASH_BLOCK(d_a,dbl_mb(k_a),dima,int_mb(k_a_offset),(h3b_1 173 CALL GET_HASH_BLOCK(d_a,dbl_mb(k_a),dima,int_mb(k_a_offset),(h3b_1 184 CALL GET_HASH_BLOCK(d_a,dbl_mb(k_a),dima,int_mb(k_a_offset),(h3b_1 196 &1 - 1 + noab * (h3b_1 - 1 + noab * (h2b_1 - 1 + noab * (h1b_1 - 1 [all …]
|
H A D | eomccsdtq_x4_10_5.F | 41 INTEGER h3b_1 103 &1,p9b_1,p10b_1,h1b_1,h2b_1,h3b_1,h11b_1) 119 CALL GET_HASH_BLOCK(d_a,dbl_mb(k_a),dima,int_mb(k_a_offset),(h3b_1 130 CALL GET_HASH_BLOCK(d_a,dbl_mb(k_a),dima,int_mb(k_a_offset),(h3b_1 141 CALL GET_HASH_BLOCK(d_a,dbl_mb(k_a),dima,int_mb(k_a_offset),(h3b_1 152 &1 - 1 + noab * (h3b_1 - 1 + noab * (h2b_1 - 1 + noab * (h1b_1 - 1 162 CALL GET_HASH_BLOCK(d_a,dbl_mb(k_a),dima,int_mb(k_a_offset),(h3b_1 173 CALL GET_HASH_BLOCK(d_a,dbl_mb(k_a),dima,int_mb(k_a_offset),(h3b_1 184 CALL GET_HASH_BLOCK(d_a,dbl_mb(k_a),dima,int_mb(k_a_offset),(h3b_1 196 &1 - 1 + noab * (h3b_1 - 1 + noab * (h2b_1 - 1 + noab * (h1b_1 - 1 [all …]
|
/dports/science/nwchem-data/nwchem-7.0.2-release/src/tce/ccsdtq_lambda/ |
H A D | ccsdtq_lambda2_13.F | 34 INTEGER h3b_1 184 &- 1 + noab * (h3b_1 - 1 + noab * (h14b_1 - 1))))))))) 196 &- 1 + noab * (h3b_1 - 1 + noab * (h14b_1 - 1))))))))) 207 &- 1 + noab * (h3b_1 - 1 + noab * (h14b_1 - 1))))))))) 218 &- 1 + noab * (h3b_1 - 1 + noab * (h14b_1 - 1))))))))) 230 &- 1 + noab * (h3b_1 - 1 + noab * (h14b_1 - 1))))))))) 241 &- 1 + noab * (h3b_1 - 1 + noab * (h14b_1 - 1))))))))) 252 &- 1 + noab * (h3b_1 - 1 + noab * (h14b_1 - 1))))))))) 263 &- 1 + noab * (h3b_1 - 1 + noab * (h14b_1 - 1))))))))) 274 &- 1 + noab * (h3b_1 - 1 + noab * (h14b_1 - 1))))))))) [all …]
|
H A D | ccsdtq_lambda2_30_2_1_2.F | 29 INTEGER h3b_1 133 &1 + noab * (h3b_1 - 1 + noab * (h7b_1 - 1))))))))) 144 &1 + noab * (h3b_1 - 1 + noab * (h7b_1 - 1))))))))) 155 &1 + noab * (h3b_1 - 1 + noab * (h7b_1 - 1))))))))) 166 &1 + noab * (h3b_1 - 1 + noab * (h7b_1 - 1))))))))) 177 &1 + noab * (h3b_1 - 1 + noab * (h7b_1 - 1))))))))) 188 &1 + noab * (h3b_1 - 1 + noab * (h7b_1 - 1))))))))) 199 &1 + noab * (h3b_1 - 1 + noab * (h7b_1 - 1))))))))) 210 &1 + noab * (h3b_1 - 1 + noab * (h7b_1 - 1))))))))) 221 &1 + noab * (h7b_1 - 1 + noab * (h3b_1 - 1))))))))) [all …]
|
H A D | ccsdtq_lambda2_30_2_1_1.F | 29 INTEGER h3b_1 133 &1 + noab * (h3b_1 - 1 + noab * (h7b_1 - 1))))))))) 144 &1 + noab * (h3b_1 - 1 + noab * (h7b_1 - 1))))))))) 155 &1 + noab * (h3b_1 - 1 + noab * (h7b_1 - 1))))))))) 166 &1 + noab * (h3b_1 - 1 + noab * (h7b_1 - 1))))))))) 177 &1 + noab * (h3b_1 - 1 + noab * (h7b_1 - 1))))))))) 188 &1 + noab * (h3b_1 - 1 + noab * (h7b_1 - 1))))))))) 199 &1 + noab * (h3b_1 - 1 + noab * (h7b_1 - 1))))))))) 210 &1 + noab * (h3b_1 - 1 + noab * (h7b_1 - 1))))))))) 221 &1 + noab * (h7b_1 - 1 + noab * (h3b_1 - 1))))))))) [all …]
|
/dports/science/nwchem-data/nwchem-7.0.2-release/src/tce/eomccsdtq/ |
H A D | eomccsdtq_y2_12.F | 34 INTEGER h3b_1 184 &- 1 + noab * (h3b_1 - 1 + noab * (h14b_1 - 1))))))))) 196 &- 1 + noab * (h3b_1 - 1 + noab * (h14b_1 - 1))))))))) 207 &- 1 + noab * (h3b_1 - 1 + noab * (h14b_1 - 1))))))))) 218 &- 1 + noab * (h3b_1 - 1 + noab * (h14b_1 - 1))))))))) 230 &- 1 + noab * (h3b_1 - 1 + noab * (h14b_1 - 1))))))))) 241 &- 1 + noab * (h3b_1 - 1 + noab * (h14b_1 - 1))))))))) 252 &- 1 + noab * (h3b_1 - 1 + noab * (h14b_1 - 1))))))))) 263 &- 1 + noab * (h3b_1 - 1 + noab * (h14b_1 - 1))))))))) 274 &- 1 + noab * (h3b_1 - 1 + noab * (h14b_1 - 1))))))))) [all …]
|
H A D | eomccsdtq_y2_29_2_1_1.F | 29 INTEGER h3b_1 133 &1 + noab * (h3b_1 - 1 + noab * (h7b_1 - 1))))))))) 144 &1 + noab * (h3b_1 - 1 + noab * (h7b_1 - 1))))))))) 155 &1 + noab * (h3b_1 - 1 + noab * (h7b_1 - 1))))))))) 166 &1 + noab * (h3b_1 - 1 + noab * (h7b_1 - 1))))))))) 177 &1 + noab * (h3b_1 - 1 + noab * (h7b_1 - 1))))))))) 188 &1 + noab * (h3b_1 - 1 + noab * (h7b_1 - 1))))))))) 199 &1 + noab * (h3b_1 - 1 + noab * (h7b_1 - 1))))))))) 210 &1 + noab * (h3b_1 - 1 + noab * (h7b_1 - 1))))))))) 221 &1 + noab * (h7b_1 - 1 + noab * (h3b_1 - 1))))))))) [all …]
|
H A D | eomccsdtq_y2_29_2_1_2.F | 29 INTEGER h3b_1 133 &1 + noab * (h3b_1 - 1 + noab * (h7b_1 - 1))))))))) 144 &1 + noab * (h3b_1 - 1 + noab * (h7b_1 - 1))))))))) 155 &1 + noab * (h3b_1 - 1 + noab * (h7b_1 - 1))))))))) 166 &1 + noab * (h3b_1 - 1 + noab * (h7b_1 - 1))))))))) 177 &1 + noab * (h3b_1 - 1 + noab * (h7b_1 - 1))))))))) 188 &1 + noab * (h3b_1 - 1 + noab * (h7b_1 - 1))))))))) 199 &1 + noab * (h3b_1 - 1 + noab * (h7b_1 - 1))))))))) 210 &1 + noab * (h3b_1 - 1 + noab * (h7b_1 - 1))))))))) 221 &1 + noab * (h7b_1 - 1 + noab * (h3b_1 - 1))))))))) [all …]
|
H A D | eomccsdtq_x4_10_5.F | 41 INTEGER h3b_1 103 &1,p9b_1,p10b_1,h1b_1,h2b_1,h3b_1,h11b_1) 119 CALL GET_HASH_BLOCK(d_a,dbl_mb(k_a),dima,int_mb(k_a_offset),(h3b_1 130 CALL GET_HASH_BLOCK(d_a,dbl_mb(k_a),dima,int_mb(k_a_offset),(h3b_1 141 CALL GET_HASH_BLOCK(d_a,dbl_mb(k_a),dima,int_mb(k_a_offset),(h3b_1 152 &1 - 1 + noab * (h3b_1 - 1 + noab * (h2b_1 - 1 + noab * (h1b_1 - 1 162 CALL GET_HASH_BLOCK(d_a,dbl_mb(k_a),dima,int_mb(k_a_offset),(h3b_1 173 CALL GET_HASH_BLOCK(d_a,dbl_mb(k_a),dima,int_mb(k_a_offset),(h3b_1 184 CALL GET_HASH_BLOCK(d_a,dbl_mb(k_a),dima,int_mb(k_a_offset),(h3b_1 196 &1 - 1 + noab * (h3b_1 - 1 + noab * (h2b_1 - 1 + noab * (h1b_1 - 1 [all …]
|
H A D | eomccsdtq_y2_23.F | 35 INTEGER h3b_1 167 &- 1 + noab * (h3b_1 - 1 + noab * (h13b_1 - 1))))))))) 178 &- 1 + noab * (h3b_1 - 1 + noab * (h13b_1 - 1))))))))) 189 &- 1 + noab * (h3b_1 - 1 + noab * (h13b_1 - 1))))))))) 200 &- 1 + noab * (h3b_1 - 1 + noab * (h13b_1 - 1))))))))) 211 &- 1 + noab * (h3b_1 - 1 + noab * (h13b_1 - 1))))))))) 222 &- 1 + noab * (h3b_1 - 1 + noab * (h13b_1 - 1))))))))) 233 &- 1 + noab * (h3b_1 - 1 + noab * (h13b_1 - 1))))))))) 244 &- 1 + noab * (h3b_1 - 1 + noab * (h13b_1 - 1))))))))) 255 &- 1 + noab * (h13b_1 - 1 + noab * (h3b_1 - 1))))))))) [all …]
|
H A D | eomccsdtq_x3_13_5.F | 41 INTEGER h3b_1 103 &p7b_1,p8b_1,h1b_1,h2b_1,h3b_1,h9b_1) 118 CALL GET_HASH_BLOCK(d_a,dbl_mb(k_a),dima,int_mb(k_a_offset),(h3b_1 128 CALL GET_HASH_BLOCK(d_a,dbl_mb(k_a),dima,int_mb(k_a_offset),(h3b_1 138 CALL GET_HASH_BLOCK(d_a,dbl_mb(k_a),dima,int_mb(k_a_offset),(h3b_1 149 & - 1 + noab * (h3b_1 - 1 + noab * (h2b_1 - 1 + noab * (h1b_1 - 1 + 159 CALL GET_HASH_BLOCK(d_a,dbl_mb(k_a),dima,int_mb(k_a_offset),(h3b_1 170 CALL GET_HASH_BLOCK(d_a,dbl_mb(k_a),dima,int_mb(k_a_offset),(h3b_1 181 CALL GET_HASH_BLOCK(d_a,dbl_mb(k_a),dima,int_mb(k_a_offset),(h3b_1 193 & - 1 + noab * (h3b_1 - 1 + noab * (h2b_1 - 1 + noab * (h1b_1 - 1 + [all …]
|
/dports/science/nwchem-data/nwchem-7.0.2-release/src/tce/ccsdtq/ |
H A D | ccsdtq_t3_11_5.F | 41 INTEGER h3b_1 103 &p7b_1,p8b_1,h1b_1,h2b_1,h3b_1,h9b_1) 118 CALL GET_HASH_BLOCK(d_a,dbl_mb(k_a),dima,int_mb(k_a_offset),(h3b_1 128 CALL GET_HASH_BLOCK(d_a,dbl_mb(k_a),dima,int_mb(k_a_offset),(h3b_1 138 CALL GET_HASH_BLOCK(d_a,dbl_mb(k_a),dima,int_mb(k_a_offset),(h3b_1 149 & - 1 + noab * (h3b_1 - 1 + noab * (h2b_1 - 1 + noab * (h1b_1 - 1 + 159 CALL GET_HASH_BLOCK(d_a,dbl_mb(k_a),dima,int_mb(k_a_offset),(h3b_1 170 CALL GET_HASH_BLOCK(d_a,dbl_mb(k_a),dima,int_mb(k_a_offset),(h3b_1 181 CALL GET_HASH_BLOCK(d_a,dbl_mb(k_a),dima,int_mb(k_a_offset),(h3b_1 193 & - 1 + noab * (h3b_1 - 1 + noab * (h2b_1 - 1 + noab * (h1b_1 - 1 + [all …]
|
H A D | ccsdtq_t4_9_6.F | 41 INTEGER h3b_1 103 &1,p9b_1,p10b_1,h1b_1,h2b_1,h3b_1,h11b_1) 119 CALL GET_HASH_BLOCK(d_a,dbl_mb(k_a),dima,int_mb(k_a_offset),(h3b_1 130 CALL GET_HASH_BLOCK(d_a,dbl_mb(k_a),dima,int_mb(k_a_offset),(h3b_1 141 CALL GET_HASH_BLOCK(d_a,dbl_mb(k_a),dima,int_mb(k_a_offset),(h3b_1 152 &1 - 1 + noab * (h3b_1 - 1 + noab * (h2b_1 - 1 + noab * (h1b_1 - 1 162 CALL GET_HASH_BLOCK(d_a,dbl_mb(k_a),dima,int_mb(k_a_offset),(h3b_1 173 CALL GET_HASH_BLOCK(d_a,dbl_mb(k_a),dima,int_mb(k_a_offset),(h3b_1 184 CALL GET_HASH_BLOCK(d_a,dbl_mb(k_a),dima,int_mb(k_a_offset),(h3b_1 196 &1 - 1 + noab * (h3b_1 - 1 + noab * (h2b_1 - 1 + noab * (h1b_1 - 1 [all …]
|
/dports/science/nwchem/nwchem-7b21660b82ebd85ef659f6fba7e1e73433b0bd0a/src/tce/ccsdtq/ |
H A D | ccsdtq_t3_11_5.F | 41 INTEGER h3b_1 103 &p7b_1,p8b_1,h1b_1,h2b_1,h3b_1,h9b_1) 118 CALL GET_HASH_BLOCK(d_a,dbl_mb(k_a),dima,int_mb(k_a_offset),(h3b_1 128 CALL GET_HASH_BLOCK(d_a,dbl_mb(k_a),dima,int_mb(k_a_offset),(h3b_1 138 CALL GET_HASH_BLOCK(d_a,dbl_mb(k_a),dima,int_mb(k_a_offset),(h3b_1 149 & - 1 + noab * (h3b_1 - 1 + noab * (h2b_1 - 1 + noab * (h1b_1 - 1 + 159 CALL GET_HASH_BLOCK(d_a,dbl_mb(k_a),dima,int_mb(k_a_offset),(h3b_1 170 CALL GET_HASH_BLOCK(d_a,dbl_mb(k_a),dima,int_mb(k_a_offset),(h3b_1 181 CALL GET_HASH_BLOCK(d_a,dbl_mb(k_a),dima,int_mb(k_a_offset),(h3b_1 193 & - 1 + noab * (h3b_1 - 1 + noab * (h2b_1 - 1 + noab * (h1b_1 - 1 + [all …]
|
H A D | ccsdtq_t4_9_6.F | 41 INTEGER h3b_1 103 &1,p9b_1,p10b_1,h1b_1,h2b_1,h3b_1,h11b_1) 119 CALL GET_HASH_BLOCK(d_a,dbl_mb(k_a),dima,int_mb(k_a_offset),(h3b_1 130 CALL GET_HASH_BLOCK(d_a,dbl_mb(k_a),dima,int_mb(k_a_offset),(h3b_1 141 CALL GET_HASH_BLOCK(d_a,dbl_mb(k_a),dima,int_mb(k_a_offset),(h3b_1 152 &1 - 1 + noab * (h3b_1 - 1 + noab * (h2b_1 - 1 + noab * (h1b_1 - 1 162 CALL GET_HASH_BLOCK(d_a,dbl_mb(k_a),dima,int_mb(k_a_offset),(h3b_1 173 CALL GET_HASH_BLOCK(d_a,dbl_mb(k_a),dima,int_mb(k_a_offset),(h3b_1 184 CALL GET_HASH_BLOCK(d_a,dbl_mb(k_a),dima,int_mb(k_a_offset),(h3b_1 196 &1 - 1 + noab * (h3b_1 - 1 + noab * (h2b_1 - 1 + noab * (h1b_1 - 1 [all …]
|