Home
last modified time | relevance | path

Searched refs:i_wrk (Results 1 – 25 of 30) sorted by relevance

12

/dports/science/nwchem/nwchem-7b21660b82ebd85ef659f6fba7e1e73433b0bd0a/src/NWints/ecp/
H A Decp_local0.F64 integer i,j,m,i_wrk,i_prm,i_tmp,i_Q_int,i_scr,i_free,i_ang, local
115 i_wrk = i_prm+n_ab*n_coef_c
116 i_free = i_wrk+nc_ab
119 & i_Q_int,i_tmp,i_prm,i_wrk,i_free
130 & tmp(i_prm),tmp(i_tmp),tmp(i_wrk),tmp(i_Q_int),
H A Decp_int0.F77 integer i,j,m,i_wrk,i_prm,i_tmp,i_Q_int,i_coef,i_scr,i_free,i_ang, local
143 i_wrk = i_prm+n_ab*n_co_max
144 i_coef = i_wrk+nc_ab
148 & i_Q_int,i_tmp,i_prm,i_wrk,i_coef,i_free
172 & tmp(i_prm),tmp(i_tmp),tmp(i_wrk),tmp(j),
H A Decp_local1.F74 & i_Qabc,i_gam,i_alp,i_pre,i_tmp,i_wrk,k,l,l_c,l_c_min, local
240 i_wrk = i_ind+n_abc
241 i_free = i_wrk+n_ab
246 & i_tmp,i_ind,i_wrk,i_free
262 & n_ab,nc_ab,n_abc,n_rad,tmp(i_tmp),tmp(i_ind),tmp(i_wrk),
H A Decp_int1.F86 & i_Qabc,i_gam,i_alp,i_pre,i_tmp,i_wrk,i_coef,k,l,l_c,l_c_min, local
260 i_wrk = i_ind+n_abc
261 i_coef = i_wrk+n_ab
267 & i_tmp,i_ind,i_wrk,i_free
313 & n_ab,nc_ab,n_abc,n_rad,tmp(i_tmp),tmp(i_ind),tmp(i_wrk),
/dports/science/nwchem-data/nwchem-7.0.2-release/src/NWints/ecp/
H A Decp_local0.F64 integer i,j,m,i_wrk,i_prm,i_tmp,i_Q_int,i_scr,i_free,i_ang,
115 i_wrk = i_prm+n_ab*n_coef_c
116 i_free = i_wrk+nc_ab
119 & i_Q_int,i_tmp,i_prm,i_wrk,i_free
130 & tmp(i_prm),tmp(i_tmp),tmp(i_wrk),tmp(i_Q_int),
H A Decp_int0.F77 integer i,j,m,i_wrk,i_prm,i_tmp,i_Q_int,i_coef,i_scr,i_free,i_ang, local
143 i_wrk = i_prm+n_ab*n_co_max
144 i_coef = i_wrk+nc_ab
148 & i_Q_int,i_tmp,i_prm,i_wrk,i_coef,i_free
172 & tmp(i_prm),tmp(i_tmp),tmp(i_wrk),tmp(j),
H A Decp_local1.F74 & i_Qabc,i_gam,i_alp,i_pre,i_tmp,i_wrk,k,l,l_c,l_c_min,
240 i_wrk = i_ind+n_abc
241 i_free = i_wrk+n_ab
246 & i_tmp,i_ind,i_wrk,i_free
262 & n_ab,nc_ab,n_abc,n_rad,tmp(i_tmp),tmp(i_ind),tmp(i_wrk),
H A Decp_int1.F86 & i_Qabc,i_gam,i_alp,i_pre,i_tmp,i_wrk,i_coef,k,l,l_c,l_c_min,
260 i_wrk = i_ind+n_abc
261 i_coef = i_wrk+n_ab
267 & i_tmp,i_ind,i_wrk,i_free
313 & n_ab,nc_ab,n_abc,n_rad,tmp(i_tmp),tmp(i_ind),tmp(i_wrk),
/dports/science/nwchem/nwchem-7b21660b82ebd85ef659f6fba7e1e73433b0bd0a/src/prepar/
H A Dpre_mkfrg.F74 integer i_wrk,l_wrk
154 if(.not.ma_push_get(mt_int,12*mato,'wrk',l_wrk,i_wrk))
159 + int_mb(i_wrk)))
/dports/science/nwchem-data/nwchem-7.0.2-release/src/prepar/
H A Dpre_mkfrg.F74 integer i_wrk,l_wrk
154 if(.not.ma_push_get(mt_int,12*mato,'wrk',l_wrk,i_wrk))
159 + int_mb(i_wrk)))
/dports/science/nwchem-data/nwchem-7.0.2-release/src/argos/
H A Dargos_prep_mkfrg.F76 integer i_wrk,l_wrk
157 if(.not.ma_push_get(mt_int,12*mato,'wrk',l_wrk,i_wrk))
162 + int_mb(i_wrk)))
H A Dargos_prepare_mkfrg.F78 integer i_wrk,l_wrk
161 if(.not.ma_push_get(mt_int,12*mato,'wrk',l_wrk,i_wrk))
166 + int_mb(i_wrk)))
H A Dargos_diana_init.F144 if(.not.ma_push_get(mt_int,maxgrp*mxdef*mxnum,'iwrk',l_wrk,i_wrk))
H A Dargos_diana_common.fh82 + i_wrk,l_wrk,i_ssel,l_ssel,i_swt,l_swt,i_hbnd,l_hbnd,
92 + i_wrk,l_wrk,i_ssel,l_ssel,i_swt,l_swt,i_hbnd,l_hbnd,
/dports/science/nwchem/nwchem-7b21660b82ebd85ef659f6fba7e1e73433b0bd0a/src/argos/
H A Dargos_prepare_mkfrg.F78 integer i_wrk,l_wrk
161 if(.not.ma_push_get(mt_int,12*mato,'wrk',l_wrk,i_wrk))
166 + int_mb(i_wrk)))
H A Dargos_prep_mkfrg.F76 integer i_wrk,l_wrk
157 if(.not.ma_push_get(mt_int,12*mato,'wrk',l_wrk,i_wrk))
162 + int_mb(i_wrk)))
H A Dargos_diana_init.F144 if(.not.ma_push_get(mt_int,maxgrp*mxdef*mxnum,'iwrk',l_wrk,i_wrk))
H A Dargos_diana_common.fh82 + i_wrk,l_wrk,i_ssel,l_ssel,i_swt,l_swt,i_hbnd,l_hbnd,
92 + i_wrk,l_wrk,i_ssel,l_ssel,i_swt,l_swt,i_hbnd,l_hbnd,
/dports/science/nwchem-data/nwchem-7.0.2-release/src/analyz/
H A Dana_common.fh77 + i_wrk,l_wrk,i_ssel,l_ssel,i_swt,l_swt,i_hbnd,l_hbnd,
86 + i_wrk,l_wrk,i_ssel,l_ssel,i_swt,l_swt,i_hbnd,l_hbnd,
/dports/science/nwchem/nwchem-7b21660b82ebd85ef659f6fba7e1e73433b0bd0a/src/analyz/
H A Dana_common.fh77 + i_wrk,l_wrk,i_ssel,l_ssel,i_swt,l_swt,i_hbnd,l_hbnd,
86 + i_wrk,l_wrk,i_ssel,l_ssel,i_swt,l_swt,i_hbnd,l_hbnd,
/dports/science/nwchem-data/nwchem-7.0.2-release/src/diana/
H A Ddia_common.fh83 + i_wrk,l_wrk,i_ssel,l_ssel,i_swt,l_swt,i_hbnd,l_hbnd,
93 + i_wrk,l_wrk,i_ssel,l_ssel,i_swt,l_swt,i_hbnd,l_hbnd,
H A Ddia_init.F145 if(.not.ma_push_get(mt_int,maxgrp*mxdef*mxnum,'iwrk',l_wrk,i_wrk))
/dports/science/nwchem/nwchem-7b21660b82ebd85ef659f6fba7e1e73433b0bd0a/src/diana/
H A Ddia_common.fh83 + i_wrk,l_wrk,i_ssel,l_ssel,i_swt,l_swt,i_hbnd,l_hbnd,
93 + i_wrk,l_wrk,i_ssel,l_ssel,i_swt,l_swt,i_hbnd,l_hbnd,
H A Ddia_init.F145 if(.not.ma_push_get(mt_int,maxgrp*mxdef*mxnum,'iwrk',l_wrk,i_wrk))
/dports/math/fricas/fricas-1.3.7/src/algebra/
H A Dlinpen.spad568 i_wrk := (off+i-1)::NNI
573 if not(zero?(qelt(A_wrk, i_wrk, j))) then
944 i_wrk := 0$NNI
947 i_wrk := row_dst(i)
949 i_wrk := row_ext((i-#row_dst)::NNI)
957 lst_rhs(idx_eqn) := -qelt(A_wrk, i_wrk, j_wrk)
969 qsetelt!(mtx_sys, idx_eqn, idx_fct, qelt(A_wrk, i_wrk, j_src))
974 -- i_wrk := row_dst(i)
998 i_wrk := row_dst(i)
1002 qsetelt!(T_wrk, i_wrk, i_src, lst_coe(idx_fct))

12