/dports/science/mpqc/mpqc-2.3.1/src/lib/chemistry/qc/cints/ |
H A D | obosrr.cc | 58 int iind,jind; in AI_OSrecurs_() local 79 AI0[0][jind][m] = PB[2]*AI0[0][jind-jzm][m] - in AI_OSrecurs_() 83 AI0[0][jind][m] += pp*(jz-1)*(AI0[0][jind-2*jzm][m] - in AI_OSrecurs_() 90 AI0[0][jind][m] = PB[1]*AI0[0][jind-jym][m] - in AI_OSrecurs_() 94 AI0[0][jind][m] += pp*(jy-1)*(AI0[0][jind-2*jym][m] - in AI_OSrecurs_() 101 AI0[0][jind][m] = PB[0]*AI0[0][jind-jxm][m] - in AI_OSrecurs_() 105 AI0[0][jind][m] += pp*(jx-1)*(AI0[0][jind-2*jxm][m] - in AI_OSrecurs_() 130 AI0[iind][jind][m] = PA[2]*AI0[iind-izm][jind][m] - in AI_OSrecurs_() 146 AI0[iind][jind][m] = PA[1]*AI0[iind-iym][jind][m] - in AI_OSrecurs_() 151 (AI0[iind-2*iym][jind][m] - AI0[iind-2*iym][jind][m+1]); in AI_OSrecurs_() [all …]
|
/dports/math/sisl/SISL-SISL-4.6.0-44-g9114631/src/ |
H A D | s1960.c | 151 jind = 0; 161 jind = j; 183 if (jind < (n2-1)) 189 if (jind > 0) 210 if (iind == 0 && jind == 0) 217 tvals = s6schoen(et2,k2,jind); 233 tvals = s6schoen(et2,k2,jind); 250 tvale = s6schoen(et2,k2,jind); 317 else if (iind == (n1-1) && jind > 0 && jind < (n2-1)) 403 else if (iind == 0 && jind > 0 && jind < (n2-1)) [all …]
|
/dports/science/cp2k/cp2k-2e995eec7fd208c8a72d9544807bd8b8ba8cd1cc/src/ |
H A D | topology_connectivity_util.F | 405 jind = map_vars(j) 429 jind = map_cvars(j) 430 min_index = MIN(conn_info%c_bond_a(jind), conn_info%c_bond_b(jind)) 568 jind = map_vars(j) 596 min_index = MIN(c_var_a(jind), c_var_b(jind), c_var_c(jind)) 722 jind = map_vars(j) 746 min_index = MIN(c_var_a(jind), c_var_b(jind), c_var_c(jind)) 882 jind = map_vars(j) 913 min_index = MIN(c_var_a(jind), c_var_b(jind), c_var_c(jind), c_var_d(jind)) 1066 jind = map_vars(j) [all …]
|
/dports/science/cp2k-data/cp2k-7.1.0/src/ |
H A D | topology_connectivity_util.F | 405 jind = map_vars(j) 429 jind = map_cvars(j) 430 min_index = MIN(conn_info%c_bond_a(jind), conn_info%c_bond_b(jind)) 568 jind = map_vars(j) 596 min_index = MIN(c_var_a(jind), c_var_b(jind), c_var_c(jind)) 722 jind = map_vars(j) 746 min_index = MIN(c_var_a(jind), c_var_b(jind), c_var_c(jind)) 882 jind = map_vars(j) 913 min_index = MIN(c_var_a(jind), c_var_b(jind), c_var_c(jind), c_var_d(jind)) 1066 jind = map_vars(j) [all …]
|
/dports/science/plumed/plumed2-2.7.2/src/multicolvar/ |
H A D | CatomPack.h | 47 void CatomPack::setIndex( const unsigned& jind, const unsigned& ind ) { in setIndex() argument 48 plumed_dbg_assert( jind<indices.size() ); in setIndex() 49 indices[jind]=ind; in setIndex() 53 void CatomPack::setDerivative( const unsigned& jind, const Tensor& der ) { in setDerivative() argument 54 plumed_dbg_assert( jind<indices.size() ); in setDerivative() 55 derivs[jind]=der; in setDerivative() 64 unsigned CatomPack::getIndex( const unsigned& jind ) const { in getIndex() argument 65 plumed_dbg_assert( jind<indices.size() ); in getIndex() 66 return indices[jind]; in getIndex()
|
/dports/math/spooles-mpich/spooles.2.2/InpMtx/src/ |
H A D | fullAdj.c | 21 int *jind, *list, *mark ; in InpMtx_fullAdjacency() local 81 if ( (kvtx = jind[ii]) < jvtx ) { in InpMtx_fullAdjacency() 155 IVfprintf(stdout, jsize, jind) ; in InpMtx_fullAdjacency() 159 kvtx = jind[ii] ; in InpMtx_fullAdjacency() 229 int *jind, *list, *mark ; in InpMtx_fullAdjacency2() local 310 if ( (kvtx = jind[ii]) < jvtx ) { in InpMtx_fullAdjacency2() 337 if ( (kvtx = jind[ii]) < jvtx ) { in InpMtx_fullAdjacency2() 411 IVfprintf(stdout, jsize, jind) ; in InpMtx_fullAdjacency2() 415 kvtx = jind[ii] ; in InpMtx_fullAdjacency2() 457 IVfprintf(stdout, jsize, jind) ; in InpMtx_fullAdjacency2() [all …]
|
/dports/math/spooles-mpich/spooles.2.2_SHARED/InpMtx/src/ |
H A D | fullAdj.c | 21 int *jind, *list, *mark ; in InpMtx_fullAdjacency() local 81 if ( (kvtx = jind[ii]) < jvtx ) { in InpMtx_fullAdjacency() 155 IVfprintf(stdout, jsize, jind) ; in InpMtx_fullAdjacency() 159 kvtx = jind[ii] ; in InpMtx_fullAdjacency() 229 int *jind, *list, *mark ; in InpMtx_fullAdjacency2() local 310 if ( (kvtx = jind[ii]) < jvtx ) { in InpMtx_fullAdjacency2() 337 if ( (kvtx = jind[ii]) < jvtx ) { in InpMtx_fullAdjacency2() 411 IVfprintf(stdout, jsize, jind) ; in InpMtx_fullAdjacency2() 415 kvtx = jind[ii] ; in InpMtx_fullAdjacency2() 457 IVfprintf(stdout, jsize, jind) ; in InpMtx_fullAdjacency2() [all …]
|
/dports/math/spooles/spooles.2.2_SHARED/InpMtx/src/ |
H A D | fullAdj.c | 21 int *jind, *list, *mark ; in InpMtx_fullAdjacency() local 81 if ( (kvtx = jind[ii]) < jvtx ) { in InpMtx_fullAdjacency() 155 IVfprintf(stdout, jsize, jind) ; in InpMtx_fullAdjacency() 159 kvtx = jind[ii] ; in InpMtx_fullAdjacency() 229 int *jind, *list, *mark ; in InpMtx_fullAdjacency2() local 310 if ( (kvtx = jind[ii]) < jvtx ) { in InpMtx_fullAdjacency2() 337 if ( (kvtx = jind[ii]) < jvtx ) { in InpMtx_fullAdjacency2() 411 IVfprintf(stdout, jsize, jind) ; in InpMtx_fullAdjacency2() 415 kvtx = jind[ii] ; in InpMtx_fullAdjacency2() 457 IVfprintf(stdout, jsize, jind) ; in InpMtx_fullAdjacency2() [all …]
|
/dports/math/spooles/spooles.2.2/InpMtx/src/ |
H A D | fullAdj.c | 21 int *jind, *list, *mark ; in InpMtx_fullAdjacency() local 81 if ( (kvtx = jind[ii]) < jvtx ) { in InpMtx_fullAdjacency() 155 IVfprintf(stdout, jsize, jind) ; in InpMtx_fullAdjacency() 159 kvtx = jind[ii] ; in InpMtx_fullAdjacency() 229 int *jind, *list, *mark ; in InpMtx_fullAdjacency2() local 310 if ( (kvtx = jind[ii]) < jvtx ) { in InpMtx_fullAdjacency2() 337 if ( (kvtx = jind[ii]) < jvtx ) { in InpMtx_fullAdjacency2() 411 IVfprintf(stdout, jsize, jind) ; in InpMtx_fullAdjacency2() 415 kvtx = jind[ii] ; in InpMtx_fullAdjacency2() 457 IVfprintf(stdout, jsize, jind) ; in InpMtx_fullAdjacency2() [all …]
|
/dports/math/spooles-mpich/spooles.2.2/Graph/src/ |
H A D | compress.c | 64 int *head, *indices, *jind, *Jind, *jwghts, *Jwghts, in Graph_compress() local 170 IVL_listAndSize(adjIVL, j, &jsize, &jind) ; in Graph_compress() 173 IVfp80(stdout, jsize, jind, 20, &ierr) ; in Graph_compress() 176 if ( (k = jind[ii]) < nvtx ) { in Graph_compress() 256 IVL_listAndSize(adjIVL, j, &jsize, &jind) ; in Graph_compress() 261 k = jind[ii] ; in Graph_compress() 281 IVL_listAndSize(adjIVL, j, &jsize, &jind) ; in Graph_compress() 285 k = jind[ii] ; in Graph_compress()
|
/dports/math/spooles-mpich/spooles.2.2_SHARED/Graph/src/ |
H A D | compress.c | 64 int *head, *indices, *jind, *Jind, *jwghts, *Jwghts, in Graph_compress() local 170 IVL_listAndSize(adjIVL, j, &jsize, &jind) ; in Graph_compress() 173 IVfp80(stdout, jsize, jind, 20, &ierr) ; in Graph_compress() 176 if ( (k = jind[ii]) < nvtx ) { in Graph_compress() 256 IVL_listAndSize(adjIVL, j, &jsize, &jind) ; in Graph_compress() 261 k = jind[ii] ; in Graph_compress() 281 IVL_listAndSize(adjIVL, j, &jsize, &jind) ; in Graph_compress() 285 k = jind[ii] ; in Graph_compress()
|
/dports/math/spooles/spooles.2.2_SHARED/Graph/src/ |
H A D | compress.c | 64 int *head, *indices, *jind, *Jind, *jwghts, *Jwghts, in Graph_compress() local 170 IVL_listAndSize(adjIVL, j, &jsize, &jind) ; in Graph_compress() 173 IVfp80(stdout, jsize, jind, 20, &ierr) ; in Graph_compress() 176 if ( (k = jind[ii]) < nvtx ) { in Graph_compress() 256 IVL_listAndSize(adjIVL, j, &jsize, &jind) ; in Graph_compress() 261 k = jind[ii] ; in Graph_compress() 281 IVL_listAndSize(adjIVL, j, &jsize, &jind) ; in Graph_compress() 285 k = jind[ii] ; in Graph_compress()
|
/dports/math/spooles/spooles.2.2/Graph/src/ |
H A D | compress.c | 64 int *head, *indices, *jind, *Jind, *jwghts, *Jwghts, in Graph_compress() local 170 IVL_listAndSize(adjIVL, j, &jsize, &jind) ; in Graph_compress() 173 IVfp80(stdout, jsize, jind, 20, &ierr) ; in Graph_compress() 176 if ( (k = jind[ii]) < nvtx ) { in Graph_compress() 256 IVL_listAndSize(adjIVL, j, &jsize, &jind) ; in Graph_compress() 261 k = jind[ii] ; in Graph_compress() 281 IVL_listAndSize(adjIVL, j, &jsize, &jind) ; in Graph_compress() 285 k = jind[ii] ; in Graph_compress()
|
/dports/science/nwchem/nwchem-7b21660b82ebd85ef659f6fba7e1e73433b0bd0a/src/nwdft/dftgrad/ |
H A D | dftg_beckew.F | 27 integer iind, jind, istep, iti 87 jind = iandex(j) 88 ij = istep + jind 91 aaij=aratio(iti,iatype(jind)) 133 jind = iandex(B) 136 ij = (iind*(iind-1))/2 + jind 138 ij = (jind*(jind-1))/2 + iind 141 aaij = aratio(iti,iatype(jind))
|
/dports/science/nwchem-data/nwchem-7.0.2-release/src/nwdft/dftgrad/ |
H A D | dftg_beckew.F | 27 integer iind, jind, istep, iti 87 jind = iandex(j) 88 ij = istep + jind 91 aaij=aratio(iti,iatype(jind)) 133 jind = iandex(B) 136 ij = (iind*(iind-1))/2 + jind 138 ij = (jind*(jind-1))/2 + iind 141 aaij = aratio(iti,iatype(jind))
|
/dports/science/nwchem/nwchem-7b21660b82ebd85ef659f6fba7e1e73433b0bd0a/src/nwdft/grid/ |
H A D | grid_beckew.F | 22 integer iind, jind, istep, iti 63 jind = indx(j) 69 aaij = aratio(iti,iatype(jind)) 73 & i, j, iind, jind, aaij 80 & i, j, iind, jind, rrij
|
/dports/science/nwchem-data/nwchem-7.0.2-release/src/nwdft/grid/ |
H A D | grid_beckew.F | 22 integer iind, jind, istep, iti 63 jind = indx(j) 69 aaij = aratio(iti,iatype(jind)) 73 & i, j, iind, jind, aaij 80 & i, j, iind, jind, rrij
|
/dports/science/afni/afni-AFNI_21.3.16/src/ |
H A D | 1dNLfit.c | 155 char cind='\0' , ccc ; int jind=-1 , meth=2 , jj,kk ; in main() local 211 if( jind >= 0 ) in main() 216 jind = cind - 'A' ; in main() 217 if( jind < 0 || jind >= 26 ) in main() 328 if( jj == jind ) continue ; in main()
|
/dports/math/spooles-mpich/spooles.2.2_SHARED/IVL/src/ |
H A D | IO.c | 428 int *jind ; in IVL_writeToFormattedFile() local 467 IVL_listAndSize(ivl, j, &jsize, &jind) ; in IVL_writeToFormattedFile() 469 count = IVfp80(fp, jsize, jind, count, &ierr) ; in IVL_writeToFormattedFile() 500 int *jind ; in IVL_writeToBinaryFile() local 535 IVL_listAndSize(ivl, j, &jsize, &jind) ; in IVL_writeToBinaryFile() 537 rc = fwrite((void *) jind, sizeof(int), jsize, fp) ; in IVL_writeToBinaryFile()
|
/dports/math/spooles-mpich/spooles.2.2/IVL/src/ |
H A D | IO.c | 428 int *jind ; in IVL_writeToFormattedFile() local 467 IVL_listAndSize(ivl, j, &jsize, &jind) ; in IVL_writeToFormattedFile() 469 count = IVfp80(fp, jsize, jind, count, &ierr) ; in IVL_writeToFormattedFile() 500 int *jind ; in IVL_writeToBinaryFile() local 535 IVL_listAndSize(ivl, j, &jsize, &jind) ; in IVL_writeToBinaryFile() 537 rc = fwrite((void *) jind, sizeof(int), jsize, fp) ; in IVL_writeToBinaryFile()
|
/dports/math/spooles/spooles.2.2_SHARED/IVL/src/ |
H A D | IO.c | 428 int *jind ; in IVL_writeToFormattedFile() local 467 IVL_listAndSize(ivl, j, &jsize, &jind) ; in IVL_writeToFormattedFile() 469 count = IVfp80(fp, jsize, jind, count, &ierr) ; in IVL_writeToFormattedFile() 500 int *jind ; in IVL_writeToBinaryFile() local 535 IVL_listAndSize(ivl, j, &jsize, &jind) ; in IVL_writeToBinaryFile() 537 rc = fwrite((void *) jind, sizeof(int), jsize, fp) ; in IVL_writeToBinaryFile()
|
/dports/math/spooles/spooles.2.2/IVL/src/ |
H A D | IO.c | 428 int *jind ; in IVL_writeToFormattedFile() local 467 IVL_listAndSize(ivl, j, &jsize, &jind) ; in IVL_writeToFormattedFile() 469 count = IVfp80(fp, jsize, jind, count, &ierr) ; in IVL_writeToFormattedFile() 500 int *jind ; in IVL_writeToBinaryFile() local 535 IVL_listAndSize(ivl, j, &jsize, &jind) ; in IVL_writeToBinaryFile() 537 rc = fwrite((void *) jind, sizeof(int), jsize, fp) ; in IVL_writeToBinaryFile()
|
/dports/graphics/aloadimage/arcan-0.6.1/src/platform/sdl/ |
H A D | event.c | 263 int jind = find_devind(devid); in platform_event_analogstate() local 265 if (devid < 0 || -1 == jind) in platform_event_analogstate() 269 if (!iodev.joys || axisid >= iodev.joys[jind].axis) in platform_event_analogstate() 272 struct axis_opts* daxis = &iodev.joys[jind].adata[axisid]; in platform_event_analogstate() 334 int jind = find_devind(devid); in platform_event_analogfilter() local 336 if (devid < 0 || -1 == jind) in platform_event_analogfilter() 339 if (axisid < 0 || axisid >= iodev.joys[jind].axis) in platform_event_analogfilter() 342 struct axis_opts* daxis = &iodev.joys[jind].adata[axisid]; in platform_event_analogfilter()
|
/dports/sysutils/acfgfs/arcan-0.6.1/src/platform/sdl/ |
H A D | event.c | 263 int jind = find_devind(devid); in platform_event_analogstate() local 265 if (devid < 0 || -1 == jind) in platform_event_analogstate() 269 if (!iodev.joys || axisid >= iodev.joys[jind].axis) in platform_event_analogstate() 272 struct axis_opts* daxis = &iodev.joys[jind].adata[axisid]; in platform_event_analogstate() 334 int jind = find_devind(devid); in platform_event_analogfilter() local 336 if (devid < 0 || -1 == jind) in platform_event_analogfilter() 339 if (axisid < 0 || axisid >= iodev.joys[jind].axis) in platform_event_analogfilter() 342 struct axis_opts* daxis = &iodev.joys[jind].adata[axisid]; in platform_event_analogfilter()
|
/dports/x11/aclip/arcan-0.6.1/src/platform/sdl/ |
H A D | event.c | 263 int jind = find_devind(devid); 265 if (devid < 0 || -1 == jind) 269 if (!iodev.joys || axisid >= iodev.joys[jind].axis) 272 struct axis_opts* daxis = &iodev.joys[jind].adata[axisid]; 334 int jind = find_devind(devid); 336 if (devid < 0 || -1 == jind) 339 if (axisid < 0 || axisid >= iodev.joys[jind].axis) 342 struct axis_opts* daxis = &iodev.joys[jind].adata[axisid];
|