Home
last modified time | relevance | path

Searched refs:l_work1 (Results 1 – 25 of 62) sorted by relevance

123

/dports/science/nwchem/nwchem-7b21660b82ebd85ef659f6fba7e1e73433b0bd0a/src/tce/
H A Dtce_ao2e_cholesky.F24 integer l_work1,k_work1 ! Work array 1 local
122 if (.not.ma_push_get(mt_dbl,work1,'work1',l_work1,k_work1))
274 if (.not.ma_pop_stack(l_work1))
H A Dtce_ao2e_cholesky_2d.F24 integer l_work1,k_work1 ! Work array 1 local
123 if (.not.ma_push_get(mt_dbl,work1,'work1',l_work1,k_work1))
284 if (.not.ma_pop_stack(l_work1))
H A Dtce_ao2e_cholesky_4d.F24 integer l_work1,k_work1 ! Work array 1 local
130 if (.not.ma_push_get(mt_dbl,work1,'work1',l_work1,k_work1))
300 if (.not.ma_pop_stack(l_work1))
H A Dtce_ao2e_disk.F26 integer l_work1,k_work1 ! Work array 1
113 if (.not.ma_push_get(mt_dbl,work1,'work1',l_work1,k_work1))
255 if (.not.ma_pop_stack(l_work1))
H A Dtce_ao2e_new.F29 integer l_work1,k_work1 ! Work array 1
165 if (.not.ma_push_get(mt_dbl,work1,'work1',l_work1,k_work1))
298 if (.not.ma_pop_stack(l_work1))
H A Dtce_ao2e.F26 integer l_work1,k_work1 ! Work array 1 local
117 if (.not.ma_push_get(mt_dbl,work1,'work1',l_work1,k_work1))
254 if (.not.ma_pop_stack(l_work1))
H A Dtce_mo2e_2emet3_n5.F49 integer l_work1,k_work1 ! Work array 1
201 if (.not.ma_push_get(mt_dbl,work1,'work1',l_work1,k_work1))
762 if (.not.ma_pop_stack(l_work1))
H A Dtce_mo2e_2emet3.F49 integer l_work1,k_work1 ! Work array 1
201 if (.not.ma_push_get(mt_dbl,work1,'work1',l_work1,k_work1))
732 if (.not.ma_pop_stack(l_work1))
H A Dtce_mo2e_2emet4.F53 integer l_work1,k_work1 ! Work array 1
244 if (.not.ma_push_get(mt_dbl,work1,'work1',l_work1,k_work1))
737 if (.not.ma_pop_stack(l_work1))
H A Dtce_mo2e_2emet4_n5.F53 integer l_work1,k_work1 ! Work array 1
244 if (.not.ma_push_get(mt_dbl,work1,'work1',l_work1,k_work1))
737 if (.not.ma_pop_stack(l_work1))
H A Dtce_mo2e_zones_4a_disk_ga.F51 integer l_work1,k_work1 ! Work array 1
203 if (.not.ma_push_get(mt_dbl,work1,'work1',l_work1,k_work1))
734 if (.not.ma_pop_stack(l_work1))
/dports/science/nwchem-data/nwchem-7.0.2-release/src/tce/
H A Dtce_ao2e_cholesky.F24 integer l_work1,k_work1 ! Work array 1
122 if (.not.ma_push_get(mt_dbl,work1,'work1',l_work1,k_work1))
274 if (.not.ma_pop_stack(l_work1))
H A Dtce_ao2e_cholesky_2d.F24 integer l_work1,k_work1 ! Work array 1
123 if (.not.ma_push_get(mt_dbl,work1,'work1',l_work1,k_work1))
284 if (.not.ma_pop_stack(l_work1))
H A Dtce_ao2e_cholesky_4d.F24 integer l_work1,k_work1 ! Work array 1
130 if (.not.ma_push_get(mt_dbl,work1,'work1',l_work1,k_work1))
300 if (.not.ma_pop_stack(l_work1))
H A Dtce_ao2e_disk.F26 integer l_work1,k_work1 ! Work array 1
113 if (.not.ma_push_get(mt_dbl,work1,'work1',l_work1,k_work1))
255 if (.not.ma_pop_stack(l_work1))
H A Dtce_ao2e_new.F29 integer l_work1,k_work1 ! Work array 1
165 if (.not.ma_push_get(mt_dbl,work1,'work1',l_work1,k_work1))
298 if (.not.ma_pop_stack(l_work1))
H A Dtce_ao2e.F26 integer l_work1,k_work1 ! Work array 1
117 if (.not.ma_push_get(mt_dbl,work1,'work1',l_work1,k_work1))
254 if (.not.ma_pop_stack(l_work1))
H A Dtce_mo2e_2emet3.F49 integer l_work1,k_work1 ! Work array 1
201 if (.not.ma_push_get(mt_dbl,work1,'work1',l_work1,k_work1))
732 if (.not.ma_pop_stack(l_work1))
H A Dtce_mo2e_2emet3_n5.F49 integer l_work1,k_work1 ! Work array 1
201 if (.not.ma_push_get(mt_dbl,work1,'work1',l_work1,k_work1))
762 if (.not.ma_pop_stack(l_work1))
H A Dtce_mo2e_2emet4.F53 integer l_work1,k_work1 ! Work array 1
244 if (.not.ma_push_get(mt_dbl,work1,'work1',l_work1,k_work1))
737 if (.not.ma_pop_stack(l_work1))
H A Dtce_mo2e_2emet4_n5.F53 integer l_work1,k_work1 ! Work array 1
244 if (.not.ma_push_get(mt_dbl,work1,'work1',l_work1,k_work1))
737 if (.not.ma_pop_stack(l_work1))
/dports/science/nwchem/nwchem-7b21660b82ebd85ef659f6fba7e1e73433b0bd0a/src/nwdft/lr_tddft/
H A Dtddft_diagon.F40 integer l_work1,k_work1 ! MA handle for a work array
52 1 l_work1,k_work1)) call errquit
237 if (.not.ma_pop_stack(l_work1)) call errquit
/dports/science/nwchem-data/nwchem-7.0.2-release/src/nwdft/lr_tddft/
H A Dtddft_diagon.F40 integer l_work1,k_work1 ! MA handle for a work array
52 1 l_work1,k_work1)) call errquit
237 if (.not.ma_pop_stack(l_work1)) call errquit
/dports/science/nwchem/nwchem-7b21660b82ebd85ef659f6fba7e1e73433b0bd0a/src/tce/mrcc/
H A Dtce_mrcc_ao2e.F26 integer l_work1,k_work1 ! Work array 1 local
155 if (.not.ma_push_get(mt_dbl,work1,'work1',l_work1,k_work1))
315 if (.not.ma_pop_stack(l_work1))
/dports/science/nwchem-data/nwchem-7.0.2-release/src/tce/mrcc/
H A Dtce_mrcc_ao2e.F26 integer l_work1,k_work1 ! Work array 1
155 if (.not.ma_push_get(mt_dbl,work1,'work1',l_work1,k_work1))
315 if (.not.ma_pop_stack(l_work1))

123