Lines Matching refs:jbas
57 integer i_geom, j_geom, ibas, jbas, ucont local
94 jbas = j_basis + BASIS_HANDLE_OFFSET
105 ucont = (sf_ibs_cn2ucn(jsh,jbas))
106 Lj = infbs_cont(CONT_TYPE ,ucont,jbas)
107 j_prim = infbs_cont(CONT_NPRIM,ucont,jbas)
108 j_gen = infbs_cont(CONT_NGEN ,ucont,jbas)
109 j_iexp = infbs_cont(CONT_IEXP ,ucont,jbas)
110 j_icfp = infbs_cont(CONT_ICFP ,ucont,jbas)
111 j_cent = (sf_ibs_cn2ce(jsh,jbas))
112 j_geom = ibs_geom(jbas)
128 & coords(1,j_cent,j_geom),dbl_mb(mb_exndcf(j_iexp,jbas)),
129 & dbl_mb(mb_exndcf(j_icfp,jbas)),
139 any_spherical = bas_spherical(ibas).or.bas_spherical(jbas)
149 & int_nbf_x(Lj),int_nbf_s(Lj),Lj,j_gen,bas_spherical(jbas),