Lines Matching refs:jbas
60 integer i_geom, j_geom, ibas, jbas, ucont
84 jbas = j_basis + BASIS_HANDLE_OFFSET
95 ucont = (sf_ibs_cn2ucn(jsh,jbas))
96 Lj = infbs_cont(CONT_TYPE ,ucont,jbas)
97 j_prim = infbs_cont(CONT_NPRIM,ucont,jbas)
98 j_gen = infbs_cont(CONT_NGEN ,ucont,jbas)
99 j_iexp = infbs_cont(CONT_IEXP ,ucont,jbas)
100 j_icfp = infbs_cont(CONT_ICFP ,ucont,jbas)
101 j_cent = (sf_ibs_cn2ce(jsh,jbas))
102 j_geom = ibs_geom(jbas)
114 & coords(1,j_cent,j_geom),dbl_mb(mb_exndcf(j_iexp,jbas)),
115 & dbl_mb(mb_exndcf(j_icfp,jbas)), j_prim, j_gen, Lj,