Home
last modified time | relevance | path

Searched refs:nintx (Results 1 – 10 of 10) sorted by relevance

/dports/science/nwchem/nwchem-7b21660b82ebd85ef659f6fba7e1e73433b0bd0a/src/NWints/api/
H A Dint_hf1sp.F70 integer nintx, nint_xsp local
192 nintx = (Li+1)*(Li+2)/2*i_ngen ! size of X
193 nint_xsp = nintx * 4 ! size of X * size of sp
196 call int_sp1b(S,scr,scr(nintx+1),nintx,1)
200 call int_sp1b(T,scr,scr(nintx+1),nintx,1)
204 call int_sp1b(V,scr,scr(nintx+1),nintx,1)
H A Dintp_2e3ct.F72 integer nintx local
166 nintx = int_nbf_x(Lq)*int_nbf_x(La)*int_nbf_x(Lb)
167 if (nintx.lt.lscr)
H A Dintp_2e3c.F70 integer nintx local
164 nintx = int_nbf_x(Lp)*int_nbf_x(Lc)*int_nbf_x(Ld)
165 if (nintx.lt.lscr)
/dports/science/nwchem-data/nwchem-7.0.2-release/src/NWints/api/
H A Dint_hf1sp.F70 integer nintx, nint_xsp
192 nintx = (Li+1)*(Li+2)/2*i_ngen ! size of X
193 nint_xsp = nintx * 4 ! size of X * size of sp
196 call int_sp1b(S,scr,scr(nintx+1),nintx,1)
200 call int_sp1b(T,scr,scr(nintx+1),nintx,1)
204 call int_sp1b(V,scr,scr(nintx+1),nintx,1)
H A Dintp_2e3c.F70 integer nintx
164 nintx = int_nbf_x(Lp)*int_nbf_x(Lc)*int_nbf_x(Ld)
165 if (nintx.lt.lscr)
H A Dintp_2e3ct.F72 integer nintx
166 nintx = int_nbf_x(Lq)*int_nbf_x(La)*int_nbf_x(Lb)
167 if (nintx.lt.lscr)
/dports/science/quantum-espresso/q-e-qe-6.7.0/Modules/
H A Dbspline.f90995 integer :: ix, iy, iky, nintx, ninty local
1006 nintx = 0
1015 if((xknot(ix) .le. x) .and. (x .lt. xknot(ix+1))) nintx = ix
1018 if(nintx .eq. 0) then
1043 work(iky) = dbsdca(iderx,x,kx,xknot,nx,bcoef(1,ninty-ky+iky),nintx)
/dports/games/NBlood/NBlood-a1689a4/extras/rrsrc/enginerr/
H A DENGINE.C5330 long x1, y1, x2, y2, t, bot, topu, nintx, ninty, cnt, z, hitwall; in raytrace() local
5350 nintx = x3 + scale(x43,topu,bot); in raytrace()
5353 } while (x21*(ninty-y1) <= (nintx-x1)*y21); in raytrace()
5355 if (klabs(x3-nintx)+klabs(y3-ninty) < klabs(x3-*x4)+klabs(y3-*y4)) in raytrace()
5356 { *x4 = nintx; *y4 = ninty; hitwall = z; } in raytrace()
/dports/games/NBlood/NBlood-a1689a4/extras/rrsrc/enginera/
H A DENGINE.C5370 long x1, y1, x2, y2, t, bot, topu, nintx, ninty, cnt, z, hitwall; in raytrace() local
5390 nintx = x3 + scale(x43,topu,bot); in raytrace()
5393 } while (x21*(ninty-y1) <= (nintx-x1)*y21); in raytrace()
5395 if (klabs(x3-nintx)+klabs(y3-ninty) < klabs(x3-*x4)+klabs(y3-*y4)) in raytrace()
5396 { *x4 = nintx; *y4 = ninty; hitwall = z; } in raytrace()
/dports/games/jfsw/jfsw-c434002/jfbuild/src/
H A Dengine.c5273 int x1, y1, x2, y2, bot, topu, nintx, ninty, cnt, z, hitwall; in raytrace() local
5293 nintx = x3 + scale(x43,topu,bot); in raytrace()
5296 } while (x21*(ninty-y1) <= (nintx-x1)*y21); in raytrace()
5298 if (klabs(x3-nintx)+klabs(y3-ninty) < klabs(x3-*x4)+klabs(y3-*y4)) in raytrace()
5299 { *x4 = nintx; *y4 = ninty; hitwall = z; } in raytrace()