| /dports/science/cp2k/cp2k-2e995eec7fd208c8a72d9544807bd8b8ba8cd1cc/src/ |
| H A D | semi_empirical_mpole_methods.F | 16 indexb,&
90 ind2 = indexb(i, j)
108 tmp = -dlm*amn(indexb(a, b), 0)
116 tmp = -dlm*amn(indexb(a, b), 1)
126 tmp = -dlm*amn(indexb(a, b), 2)
160 M0(indexb(mu, mu)) = 1.0_dp
169 M2(k, k, indexb(1, 1)) = ws
189 M2(1, 2, indexb(1 + 1, 1 + 2)) = wp
190 M2(2, 1, indexb(1 + 1, 1 + 2)) = wp
200 ind2 = indexb(i, j)
[all …]
|
| H A D | semi_empirical_int3_utils.F | 16 indexb
61 lij = indexb(li + 1, lj + 1)
63 lkl = indexb(lk + 1, ll + 1)
|
| /dports/science/cp2k-data/cp2k-7.1.0/src/ |
| H A D | semi_empirical_mpole_methods.F | 16 indexb,&
90 ind2 = indexb(i, j)
108 tmp = -dlm*amn(indexb(a, b), 0)
116 tmp = -dlm*amn(indexb(a, b), 1)
126 tmp = -dlm*amn(indexb(a, b), 2)
160 M0(indexb(mu, mu)) = 1.0_dp
169 M2(k, k, indexb(1, 1)) = ws
189 M2(1, 2, indexb(1 + 1, 1 + 2)) = wp
190 M2(2, 1, indexb(1 + 1, 1 + 2)) = wp
200 ind2 = indexb(i, j)
[all …]
|
| /dports/cad/calculix-ccx/CalculiX/ccx_2.18/src/ |
| H A D | applyboun.f | 36 & nload,isolidsurf(*),nsolidsurf,ifabou(*),i,nface,indexb, local
213 indexb=-ielfa(2,ifa)
214 if((ifabou(indexb+1).eq.0).or.
215 & (ifabou(indexb+2).eq.0).or.
216 & (ifabou(indexb+3).eq.0)) then
225 ifabou(indexb+5)=id
259 indexb=-ielfa(2,ifa)
260 if((ifabou(indexb+1).ne.0).and.
261 & (ifabou(indexb+2).ne.0).and.
262 & (ifabou(indexb+3).ne.0).and.
[all …]
|
| H A D | correctflux.f | 28 & iel,ifa,ifabou(*),indexb,nefa,nefb local
50 indexb=-ielfa(2,ifa)
51 if(indexb.gt.0) then
52 if(((ifabou(indexb+1).eq.0).or.
53 & (ifabou(indexb+2).eq.0).or.
54 & (ifabou(indexb+3).eq.0)).and.
55 & (ifabou(indexb+4).ne.0)) then
|
| H A D | cataloguenodes.f | 56 indexb=ielfa(2,i)
57 if(indexb.ge.0) cycle
59 if(ifabou(-indexb+5).gt.0) then
120 indexb=ielfa(2,i)
121 if(indexb.ge.0) cycle
185 indexb=ielfa(2,i)
186 if(indexb.ge.0) cycle
187 if(ifabou(-indexb+4).ne.0) then
247 indexb=ielfa(2,i)
248 if(indexb.ge.0) cycle
[all …]
|
| H A D | mafillpcomp.f | 40 & ifabou(*),neq,jq(*),indexb, local
77 indexb=-ielfa(2,ifa)
78 if(indexb.gt.0) then
79 if((ifabou(indexb+4).eq.0).and.
80 & (ifabou(indexb+5).eq.0)) then
107 indexb=-ielfa(2,ifa)
109 & (ifabou(indexb+4).eq.0)) then
135 indexb=-ielfa(2,ifa)
137 & (ifabou(indexb+4).ne.0)) then
|
| H A D | correctfluxcomp.f | 35 & iel,ifa,ifabou(*),mi(*),ielmatf(mi(3),*),ntmat_,imat,indexb, local
72 indexb=-ielfa(2,ifa)
73 if(indexb.gt.0) then
74 if(ifabou(indexb+4).ne.0) then
119 indexb=-ielfa(2,ifa)
120 if(indexb.gt.0) then
122 & (ifabou(indexb+4).eq.0)) then
|
| H A D | mafillp.f | 32 & ifabou(*),neq,jq(*),iel2,indexb,indexf2,
56 indexb=-ielfa(2,ifa)
57 if(((ifabou(indexb+1).eq.0).or.
58 & (ifabou(indexb+2).eq.0).or.
59 & ( ifabou(indexb+3).eq.0)).and.
60 & (ifabou(indexb+4).ne.0)) then
|
| H A D | mafillk.f | 36 & ipointer,ifabou(*),nbody,neq,indexb,nactdohinv(*), local
118 indexb=-ielfa(2,ifa)
119 if(((ifabou(indexb+1).ne.0).and.
120 & (ifabou(indexb+2).ne.0).and.
121 & (ifabou(indexb+3).ne.0)).or.
|
| H A D | mafillo.f | 36 & ipointer,ifabou(*),nbody,neq,indexb,nactdohinv(*), local
104 indexb=-ielfa(2,ifa)
105 if(((ifabou(indexb+1).ne.0).and.
106 & (ifabou(indexb+2).ne.0).and.
107 & (ifabou(indexb+3).ne.0)).or.
|
| H A D | rhspcomp.f | 40 & ifabou(*),neq,jq(*),indexb, local
79 indexb=-ielfa(2,ifa)
81 & (ifabou(indexb+4).ne.0)) then
|
| /dports/astro/py-pykep/pykep-2.6/src/third_party/cspice/ |
| H A D | setd.c | 22 integer condab, condoa, condob, indexa, condeq, indexb, condgt, condlt; in setd_() local
519 indexb = 1; in setd_()
525 while(indexa <= carda && indexb <= cardb) { in setd_()
526 if (a[indexa + 5] < b[indexb + 5]) { in setd_()
529 } else if (a[indexa + 5] == b[indexb + 5]) { in setd_()
532 ++indexb; in setd_()
535 ++indexb; in setd_()
584 } else if (indexb <= cardb) { in setd_()
|
| H A D | seti.c | 22 integer condab, condoa, condob, indexa, condeq, indexb, condgt, condlt; in seti_() local
519 indexb = 1; in seti_()
525 while(indexa <= carda && indexb <= cardb) { in seti_()
526 if (a[indexa + 5] < b[indexb + 5]) { in seti_()
529 } else if (a[indexa + 5] == b[indexb + 5]) { in seti_()
532 ++indexb; in seti_()
535 ++indexb; in seti_()
584 } else if (indexb <= cardb) { in seti_()
|
| H A D | setc.c | 23 integer condab, condoa, condob, indexa, condeq, indexb, condgt, condlt; in setc_() local
520 indexb = 1; in setc_()
526 while(indexa <= carda && indexb <= cardb) { in setc_()
527 if (s_cmp(a + (indexa + 5) * a_len, b + (indexb + 5) * b_len, a_len, in setc_()
531 } else if (s_cmp(a + (indexa + 5) * a_len, b + (indexb + 5) * b_len, in setc_()
535 ++indexb; in setc_()
538 ++indexb; in setc_()
587 } else if (indexb <= cardb) { in setc_()
|
| /dports/astro/pykep/pykep-2.6/src/third_party/cspice/ |
| H A D | setd.c | 22 integer condab, condoa, condob, indexa, condeq, indexb, condgt, condlt; in setd_() local
519 indexb = 1; in setd_()
525 while(indexa <= carda && indexb <= cardb) { in setd_()
526 if (a[indexa + 5] < b[indexb + 5]) { in setd_()
529 } else if (a[indexa + 5] == b[indexb + 5]) { in setd_()
532 ++indexb; in setd_()
535 ++indexb; in setd_()
584 } else if (indexb <= cardb) { in setd_()
|
| H A D | seti.c | 22 integer condab, condoa, condob, indexa, condeq, indexb, condgt, condlt; in seti_() local
519 indexb = 1; in seti_()
525 while(indexa <= carda && indexb <= cardb) { in seti_()
526 if (a[indexa + 5] < b[indexb + 5]) { in seti_()
529 } else if (a[indexa + 5] == b[indexb + 5]) { in seti_()
532 ++indexb; in seti_()
535 ++indexb; in seti_()
584 } else if (indexb <= cardb) { in seti_()
|
| H A D | setc.c | 23 integer condab, condoa, condob, indexa, condeq, indexb, condgt, condlt; in setc_() local
520 indexb = 1; in setc_()
526 while(indexa <= carda && indexb <= cardb) { in setc_()
527 if (s_cmp(a + (indexa + 5) * a_len, b + (indexb + 5) * b_len, a_len, in setc_()
531 } else if (s_cmp(a + (indexa + 5) * a_len, b + (indexb + 5) * b_len, in setc_()
535 ++indexb; in setc_()
538 ++indexb; in setc_()
587 } else if (indexb <= cardb) { in setc_()
|
| /dports/databases/pgadmin3/pgadmin3-1.22.2/pgadmin/pgscript/utilities/m_apm/ |
| H A D | mapm_mul.cpp | 35 int ai, itmp, sign, nexp, ii, jj, indexa, indexb, index0, numdigits; in m_apm_multiply() local
50 indexb = (b->m_apm_datalength + 1) >> 1; in m_apm_multiply()
61 if (indexa >= 48 && indexb >= 48) in m_apm_multiply()
84 index0 = indexa + indexb; in m_apm_multiply()
93 jj = indexb; in m_apm_multiply()
|
| /dports/textproc/zorba/zorba-2.7.0/src/zorbatypes/mapm/ |
| H A D | mapm_mul.c | 86 int ai, itmp, sign, nexp, ii, jj, indexa, indexb, index0, numdigits; in m_apm_multiply() local
101 indexb = (b->m_apm_datalength + 1) >> 1; in m_apm_multiply()
112 if (indexa >= 48 && indexb >= 48) in m_apm_multiply()
135 index0 = indexa + indexb; in m_apm_multiply()
144 jj = indexb; in m_apm_multiply()
|
| /dports/emulators/dolphin-emu/dolphin-3152428/Source/Core/Core/HW/EXI/ |
| H A D | EXI_DeviceAGP.cpp | 128 for (u32 indexb = 0; indexb < 8; indexb++) in LoadFileToEEPROM() local
129 NewVal = (NewVal << 0x8) | m_eeprom[index * 8 + indexb]; in LoadFileToEEPROM()
159 for (u32 indexb = 0; indexb < 8; indexb++) in SaveFileFromEEPROM() local
160 temp_eeprom[index * 8 + (7 - indexb)] = (NewVal >> (indexb * 8)) & 0xFF; in SaveFileFromEEPROM()
|
| /dports/math/R-cran-bdsmatrix/bdsmatrix/R/ |
| H A D | diag.bdsmatrix.R | 13 indexb = integer(d3),
14 integer(1))$indexb
36 indexb = integer(d3),
37 integer(1))$indexb
|
| /dports/science/nwchem/nwchem-7b21660b82ebd85ef659f6fba7e1e73433b0bd0a/src/tce/ |
| H A D | tce.py | 212 if (indexa.isin(lista) and indexb.isin(lista) and indexa.isgreaterthan(indexb)):
214 if (indexa.isin(listb) and indexb.isin(listb) and indexa.isgreaterthan(indexb)):
216 if (indexa.isin(listc) and indexb.isin(listc) and indexa.isgreaterthan(indexb)):
251 indexb = permutationb[nindexb]
283 indexb = permutation[nindexb]
284 if (indexa.isidenticalto(indexb)):
289 indexb = permutation[nindexb]
290 if (indexa.isidenticalto(indexb)):
374 indexb = selfcopy[nindexb]
9252 indexb = list[nindex+1]
[all …]
|
| /dports/science/nwchem-data/nwchem-7.0.2-release/src/tce/ |
| H A D | tce.py | 212 if (indexa.isin(lista) and indexb.isin(lista) and indexa.isgreaterthan(indexb)):
214 if (indexa.isin(listb) and indexb.isin(listb) and indexa.isgreaterthan(indexb)):
216 if (indexa.isin(listc) and indexb.isin(listc) and indexa.isgreaterthan(indexb)):
251 indexb = permutationb[nindexb]
283 indexb = permutation[nindexb]
284 if (indexa.isidenticalto(indexb)):
289 indexb = permutation[nindexb]
290 if (indexa.isidenticalto(indexb)):
374 indexb = selfcopy[nindexb]
9250 indexb = list[nindex+1]
[all …]
|
| /dports/graphics/pngwriter/pngwriter-0.7.0/examples/ |
| H A D | lyapunov.cc | 137 int indexb = 0; variable
275 png.plot(indexa,indexb,int(red),int(green),int(blue)); in main()
277 indexb = indexb+1; in main()
283 indexb = 0; in main()
|