Lines Matching refs:ninter
68 int ninter = nstrs;
77 for (str_id = 0; str_id < ninter; str_id++) {
128 void SCIdes_des_linkstr(int *link_index, int norb, int nocc, int nstrs, int ninter,
139 for (str_id = 0; str_id < ninter; str_id++) {
188 int ninter = 0;
195 uniq_strs[ninter] = str1;
196 ninter++;
200 return ninter;
203 void SCIdes_linkstr(int *link_index, int norb, int nocc, int nstrs, int ninter,
211 for (str_id = 0; str_id < ninter; str_id++) {
235 int ninter = 0;
242 uniq_strs[ninter] = str1;
243 ninter++;
247 return ninter;
250 void SCIcre_linkstr(int *link_index, int norb, int nocc, int nstrs, int ninter,
257 for (str_id = 0; str_id < ninter; str_id++) {
290 int ninter = 0;
300 inter[ninter] = str1;
301 ninter++;
308 inter[ninter] = (str1 ^ (1ULL<<occ[j])) | (1ULL<<vir[b]);
309 ninter++;
314 return ninter;