/dports/science/erkale/erkale-8297aefe5aac9dbbb291e04c07661f3cff94a99a/src/ |
H A D | obara-saika.cpp | 837 ints(aind,bind,m) = PAz*ints(aind-Nan,bind,m)-PCz*ints(aind-Nan,bind,m+1); in nuclear_ints_os() 853 ints(aind,bind,m) = PAy*ints(aind-Nam,bind,m)-PCy*ints(aind-Nam,bind,m+1); in nuclear_ints_os() 869 ints(aind,bind,m) = PAx*ints(aind-Nal,bind,m)-PCx*ints(aind-Nal,bind,m+1); in nuclear_ints_os() 1168 ints(aind,bind,m) = PAz*ints(aind-Nan,bind,m)-PCz*ints(aind-Nan,bind,m+1); in nuclear_int_pulay_os() 1184 ints(aind,bind,m) = PAy*ints(aind-Nam,bind,m)-PCy*ints(aind-Nam,bind,m+1); in nuclear_int_pulay_os() 1200 ints(aind,bind,m) = PAx*ints(aind-Nal,bind,m)-PCx*ints(aind-Nal,bind,m+1); in nuclear_int_pulay_os() 1520 ints(aind,bind,m) = PAz*ints(aind-Nan,bind,m)-PCz*ints(aind-Nan,bind,m+1); in nuclear_int_ders_os() 1522 xint(aind,bind,m) = PAz*xint(aind-Nan,bind,m)-PCz*xint(aind-Nan,bind,m+1); in nuclear_int_ders_os() 1524 …zint(aind,bind,m) = PAz*zint(aind-Nan,bind,m)-PCz*zint(aind-Nan,bind,m+1) + ints(aind-Nan,bind,m+1… in nuclear_int_ders_os() 1553 …yint(aind,bind,m) = PAy*yint(aind-Nam,bind,m)-PCy*yint(aind-Nam,bind,m+1) + ints(aind-Nam,bind,m+1… in nuclear_int_ders_os() [all …]
|
/dports/science/erkale-pseudopotentials/erkale-870e772f09631b3dbdd99a18e4f3d4786d684a01/src/ |
H A D | obara-saika.cpp | 837 ints(aind,bind,m) = PAz*ints(aind-Nan,bind,m)-PCz*ints(aind-Nan,bind,m+1); in nuclear_ints_os() 853 ints(aind,bind,m) = PAy*ints(aind-Nam,bind,m)-PCy*ints(aind-Nam,bind,m+1); in nuclear_ints_os() 869 ints(aind,bind,m) = PAx*ints(aind-Nal,bind,m)-PCx*ints(aind-Nal,bind,m+1); in nuclear_ints_os() 1168 ints(aind,bind,m) = PAz*ints(aind-Nan,bind,m)-PCz*ints(aind-Nan,bind,m+1); in nuclear_int_pulay_os() 1184 ints(aind,bind,m) = PAy*ints(aind-Nam,bind,m)-PCy*ints(aind-Nam,bind,m+1); in nuclear_int_pulay_os() 1200 ints(aind,bind,m) = PAx*ints(aind-Nal,bind,m)-PCx*ints(aind-Nal,bind,m+1); in nuclear_int_pulay_os() 1520 ints(aind,bind,m) = PAz*ints(aind-Nan,bind,m)-PCz*ints(aind-Nan,bind,m+1); in nuclear_int_ders_os() 1522 xint(aind,bind,m) = PAz*xint(aind-Nan,bind,m)-PCz*xint(aind-Nan,bind,m+1); in nuclear_int_ders_os() 1524 …zint(aind,bind,m) = PAz*zint(aind-Nan,bind,m)-PCz*zint(aind-Nan,bind,m+1) + ints(aind-Nan,bind,m+1… in nuclear_int_ders_os() 1553 …yint(aind,bind,m) = PAy*yint(aind-Nam,bind,m)-PCy*yint(aind-Nam,bind,m+1) + ints(aind-Nam,bind,m+1… in nuclear_int_ders_os() [all …]
|
/dports/print/fig2dev/fig2dev-3.2.8a/fig2dev/dev/ |
H A D | genshape.c | 1232 aind=0; bind=0; in genshape_end() 1236 if ((aind % 2)==0) in genshape_end() 1241 aind++; in genshape_end() 1248 (above_block_borders[aind]==above_block_borders[aind+1])) { in genshape_end() 1287 if (above_block_borders[aind]==above_block_borders[aind+1]) { in genshape_end() 1331 int aind, bind; in genshape_end() local 1343 for (aind=0; aind<num_above_borders; aind++, last_ax=ax) { in genshape_end() 1384 aind=1; in genshape_end() 1397 while ((aind<num_above_borders) && (above_block_borders[aind]<bx)) { in genshape_end() 1408 aind++; in genshape_end() [all …]
|
/dports/print/transfig/transfig.3.2.5e/fig2dev/dev/ |
H A D | genshape.c | 1024 int snr, aind, bind; in genshape_end() local 1201 aind=0; bind=0; in genshape_end() 1210 aind++; in genshape_end() 1217 (above_block_borders[aind]==above_block_borders[aind+1])) { in genshape_end() 1256 if (above_block_borders[aind]==above_block_borders[aind+1]) { in genshape_end() 1300 int aind, bind; in genshape_end() local 1312 for (aind=0; aind<num_above_borders; aind++, last_ax=ax) { in genshape_end() 1353 aind=1; in genshape_end() 1366 while ((aind<num_above_borders) && (above_block_borders[aind]<bx)) { in genshape_end() 1377 aind++; in genshape_end() [all …]
|
/dports/biology/protomol/protomol/framework/base/ |
H A D | fft.c | 1029 int aind, ntot, i__, j, p, index, ff, ic, nt, ninner, stride; in zfftm1rowf_() local 1083 aind = 1; in zfftm1rowf_() 1088 …ouble*)(&w[index]), (double*)(&w[index + stride]), (double*)(&a[aind]), (double*)(&a[aind + astrid… in zfftm1rowf_() 1090 …uble*)(&w[index + (stride << 1)]), (double*)(&a[aind]), (double*)(&a[aind + astride]), (double*)(&… in zfftm1rowf_() 1096 …aind]), (double*)(&a[aind + astride]), (double*)(&a[aind + (astride << 1)]),(double*)(&a[aind + as… in zfftm1rowf_() 1100 aind += *inc; in zfftm1rowf_() 1112 int aind, ntot, i__, j, p, index, ff, ic, nt, ninner, stride; in zfftm1rowb_() local 1164 aind = 1; in zfftm1rowb_() 1169 …ouble*)(&w[index]), (double*)(&w[index + stride]), (double*)(&a[aind]), (double*)(&a[aind + astrid… in zfftm1rowb_() 1177 …aind]), (double*)(&a[aind + astride]), (double*)(&a[aind + (astride << 1)]),(double*)(&a[aind + as… in zfftm1rowb_() [all …]
|
/dports/math/py-yt/yt-4.0.1/yt/frontends/enzo_e/ |
H A D | misc.py | 92 for aind, dind in zip(anc_id.split("_"), desc_id.split("_")): 93 cid += dind[len(aind)] 103 for aind, dind in zip(anc_block.split("_"), desc_block.split("_")): 104 if not dind.startswith(aind):
|
/dports/science/nwchem/nwchem-7b21660b82ebd85ef659f6fba7e1e73433b0bd0a/src/util/ |
H A D | ga_local_mdot.F | 19 integer ailo, aihi, ajlo, ajhi, aind, ald 56 call ga_access(g_a, ailo, aihi, ajlo, ajhi, aind, ald) 58 call ga_lmdotb(dbl_mb(k_work),dbl_mb(aind),dbl_mb(bind), 102 integer ailo, aihi, ajlo, ajhi, aind, ald 141 call ga_access(g_a, ailo, aihi, ajlo, ajhi, aind, ald) 143 call ga_lmzdotb(dcpl_mb(k_work),dcpl_mb(aind),dcpl_mb(bind),
|
/dports/science/nwchem-data/nwchem-7.0.2-release/src/util/ |
H A D | ga_local_mdot.F | 19 integer ailo, aihi, ajlo, ajhi, aind, ald 56 call ga_access(g_a, ailo, aihi, ajlo, ajhi, aind, ald) 58 call ga_lmdotb(dbl_mb(k_work),dbl_mb(aind),dbl_mb(bind), 102 integer ailo, aihi, ajlo, ajhi, aind, ald 141 call ga_access(g_a, ailo, aihi, ajlo, ajhi, aind, ald) 143 call ga_lmzdotb(dcpl_mb(k_work),dcpl_mb(aind),dcpl_mb(bind),
|
/dports/math/libmissing/libmissing-20130815/c/qp/ |
H A D | tsinh.c | 77 aind, in tsinh() local 123 aind = TO_FP_T(nit + nit + 1); in tsinh() 133 aind = aind - ONE; in tsinh() 167 den = aind; in tsinh()
|
/dports/math/libmissing/libmissing-20130815/c/sp/ |
H A D | tsinh.c | 77 aind, in tsinh() local 123 aind = TO_FP_T(nit + nit + 1); in tsinh() 132 aind = aind - ONE; in tsinh() 166 den = aind; in tsinh()
|
/dports/math/libmissing/libmissing-20130815/c/dp/ |
H A D | tsinh.c | 77 aind, in tsinh() local 123 aind = TO_FP_T(nit + nit + 1); in tsinh() 132 aind = aind - ONE; in tsinh() 166 den = aind; in tsinh()
|
/dports/emulators/dgen-sdl/dgen-sdl-1.33/star/ |
H A D | star.c | 2394 case aind: return(l + 4); in main_ea_cycles() 2412 case aind: return(2); in main_ea_cycles_nofetch() 2489 case aind: case ainc: in i_move() 2505 case aind: case ainc: in i_move() 2712 case aind:cycles= 8;break; in i_clr() 3504 case aind:cycles= 8;break; in i_jmp() 3527 case aind:cycles=16;break; in i_jsr() 3643 case aind:cycles= 4;break; in i_lea() 3663 case aind:cycles=12;break; in i_pea() 3695 case aind:cycles= 8;break; in i_movem_control() [all …]
|
/dports/emulators/gngeo/gngeo-gngeo_0.8/src/star/ |
H A D | star.c | 2372 case aind: return(l + 4); in main_ea_cycles() 2390 case aind: return(2); in main_ea_cycles_nofetch() 2464 case aind: case ainc: in i_move() 2480 case aind: case ainc: in i_move() 2687 case aind:cycles= 8;break; in i_clr() 3462 case aind:cycles= 8;break; in i_jmp() 3485 case aind:cycles=16;break; in i_jsr() 3601 case aind:cycles= 4;break; in i_lea() 3621 case aind:cycles=12;break; in i_pea() 3653 case aind:cycles= 8;break; in i_movem_control() [all …]
|
/dports/devel/critcl/critcl-3.1.18.1/lib/stubs_gen_slot/ |
H A D | gen_slot.tcl | 72 lassign $arg atype aname aind 77 append text $aname $aind
|
/dports/math/p5-Math-Prime-Util-GMP/Math-Prime-Util-GMP-0.52/ |
H A D | simpqs.c | 548 unsigned long * aind, in evaluateSieve() argument 1040 unsigned long * aind; in mainRoutine() local 1058 Newz( 0, aind, s, unsigned long ); in mainRoutine() 1137 aind[i] = ran; in mainRoutine() 1149 aind[i] = ran; in mainRoutine() 1163 aind[i] = fact; in mainRoutine() 1168 p = factorBase[aind[i]+min]; in mainRoutine() 1173 mpz_mul(temp, temp, sqrts[aind[i]+min]); in mainRoutine() 1235 int findex = aind[j]+min; in mainRoutine() 1301 soln1, soln2, flags, m, XArr, aind, in mainRoutine() [all …]
|
/dports/devel/critcl/critcl-3.1.18.1/lib/stubs_gen_decl/ |
H A D | gen_decl.tcl | 85 lassign $arg atype aname aind 91 append next $aname $aind
|
/dports/math/flintqs/FlintQS-1.0/src/ |
H A D | QS.cpp | 745 add_factor(&last_ptr, (unsigned long) 1, (unsigned long) aind[i]+min); in evaluateSieve() 1074 unsigned long * aind = (unsigned long*) calloc(sizeof(unsigned long),s); in mainRoutine() local 1157 for (j=0;((j<i)&&(aind[j]!=ran));j++); in mainRoutine() 1159 aind[i] = ran; in mainRoutine() 1169 for (j=0;((j<i)&&(aind[j]!=ran));j++); in mainRoutine() 1171 aind[i] = ran; in mainRoutine() 1182 for (j=0;((j<i)&&(aind[j]!=fact));j++); in mainRoutine() 1186 aind[i] = fact; in mainRoutine() 1191 p = factorBase[aind[i]+min]; in mainRoutine() 1196 mpz_mul(temp,temp,sqrts[aind[i]+min]); in mainRoutine() [all …]
|
/dports/science/qiskit-aer/qiskit-aer-0.5.2/qiskit/providers/aer/pulse/solver/ |
H A D | monte_carlo.py | 178 for aind in range(acq_idx, num_acq): 179 if exp['acquire'][aind][0] == stop_time: 180 current_acq = exp['acquire'][aind]
|
/dports/multimedia/gpac-libgpac/gpac-1.0.0/src/bifs/ |
H A D | memory_decoder.c | 235 u32 id, nbBits, ind, aind; in BM_XReplace() local 250 e = gf_bifs_get_field_index(target, ind, GF_SG_FIELD_CODING_IN, &aind); in BM_XReplace() 252 e = gf_node_get_field(target, aind, &targetField); in BM_XReplace() 256 inf->fieldIndex = aind; in BM_XReplace() 271 e = gf_bifs_get_field_index(n, ind, GF_SG_FIELD_CODING_DEF, &aind); in BM_XReplace() 273 e = gf_node_get_field(n, aind, &fromField); in BM_XReplace() 275 com->toFieldIndex = aind; in BM_XReplace() 300 e = gf_node_get_field(target, aind, &targetField); in BM_XReplace() 303 com->child_field = aind; in BM_XReplace() 325 e = gf_node_get_field(fromNode, aind, &fromField); in BM_XReplace() [all …]
|
/dports/multimedia/gpac-mp4box/gpac-1.0.0/src/bifs/ |
H A D | memory_decoder.c | 235 u32 id, nbBits, ind, aind; in BM_XReplace() local 250 e = gf_bifs_get_field_index(target, ind, GF_SG_FIELD_CODING_IN, &aind); in BM_XReplace() 252 e = gf_node_get_field(target, aind, &targetField); in BM_XReplace() 256 inf->fieldIndex = aind; in BM_XReplace() 271 e = gf_bifs_get_field_index(n, ind, GF_SG_FIELD_CODING_DEF, &aind); in BM_XReplace() 273 e = gf_node_get_field(n, aind, &fromField); in BM_XReplace() 275 com->toFieldIndex = aind; in BM_XReplace() 300 e = gf_node_get_field(target, aind, &targetField); in BM_XReplace() 303 com->child_field = aind; in BM_XReplace() 325 e = gf_node_get_field(fromNode, aind, &fromField); in BM_XReplace() [all …]
|
/dports/devel/zpu-gcc/zpu-toolchain-1.0/toolchain/gdb/sim/erc32/ |
H A D | erc32.c | 238 static int32 anum, aind = 0; variable 527 anum = aind = bnum = bind = 0; in mec_reset() 1056 if (aind < anum) { 1057 if ((aind + 1) < anum) 1059 return (0x700 | (uint32) aq[aind++]); 1065 aind = 0; 1066 if ((aind + 1) < anum) 1068 return (0x700 | (uint32) aq[aind++]); 1070 return (0x600 | (uint32) aq[aind]); 1122 if (aind < anum) { [all …]
|
/dports/devel/avr-gdb/gdb-7.3.1/sim/erc32/ |
H A D | erc32.c | 239 static int32 anum, aind = 0; variable 528 anum = aind = bnum = bind = 0; in mec_reset() 1057 if (aind < anum) { 1058 if ((aind + 1) < anum) 1060 return (0x700 | (uint32) aq[aind++]); 1066 aind = 0; 1067 if ((aind + 1) < anum) 1069 return (0x700 | (uint32) aq[aind++]); 1071 return (0x600 | (uint32) aq[aind]); 1123 if (aind < anum) { [all …]
|
/dports/devel/gdb761/gdb-7.6.1/sim/erc32/ |
H A D | erc32.c | 239 static int32 anum, aind = 0; variable 528 anum = aind = bnum = bind = 0; in mec_reset() 1057 if (aind < anum) { 1058 if ((aind + 1) < anum) 1060 return (0x700 | (uint32) aq[aind++]); 1066 aind = 0; 1067 if ((aind + 1) < anum) 1069 return (0x700 | (uint32) aq[aind++]); 1071 return (0x600 | (uint32) aq[aind]); 1123 if (aind < anum) { [all …]
|
/dports/devel/zpu-binutils/zpu-toolchain-1.0/toolchain/gdb/sim/erc32/ |
H A D | erc32.c | 238 static int32 anum, aind = 0; variable 527 anum = aind = bnum = bind = 0; in mec_reset() 1056 if (aind < anum) { 1057 if ((aind + 1) < anum) 1059 return (0x700 | (uint32) aq[aind++]); 1065 aind = 0; 1066 if ((aind + 1) < anum) 1068 return (0x700 | (uint32) aq[aind++]); 1070 return (0x600 | (uint32) aq[aind]); 1122 if (aind < anum) { [all …]
|
/dports/graphics/aloadimage/arcan-0.6.1/src/platform/wscons/ |
H A D | event.c | 181 int aind = 0; in platform_event_process() local 219 aind = 1; in platform_event_process() 226 aev = true; aind = 1; in platform_event_process() 241 .io.subid = aind, in platform_event_process()
|