Home
last modified time | relevance | path

Searched refs:xij (Results 1 – 25 of 348) sorted by relevance

12345678910>>...14

/dports/math/R-cran-psych/psych/R/
H A Dread.clipboard.R44 xij <- scan(con,what="char") functionVar
46 m <- length(xij)
49 if(names) {name <- xij[cumsum(1:n)]
50 xij <- xij[-cumsum(seq(1:n))]
53 xij <- as.numeric(xij)
55 X[upper.tri(X, diag = diag)] <- xij
73 xij <- scan(con,what="char") functionVar
75 m <- length(xij)
81 xij <- xij[-c(1,1+cumsum(n:2))]}
82 xij <- as.numeric(xij)
[all …]
/dports/science/siesta/siesta-4.1.5/Src/
H A Dgeom_helper.f90114 real(dp), intent(in) :: xai(3), xaj(3), xij(3) local
121 xd (:) = xij(:) - (xaj(:)-xai(:))
146 pure function cell_a(recell,xai,xaj,xij) result(n)
151 real(dp), intent(in) :: xai(3), xaj(3), xij(3) local
156 n = cell_d(recell,xai,xaj,xij,1)
164 real(dp), intent(in) :: xai(3), xaj(3), xij(3) local
169 n = cell_d(recell,xai,xaj,xij,2)
177 real(dp), intent(in) :: xai(3), xaj(3), xij(3) local
182 n = cell_d(recell,xai,xaj,xij,3)
190 real(dp), intent(in) :: xai(3), xaj(3), xij(3) local
[all …]
H A Dm_hs_matrix.f90176 xij,numh,listhptr,listh,H,S, & argument
388 k(3) * (xij(3,ind) - xo(3))
443 xij,numh,listhptr,listh,H,S, & argument
657 k(3) * (xij(3,ind) - xo(3))
710 xij,numh,listhptr,listh,H,S, & argument
812 xijo(:) = xij(:,ind) - ( &
851 k(3) * (xij(3,ind) - xo(3))
873 xijo(:) = xij(:,ind) - ( &
895 xij,numh,listhptr,listh,H,S, & argument
998 xijo(:) = xij(:,ind) - ( &
[all …]
H A Dhsparse.F61 use neighbour, only : jna=>jan, xij, r2ij, maxna=>maxnna
246 call ordvec( tol, 3, nna, xij, index )
305 rjk = sqrt( (xij(1,kna)-xij(1,jnat))**2 +
306 & (xij(2,kna)-xij(2,jnat))**2 +
307 & (xij(3,kna)-xij(3,jnat))**2 )
377 call ordvec( tol, 3, nna, xij, index )
426 rjk = sqrt( (xij(1,kna)-xij(1,jnat))**2 +
427 . (xij(2,kna)-xij(2,jnat))**2 +
428 . (xij(3,kna)-xij(3,jnat))**2 )
468 xijo(1:3,ind) = xij(1:3,jnat)
H A Ddiag2kspiral.F9011 xij, indxuo, nk, kpoint, wk, & argument
267 kpoint(2,ik) * xij(2,ind) + &
268 kpoint(3,ik) * xij(3,ind)
270 qxij = qwh(1) * xij(1,ind) + &
271 qwh(2) * xij(2,ind) + &
272 qwh(3) * xij(3,ind)
332 kpoint(2,ik) * xij(2,ind) + &
333 kpoint(3,ik) * xij(3,ind)
335 qxij = qwh(1) * xij(1,ind) + &
336 qwh(2) * xij(2,ind) + &
[all …]
H A Ddiagpol.f10 . xij, indxuo, kpoint, eo, psi, ng,
63 . xij(3,*), psi(ng,nuotot,nuo), Haux(ng,nuotot,nuo),
82 kxij = kpoint(1) * xij(1,ind) +
83 . kpoint(2) * xij(2,ind) +
84 . kpoint(3) * xij(3,ind)
117 kxij = kpoint(1) * xij(1,ind) +
118 . kpoint(2) * xij(2,ind) +
119 . kpoint(3) * xij(3,ind)
H A Dcreate_Sparsity_SC.F9031 TM,ucell,lasto,xa,xij,isc_off) ! 3. option argument
67 real(dp), intent(in), optional :: xij(:,:) local
92 if ( present(xij) ) then
118 UC=UC,TM=TM,ucell=ucell,lasto=lasto,xa=xa,xij=xij, &
143 UC=UC,TM=TM,ucell=ucell,lasto=lasto,xa=xa,xij=xij, &
198 UC,TM,ucell,lasto,xa,xij, & argument
232 real(dp), intent(in), optional :: xij(:,:) local
348 TM,ucell,lasto,xa,xij,& argument
372 real(dp), intent(in) :: xij(:,:) local
418 xij(:,i))
[all …]
H A Ddiagk.F180 kxij = kpoint(1,ik) * xij(1,ind) +
181 . kpoint(2,ik) * xij(2,ind) +
182 . kpoint(3,ik) * xij(3,ind)
287 kxij = kpoint(1,ik) * xij(1,ind) +
288 . kpoint(2,ik) * xij(2,ind) +
289 . kpoint(3,ik) * xij(3,ind)
318 kxij = kpoint(1,ik) * xij(1,ind) +
319 . kpoint(2,ik) * xij(2,ind) +
320 . kpoint(3,ik) * xij(3,ind)
429 kxij = kpoint(1,ik) * xij(1,ind) +
[all …]
H A Dm_sparse.F90134 real(dp), pointer :: xij(:,:) local
150 xij => val (xij_2D)
177 xijo(:) = xij(:,ind) - ( xa(:,ja)-xa(:,ia) )
232 real(dp), pointer :: xij(:,:) local
243 xij => val (xij_2D)
270 xijo(:) = xij(:,ind) - ( xa(:,ja) - xa(:,ia) )
348 real(dp), pointer :: xij(:,:) local
366 xij => val(xij_2D)
533 real(dp), pointer :: xij(:,:) local
546 xij => val(xij_2D)
[all …]
H A Ddiag2k.F11 . xij, indxuo, nk, kpoint, wk,
199 kxij = kpoint(1,ik) * xij(1,ind) +
200 . kpoint(2,ik) * xij(2,ind) +
201 . kpoint(3,ik) * xij(3,ind)
278 kxij = kpoint(1,ik) * xij(1,ind) +
279 . kpoint(2,ik) * xij(2,ind) +
280 . kpoint(3,ik) * xij(3,ind)
313 . kpoint(3,ik) * xij(3,ind)
446 kxij = kpoint(1,ik) * xij(1,ind) +
447 & kpoint(2,ik) * xij(2,ind) +
[all …]
H A Ddiag3k.F11 . xij, indxuo, nk, kpoint, wk,
197 kxij = kpoint(1,ik) * xij(1,ind) +
198 . kpoint(2,ik) * xij(2,ind) +
199 . kpoint(3,ik) * xij(3,ind)
276 kxij = kpoint(1,ik) * xij(1,ind) +
277 . kpoint(2,ik) * xij(2,ind) +
278 . kpoint(3,ik) * xij(3,ind)
312 . kpoint(3,ik) * xij(3,ind)
428 kxij = kpoint(1,ik) * xij(1,ind) +
429 . kpoint(2,ik) * xij(2,ind) +
[all …]
H A Dpdosk.F11 . xij, indxuo, nk, kpoint, wk, eo,
80 . xij(3,maxnh), kpoint(3,nk), eo(maxo,maxspn,nk),
128 kxij = kpoint(1,IK) * xij(1,ind) +
129 . kpoint(2,IK) * xij(2,ind) +
130 . kpoint(3,IK) * xij(3,ind)
165 kxij = kpoint(1,IK) * xij(1,ind) +
166 . kpoint(2,IK) * xij(2,ind) +
167 . kpoint(3,IK) * xij(3,ind)
195 kxij = kpoint(1,IK) * xij(1,ind) +
196 . kpoint(2,IK) * xij(2,ind) +
[all …]
H A Datom_graph.F9076 use neighbour, only: jna=>jan, xij, r2ij, maxna => maxnna
234 call ordvec( tol, 3, nna, xij, index )
272 rjk = VNORM( xij(:,kna) - xij(:,jnat) )
334 call ordvec( tol, 3, nna, xij, index )
374 rjk = VNORM( xij(:,kna) - xij(:,jnat) )
385 if ( lxijo ) xijo(1:3,ind) = xij(1:3,jnat)
386 sc(1:3,ind) = reduce(xa(1:3,ia),xij(1:3,jnat), &
432 function reduce(xi,xij,xj,rcell) result(sc)
433 real(dp), intent(in) :: xi(3), xj(3), xij(3) local
441 y = xi + xij - xj
/dports/math/z3/z3-z3-4.8.13/examples/python/
H A Dall_interval_series.py21 xij = [ [ Bool("x_%d_%d" % (i,j)) for j in range(n)] for i in range(n) ]
28 s.add(AtMost(xij[i] + [1]))
29 s.add(Or(xij[i]))
31 xi = [ xij[i][j] for i in range(n) ]
34 dji = [ [ diff_at_j_is_i(xij, j, i + 1) for i in range(n-1)] for j in range(n-1) ]
42 return s, xij
44 def process_model(s, xij, n): argument
56 if is_true(m.eval(xij[i][j])):
58 block += [xij[i][j]]
67 s, xij = ais(n)
[all …]
/dports/math/py-z3-solver/z3-z3-4.8.10/examples/python/
H A Dall_interval_series.py21 xij = [ [ Bool("x_%d_%d" % (i,j)) for j in range(n)] for i in range(n) ]
28 s.add(AtMost(xij[i] + [1]))
29 s.add(Or(xij[i]))
31 xi = [ xij[i][j] for i in range(n) ]
34 dji = [ [ diff_at_j_is_i(xij, j, i + 1) for i in range(n-1)] for j in range(n-1) ]
42 return s, xij
44 def process_model(s, xij, n): argument
56 if is_true(m.eval(xij[i][j])):
58 block += [xij[i][j]]
67 s, xij = ais(n)
[all …]
/dports/cad/feappv/feappv-4.1i/program/
H A Dinterp1.f28 real*8 den, rn, xi, xid,xii,xij, xs(3,*), shp(*), x(ndm,*) local
72 xij = dble(j-1)*rn
73 shp(1) = shp(1)*(xi - xij)
74 den = den * (xii - xij)
82 xij = dble(j-1)*rn
83 shp(2) = shp(2)*(xi - xij)
84 den = den * (xii - xij)
95 xij = dble(j-1)*rn
96 shp(i) = shp(i)*(xi - xij)
97 den = den * (xii - xij)
/dports/science/liggghts/LIGGGHTS-PUBLIC-3.8.0-26-g6e873439/src/
H A Dfix_continuum_weighted.cpp387 vectorAddMultiple3D(xij, t, nkj, r); in integrate_phi()
484 cont_vars[i][4] += gradrhoj*xij[0]; in post_integrate()
485 cont_vars[i][5] += gradrhoj*xij[1]; in post_integrate()
486 cont_vars[i][6] += gradrhoj*xij[2]; in post_integrate()
487 strain[i][0] += gradrhoj*xij[0]*vxj; in post_integrate()
488 strain[i][1] += gradrhoj*xij[1]*vxj; in post_integrate()
489 strain[i][2] += gradrhoj*xij[2]*vxj; in post_integrate()
490 strain[i][3] += gradrhoj*xij[0]*vyj; in post_integrate()
491 strain[i][4] += gradrhoj*xij[1]*vyj; in post_integrate()
492 strain[i][5] += gradrhoj*xij[2]*vyj; in post_integrate()
[all …]
/dports/science/chrono/chrono-7.0.1/src/chrono_multicore/physics/
H A DChFluidKernels.h93 inline real3 grad_poly6(const real3& xij, const real d, const real& h) { in grad_poly6() argument
94 return (d <= h) * -945.0 / (32.0 * F_PI * Pow(h, 9)) * Pow((h * h - d * d), 2) * xij; in grad_poly6()
100 inline real3 grad_spiky(const real3& xij, const real dist, const real& h) { in grad_spiky() argument
101 return (dist <= h) * KGSPIKY * xij; in grad_spiky()
109 inline real3 unormalized_grad_spiky(const real3& xij, const real d, const real& h) { in unormalized_grad_spiky() argument
111 return -k * (1.0 - d / h) / h * xij / d; in unormalized_grad_spiky()
114 inline real3 viscosity(const real3& xij, const real d, const real& h) { in viscosity() argument
116 (-(d * d * d) / (2 * h * h * h) + (d * d) / (h * h) + (h) / (2 * d) - 1) * xij; in viscosity()
118 inline real3 grad2_viscosity(const real3& xij, const real d, const real& h) { in grad2_viscosity() argument
/dports/science/gromacs/gromacs-2021.4/src/gromacs/mdlib/
H A Dvsite.cpp362 rvec xij; in constr_vsite2FD() local
405 rvec xij, xjk, temp; in constr_vsite3FD() local
431 rvec xij, xjk, xp; in constr_vsite3FAD() local
458 rvec xij, xik, temp; in constr_vsite3OUT() local
462 cprod(xij, xik, temp); in constr_vsite3OUT()
536 rvec_sub(ra, xij, rja); in constr_vsite4FDN()
537 rvec_sub(rb, xij, rjb); in constr_vsite4FDN()
955 rvec xij; in spread_vsite2FD() local
1352 fk[XX] = b * fv[XX] + xij[ZZ] * cfy - xij[YY] * cfz; in spread_vsite3OUT()
1353 fk[YY] = -xij[ZZ] * cfx + b * fv[YY] + xij[XX] * cfz; in spread_vsite3OUT()
[all …]
/dports/math/minizinc/libminizinc-2.5.5/solvers/MIP/
H A DMIP_solverinstance.cpp146 const double xij = slvOut.x[varXij[nN * i + j]]; in generate() local
148 MZN_ASSERT_HARD_MSG(1e-4 > fabs(xij), in generate()
149 "circuit: X[" << (i + 1) << ", " << (j + 1) << "]==" << xij); in generate()
152 -1e-4 < xij && 1.0 + 1e-4 > xij, // adjusted from 1e-6 to 1e-4 for CBC. 7.8.19 in generate()
153 "circuit: X[" << (i + 1) << ", " << (j + 1) << "]==" << xij); in generate()
154 if (1e-4 <= xij) { in generate()
155 mapFlow[make_pair(min(i, j), max(i, j))] += xij; in generate()
/dports/math/R-cran-VGAM/VGAM/man/
H A Dfill.Rd26 A support function for the argument \code{xij}, it generates a matrix
75 All terms in the \code{xij}
106 Hence \code{xij} does not affect constraint matrices.
116 \code{xij = op ~ lop + rop + fill(mop)}, whereas
117 \code{xij = op ~ lop + rop + fill1(mop) + fill2(mop)} would retain
122 % have a different meaning when \code{xij} is used.
187 xij = list(op ~ lop + rop + fill(lop)),
192 coef(fit1, matrix = TRUE) # Unchanged with 'xij'
209 xij = list(BS(lop,rop) ~ BS(lop,rop) +
273 % xij = list(op ~ lop + rop + mop),
[all …]
/dports/math/blis/blis-0.8.1/frame/include/level0/
H A Dbli_scal2s_mxn.h62 ctype* restrict xij = xj + i*rs_x; \
65 PASTEMAC(ch,scal2js)( *alpha, *xij, *yij ); \
78 ctype* restrict xij = xj + i*rs_x; \
81 PASTEMAC(ch,scal2s)( *alpha, *xij, *yij ); \
/dports/science/nwchem/nwchem-7b21660b82ebd85ef659f6fba7e1e73433b0bd0a/src/prepar/
H A Dpre_torang.F11 real*8 xij(3),xkj(3),xkl(3),xm(3),xn(3)
14 xij(i)=x(i,ia)-x(i,ja)
24 xm(i)=xij(j)*xkj(k)-xkj(j)*xij(k)
/dports/science/nwchem-data/nwchem-7.0.2-release/src/prepar/
H A Dpre_torang.F11 real*8 xij(3),xkj(3),xkl(3),xm(3),xn(3)
14 xij(i)=x(i,ia)-x(i,ja)
24 xm(i)=xij(j)*xkj(k)-xkj(j)*xij(k)
/dports/science/nwchem-data/nwchem-7.0.2-release/src/argos/
H A Dargos_prepare_torang.F11 real*8 xij(3),xkj(3),xkl(3),xm(3),xn(3)
14 xij(i)=x(i,ia)-x(i,ja)
24 xm(i)=xij(j)*xkj(k)-xkj(j)*xij(k)

12345678910>>...14