Home
last modified time | relevance | path

Searched refs:n_allm_b (Results 1 – 6 of 6) sorted by relevance

/dports/science/nwchem/nwchem-7b21660b82ebd85ef659f6fba7e1e73433b0bd0a/src/NWints/rel/
H A Drel_onel.F88 integer n_allm_b ! n_cartm_b*n_cont_b local
295 n_allm_b = n_cartm_b*n_cont_B
298 n_intmp = n_allp_a*n_allm_b
299 n_intmm = n_allm_a*n_allm_b
422 call ecp_matpr (scr(i_mp),1,n_allm_b,1,n_allp_a,
423 & 1,n_allm_b,1,n_allp_a,'V(la+1,lb-1)','E',120,6)
448 call ecp_matpr (scr(i_mm),1,n_allm_b,1,n_allm_a,
449 & 1,n_allm_b,1,n_allm_a,'V(la+1,lb-1)','E',120,6)
H A Drel_oneld_cosmo.F105 integer n_allm_b ! n_cartm_b*n_cont_b local
354 n_allm_b = n_cartm_b*n_cont_b
502 call ecp_matpr(scr(k),1,n_allm_b,1,n_allp_a,
503 & 1,n_allm_b,1,n_allp_a,'l_A+1,l_B-1','E',120,6)
537 call ecp_matpr(scr(k),1,n_allm_b,1,n_allm_a,
538 & 1,n_allm_b,1,n_allm_a,'l_A-1,l_B-1','E',120,6)
H A Drel_oneld.F112 integer n_allm_b ! n_cartm_b*n_cont_b local
358 n_allm_b = n_cartm_b*n_cont_b
499 call ecp_matpr(scr(k),1,n_allm_b,1,n_allp_a,
500 & 1,n_allm_b,1,n_allp_a,'l_A+1,l_B-1','E',120,6)
533 call ecp_matpr(scr(k),1,n_allm_b,1,n_allm_a,
534 & 1,n_allm_b,1,n_allm_a,'l_A-1,l_B-1','E',120,6)
/dports/science/nwchem-data/nwchem-7.0.2-release/src/NWints/rel/
H A Drel_onel.F88 integer n_allm_b ! n_cartm_b*n_cont_b local
295 n_allm_b = n_cartm_b*n_cont_B
298 n_intmp = n_allp_a*n_allm_b
299 n_intmm = n_allm_a*n_allm_b
422 call ecp_matpr (scr(i_mp),1,n_allm_b,1,n_allp_a,
423 & 1,n_allm_b,1,n_allp_a,'V(la+1,lb-1)','E',120,6)
448 call ecp_matpr (scr(i_mm),1,n_allm_b,1,n_allm_a,
449 & 1,n_allm_b,1,n_allm_a,'V(la+1,lb-1)','E',120,6)
H A Drel_oneld_cosmo.F105 integer n_allm_b ! n_cartm_b*n_cont_b local
354 n_allm_b = n_cartm_b*n_cont_b
502 call ecp_matpr(scr(k),1,n_allm_b,1,n_allp_a,
503 & 1,n_allm_b,1,n_allp_a,'l_A+1,l_B-1','E',120,6)
537 call ecp_matpr(scr(k),1,n_allm_b,1,n_allm_a,
538 & 1,n_allm_b,1,n_allm_a,'l_A-1,l_B-1','E',120,6)
H A Drel_oneld.F112 integer n_allm_b ! n_cartm_b*n_cont_b local
358 n_allm_b = n_cartm_b*n_cont_b
499 call ecp_matpr(scr(k),1,n_allm_b,1,n_allp_a,
500 & 1,n_allm_b,1,n_allp_a,'l_A+1,l_B-1','E',120,6)
533 call ecp_matpr(scr(k),1,n_allm_b,1,n_allm_a,
534 & 1,n_allm_b,1,n_allm_a,'l_A-1,l_B-1','E',120,6)