Home
last modified time | relevance | path

Searched refs:l_work (Results 1 – 25 of 55) sorted by relevance

123

/dports/science/nwchem/nwchem-7b21660b82ebd85ef659f6fba7e1e73433b0bd0a/src/tce/
H A Dtce_mod1.F21 integer l_work,k_work ! Work space local
65 1 l_work,k_work)) call errquit('tce_mod1: MA problem',0,
83 if (.not.ma_pop_stack(l_work))
123 integer l_work,k_work ! Work space local
167 1 l_work,k_work)) call errquit('tce_moq1: MA problem',0,
185 if (.not.ma_pop_stack(l_work))
226 integer l_work,k_work ! Work space local
270 1 l_work,k_work)) call errquit('tce_moo1: MA problem',0,
288 if (.not.ma_pop_stack(l_work))
329 integer l_work,k_work ! Work space local
[all …]
H A Dtce_mod1_new.F29 integer l_work,k_work ! Work space
124 if (.not.ma_push_get(mt_dbl,range_g1*nbf,'Work',l_work,
157 if (.not.ma_pop_stack(l_work))
H A Dtce_mo1e.F21 integer l_work,k_work ! Work space
84 1 l_work,k_work)) call errquit('tce_mo1e: MA problem',
119 if (.not.ma_pop_stack(l_work))
/dports/science/nwchem-data/nwchem-7.0.2-release/src/tce/
H A Dtce_mod1.F21 integer l_work,k_work ! Work space local
65 1 l_work,k_work)) call errquit('tce_mod1: MA problem',0,
83 if (.not.ma_pop_stack(l_work))
123 integer l_work,k_work ! Work space local
167 1 l_work,k_work)) call errquit('tce_moq1: MA problem',0,
185 if (.not.ma_pop_stack(l_work))
226 integer l_work,k_work ! Work space local
270 1 l_work,k_work)) call errquit('tce_moo1: MA problem',0,
288 if (.not.ma_pop_stack(l_work))
329 integer l_work,k_work ! Work space local
[all …]
H A Dtce_mod1_new.F29 integer l_work,k_work ! Work space
124 if (.not.ma_push_get(mt_dbl,range_g1*nbf,'Work',l_work,
157 if (.not.ma_pop_stack(l_work))
H A Dtce_mo1e.F21 integer l_work,k_work ! Work space
84 1 l_work,k_work)) call errquit('tce_mo1e: MA problem',
119 if (.not.ma_pop_stack(l_work))
/dports/science/nwchem/nwchem-7b21660b82ebd85ef659f6fba7e1e73433b0bd0a/src/etrans/
H A Det_det.F20 integer l_ipvt,k_ipvt,l_a,k_a,l_work,k_work
31 1 l_work,k_work)) call errquit
47 if (.not.ma_pop_stack(l_work)) call errquit
/dports/science/nwchem-data/nwchem-7.0.2-release/src/etrans/
H A Det_det.F20 integer l_ipvt,k_ipvt,l_a,k_a,l_work,k_work local
31 1 l_work,k_work)) call errquit
47 if (.not.ma_pop_stack(l_work)) call errquit
/dports/science/nwchem/nwchem-7b21660b82ebd85ef659f6fba7e1e73433b0bd0a/src/util/
H A Dga_local_mdot.F22 integer k_work,l_work
47 if (.not.ma_push_get(mt_dbl,nva*nvb,'work',l_work,k_work))
77 if (.not.ma_pop_stack(l_work))
105 integer k_work,l_work
132 if (.not.ma_push_get(mt_dcpl,nva*nvb,'work',l_work,k_work))
162 if (.not.ma_pop_stack(l_work))
/dports/science/nwchem-data/nwchem-7.0.2-release/src/util/
H A Dga_local_mdot.F22 integer k_work,l_work
47 if (.not.ma_push_get(mt_dbl,nva*nvb,'work',l_work,k_work))
77 if (.not.ma_pop_stack(l_work))
105 integer k_work,l_work
132 if (.not.ma_push_get(mt_dcpl,nva*nvb,'work',l_work,k_work))
162 if (.not.ma_pop_stack(l_work))
/dports/science/nwchem/nwchem-7b21660b82ebd85ef659f6fba7e1e73433b0bd0a/src/rdmft/recycling/wfn1/
H A Dwfn1_mat_power.F30 integer l_work, k_work
74 if (.not.ma_push_get(MT_DBL,lwork,"work",l_work,k_work))
104 if (.not.ma_pop_stack(l_work))
/dports/science/nwchem-data/nwchem-7.0.2-release/src/rdmft/recycling/wfn1/
H A Dwfn1_mat_power.F30 integer l_work, k_work
74 if (.not.ma_push_get(MT_DBL,lwork,"work",l_work,k_work))
104 if (.not.ma_pop_stack(l_work))
/dports/multimedia/v4l_compat/linux-5.13-rc2/fs/ocfs2/dlmfs/
H A Duserdlm.h51 struct work_struct l_work; member
H A Duserdlm.c168 INIT_WORK(&lockres->l_work, user_dlm_unblock_lock); in __user_dlm_queue_lockres()
170 queue_work(user_dlm_worker, &lockres->l_work); in __user_dlm_queue_lockres()
287 container_of(work, struct user_lock_res, l_work); in user_dlm_unblock_lock()
/dports/multimedia/libv4l/linux-5.13-rc2/fs/ocfs2/dlmfs/
H A Duserdlm.h51 struct work_struct l_work; member
H A Duserdlm.c168 INIT_WORK(&lockres->l_work, user_dlm_unblock_lock); in __user_dlm_queue_lockres()
170 queue_work(user_dlm_worker, &lockres->l_work); in __user_dlm_queue_lockres()
287 container_of(work, struct user_lock_res, l_work); in user_dlm_unblock_lock()
/dports/multimedia/v4l-utils/linux-5.13-rc2/fs/ocfs2/dlmfs/
H A Duserdlm.h51 struct work_struct l_work; member
H A Duserdlm.c168 INIT_WORK(&lockres->l_work, user_dlm_unblock_lock); in __user_dlm_queue_lockres()
170 queue_work(user_dlm_worker, &lockres->l_work); in __user_dlm_queue_lockres()
287 container_of(work, struct user_lock_res, l_work); in user_dlm_unblock_lock()
/dports/science/nwchem/nwchem-7b21660b82ebd85ef659f6fba7e1e73433b0bd0a/src/ddscf/
H A Drohf_canon.F132 integer k_work,l_work,k_tmp,l_tmp
141 if (.not.ma_push_get(MT_Dbl,sizew,'work',l_work,k_work))
/dports/science/nwchem-data/nwchem-7.0.2-release/src/ddscf/
H A Drohf_canon.F140 integer k_work,l_work,k_tmp,l_tmp
149 if (.not.ma_push_get(MT_Dbl,sizew,'work',l_work,k_work))
/dports/science/nwchem-data/nwchem-7.0.2-release/src/moints/
H A Dmoints_full.F64 integer k_irs, l_irs, k_map, l_map, l_work, k_work
159 if (.not. ma_push_get(MT_DBL, nbf, 'Evals', l_work, k_work))
549 if (.not. ma_pop_stack(l_work))
/dports/science/nwchem/nwchem-7b21660b82ebd85ef659f6fba7e1e73433b0bd0a/src/optim/mepgs/
H A Dmepgs_drv.F382 integer l_pmat, k_pmat, l_work, k_work
385 $ l_work, k_work)) call errquit
400 if (.not. ma_chop_stack(l_work)) call errquit
2605 integer l_pmat, k_pmat, l_work, k_work, i
2609 $ l_work, k_work)) call errquit
2656 if (.not. ma_chop_stack(l_work)) call errquit
3057 integer l_hess, k_hess, l_work, k_work, lenwork
3095 $ l_work, k_work)) call errquit
/dports/science/nwchem-data/nwchem-7.0.2-release/src/optim/mepgs/
H A Dmepgs_drv.F382 integer l_pmat, k_pmat, l_work, k_work
385 $ l_work, k_work)) call errquit
400 if (.not. ma_chop_stack(l_work)) call errquit
2595 integer l_pmat, k_pmat, l_work, k_work, i
2599 $ l_work, k_work)) call errquit
2646 if (.not. ma_chop_stack(l_work)) call errquit
3045 integer l_hess, k_hess, l_work, k_work, lenwork
3081 $ l_work, k_work)) call errquit
/dports/science/nwchem/nwchem-7b21660b82ebd85ef659f6fba7e1e73433b0bd0a/src/moints/
H A Dmoints_full.F70 integer k_irs, l_irs, k_map, l_map, l_work, k_work
165 if (.not. ma_push_get(MT_DBL, nbf, 'Evals', l_work, k_work))
567 if (.not. ma_pop_stack(l_work))
/dports/science/nwchem/nwchem-7b21660b82ebd85ef659f6fba7e1e73433b0bd0a/src/uccsdt/
H A Dmoints_shpair.F262 integer l_wivu, l_wkvu, l_work, l_buf, l_tmp, l_res
423 $ l_work, k_work)) call errquit
461 if (.not. ma_pop_stack(l_work)) call errquit
1442 integer wlo, whi, llo, lhi, junk, l_work, k_work, lenwork
1489 $ l_work, k_work))
1529 if (.not. ma_pop_stack(l_work))

123