/dports/science/nwchem/nwchem-7b21660b82ebd85ef659f6fba7e1e73433b0bd0a/src/NWints/ecp/ |
H A D | ecp_local0.F | 64 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 D | ecp_int0.F | 77 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 D | ecp_local1.F | 74 & 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 D | ecp_int1.F | 86 & 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 D | ecp_local0.F | 64 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 D | ecp_int0.F | 77 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 D | ecp_local1.F | 74 & 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 D | ecp_int1.F | 86 & 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 D | pre_mkfrg.F | 74 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 D | pre_mkfrg.F | 74 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 D | argos_prep_mkfrg.F | 76 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 D | argos_prepare_mkfrg.F | 78 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 D | argos_diana_init.F | 144 if(.not.ma_push_get(mt_int,maxgrp*mxdef*mxnum,'iwrk',l_wrk,i_wrk))
|
H A D | argos_diana_common.fh | 82 + 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 D | argos_prepare_mkfrg.F | 78 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 D | argos_prep_mkfrg.F | 76 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 D | argos_diana_init.F | 144 if(.not.ma_push_get(mt_int,maxgrp*mxdef*mxnum,'iwrk',l_wrk,i_wrk))
|
H A D | argos_diana_common.fh | 82 + 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 D | ana_common.fh | 77 + 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 D | ana_common.fh | 77 + 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 D | dia_common.fh | 83 + 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 D | dia_init.F | 145 if(.not.ma_push_get(mt_int,maxgrp*mxdef*mxnum,'iwrk',l_wrk,i_wrk))
|
/dports/science/nwchem/nwchem-7b21660b82ebd85ef659f6fba7e1e73433b0bd0a/src/diana/ |
H A D | dia_common.fh | 83 + 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 D | dia_init.F | 145 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 D | linpen.spad | 568 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))
|