Lines Matching refs:jbas
58 integer ibas, jbas, kbas local
103 jbas = j_basis + BASIS_HANDLE_OFFSET
115 ucont = (sf_ibs_cn2ucn(jsh,jbas))
116 Lj = infbs_cont(CONT_TYPE ,ucont,jbas)
117 j_prim = infbs_cont(CONT_NPRIM,ucont,jbas)
118 j_gen = infbs_cont(CONT_NGEN ,ucont,jbas)
119 j_iexp = infbs_cont(CONT_IEXP ,ucont,jbas)
120 j_icfp = infbs_cont(CONT_ICFP ,ucont,jbas)
121 j_cent = (sf_ibs_cn2ce(jsh,jbas))
122 j_geom = ibs_geom(jbas)
148 & dbl_mb(mb_exndcf(j_iexp,jbas)),
149 & dbl_mb(mb_exndcf(j_icfp,jbas)),
161 & bas_spherical(jbas).or.
172 & int_nbf_x(Lj),int_nbf_s(Lj),Lj,j_gen,bas_spherical(jbas),