Home
last modified time | relevance | path

Searched refs:xl2 (Results 1 – 25 of 282) sorted by relevance

12345678910>>...12

/dports/cad/calculix-ccx/CalculiX/ccx_2.18/src/
H A Devalshapefunc.f19 subroutine evalshapefunc(xil,etl,xl2,nopes,p) argument
25 real*8 xl2(3,8),xs2(3,2),shp2(7,8),p(3),xsj2(3), local
33 call shape8q(xil,etl,xl2,xsj2,xs2,shp2,iflag)
35 call shape4q(xil,etl,xl2,xsj2,xs2,shp2,iflag)
37 call shape6tri(xil,etl,xl2,xsj2,xs2,shp2,iflag)
39 call shape3tri(xil,etl,xl2,xsj2,xs2,shp2,iflag)
43 p(j)=p(j)+xl2(j,i)*shp2(4,i)
H A Dextrapolate_d_v_simple.f34 real*8 xrlfa(3,*),xl1,xl2,advfa(*),adv(*),vel(nef,0:7),hfa(3,*),
47 xl2=xrlfa(2,i)
49 & +xl2*volume(iel2)/adv(iel2)
53 & +xl2*vel(iel2,j))
58 & +xl2*(c(j,1)*vel(iel2,1)+
65 & +xl2*(c(1,j)*vel(iel2,1)+
H A Dadvecforc.f42 & xl2(3,8),xsj2(3),shp2(7,9),coords(3),xs2(3,7),dxsj2,areaj, local
69 xl2(j,i)=xl(j,i)
73 xl2(j,i)=xl(j,i)+voldl(j,i)
160 call shape8q(xi,et,xl2,xsj2,xs2,shp2,iflag)
162 call shape4q(xi,et,xl2,xsj2,xs2,shp2,iflag)
164 call shape6tri(xi,et,xl2,xsj2,xs2,shp2,iflag)
166 call shape3tri(xi,et,xl2,xsj2,xs2,shp2,iflag)
186 coords(k)=coords(k)+xl2(k,j)*shp2(4,j)
H A Dextrapol_oel3.f31 & gradnor,xl1,xl2 local
43 xl2=xrlfa(2,i)
47 & xl2*gradoel(l,iel2)
51 gradofa(l,i)=xl1*gradoel(l,iel1)+xl2*
58 gradofa(l,i)=xl1*gradoel(l,iel1)+xl2*
H A Dextrapol_kel3.f31 & gradnor,xl1,xl2 local
43 xl2=xrlfa(2,i)
47 & xl2*gradkel(l,iel2)
51 gradkfa(l,i)=xl1*gradkel(l,iel1)+xl2*
58 gradkfa(l,i)=xl1*gradkel(l,iel1)+xl2*
H A Dextrapol_pel3.f31 & gradnor,xl1,xl2 local
43 xl2=xrlfa(2,i)
47 & xl2*gradpel(l,iel2)
51 gradpfa(l,i)=xl1*gradpel(l,iel1)+xl2*
58 gradpfa(l,i)=xl1*gradpel(l,iel1)+xl2*
H A Dextrapol_dpel3.f31 & gradnor,xl1,xl2 local
43 xl2=xrlfa(2,i)
47 & xl2*gradpcel(l,iel2)
51 gradpcfa(l,i)=xl1*gradpcel(l,iel1)+xl2*
58 gradpcfa(l,i)=xl1*gradpcel(l,iel1)+xl2*
H A Dextrapolate_d_v_simplec.f34 real*8 xrlfa(3,*),xl1,xl2,advfa(*),adv(*),vel(nef,0:7),hfa(3,*),
47 xl2=xrlfa(2,i)
60 & +xl2*volume(iel2)/a2
65 & +xl2*vel(iel2,j))
70 & +xl2*(c(j,1)*vel(iel2,1)+
77 & +xl2*(c(1,j)*vel(iel2,1)+
H A Dcalcexternalwork.f37 real*8 co(3,*),xs2(3,7),pres,voldl2(3,8),xl2(3,8),xsj2(3), local
188 xl2(j,i)=co(j,konl(ifaceq(i,ig)))
197 xl2(j,i)=co(j,konl(ifacet(i,ig)))
206 xl2(j,i)=co(j,konl(ifacew(i,ig)))
248 call shape8q(xi,et,xl2,xsj2,xs2,shp2,iflag)
250 call shape4q(xi,et,xl2,xsj2,xs2,shp2,iflag)
252 call shape6tri(xi,et,xl2,xsj2,xs2,shp2,iflag)
254 call shape3tri(xi,et,xl2,xsj2,xs2,shp2,iflag)
H A Dadvecstiff.f42 & xl2(3,8),xsj2(3),shp2(7,9),coords(3),xs2(3,7),dxsj2,areaj, local
69 xl2(j,i)=xl(j,i)
73 xl2(j,i)=xl(j,i)+voldl(j,i)
154 call shape8q(xi,et,xl2,xsj2,xs2,shp2,iflag)
156 call shape4q(xi,et,xl2,xsj2,xs2,shp2,iflag)
158 call shape6tri(xi,et,xl2,xsj2,xs2,shp2,iflag)
160 call shape3tri(xi,et,xl2,xsj2,xs2,shp2,iflag)
180 coords(k)=coords(k)+xl2(k,j)*shp2(4,j)
H A Dradmatrix.f45 & xl2(3,8),coords(3),dxsj2,temp,xi,et,weight,xsj2(3),
161 xl2(j,k)=co(j,konl(ifaceq(k,ig)))+
169 xl2(j,k)=co(j,konl(ifacet(k,ig)))+
177 xl2(j,k)=co(j,konl(ifacew(k,ig)))+
236 call shape8q(xi,et,xl2,xsj2,xs2,shp2,iflag)
238 call shape4q(xi,et,xl2,xsj2,xs2,shp2,iflag)
240 call shape6tri(xi,et,xl2,xsj2,xs2,shp2,iflag)
242 call shape3tri(xi,et,xl2,xsj2,xs2,shp2,iflag)
263 coords(k)=coords(k)+xl2(k,j)*shp2(4,j)
H A Ddload.f118 real*8 xl2(3,8),pres(8),xi,et,xsj2(3),xs2(3,7),shp2(7,8), local
180 xl2(j,i)=0.d0
252 call shape8q(xi,et,xl2,xsj2,xs2,shp2,iflag)
254 call shape4q(xi,et,xl2,xsj2,xs2,shp2,iflag)
256 call shape6tri(xi,et,xl2,xsj2,xs2,shp2,iflag)
258 call shape3tri(xi,et,xl2,xsj2,xs2,shp2,iflag)
H A Dextrapol_tel3.f31 & gradnor,xl1,xl2,q,xxn(3,*),xload(2,*)
43 xl2=xrlfa(2,i)
47 & xl2*gradtel(l,iel2)
51 gradtfa(l,i)=xl1*gradtel(l,iel1)+xl2*
58 gradtfa(l,i)=xl1*gradtel(l,iel1)+xl2*
H A Dextrapol_vel1.f31 & xxn(3,*),xl1,xl2,dd local
45 xl2=xrlfa(2,i)
48 vfap(j,i)=xl1*vel(iel1,j)+xl2*vel(iel2,j)
52 vfap(j,i)=xl1*vel(iel1,j)+xl2*
59 vfap(j,i)=xl1*vel(iel1,j)+xl2*
H A Dextrapol_vel3.f31 & xl1,xl2,gradnor local
43 xl2=xrlfa(2,i)
48 & xl2*gradvel(k,l,iel2)
54 gradvfa(k,l,i)=xl1*gradvel(k,l,iel1)+xl2*
69 gradvfa(k,l,i)=xl1*gradvel(k,l,iel1)+xl2*
H A De_c3d_rhs.f52 & shp(4,20),voldl(3,20),xl2(3,8),xsj2(3),shp2(7,8), local
431 xl2(j,i)=co(j,konl(ifaceq(i,ig)))
437 xl2(j,i)=co(j,konl(ifaceq(i,ig)))+
447 xl2(j,i)=co(j,konl(ifacet(i,ig)))
453 xl2(j,i)=co(j,konl(ifacet(i,ig)))+
463 xl2(j,i)=co(j,konl(ifacew(i,ig)))
469 xl2(j,i)=co(j,konl(ifacew(i,ig)))+
505 call shape8q(xi,et,xl2,xsj2,xs2,shp2,iflag)
507 call shape4q(xi,et,xl2,xsj2,xs2,shp2,iflag)
509 call shape6tri(xi,et,xl2,xsj2,xs2,shp2,iflag)
[all …]
H A De_c3d_se.f246 call shape8q(xi,et,xl2,xsj2,xs2,shp2,iflag)
1404 xl2(j,i)=
1416 xl2(j,node1)=xl2(j,node1)+
1418 xl2(j,node2)=xl2(j,node2)+
1421 xl2(j,node1)=xl2(j,node1)+
1433 xl2(j,node1)=xl2(j,node1)+
1475 xl2(j,i)=
1515 xl2(j,i)=
1527 xl2(j,node1)=xl2(j,node1)+
1529 xl2(j,node2)=xl2(j,node2)+
[all …]
H A De_c3d_duds.f251 call shape8q(xi,et,xl2,xsj2,xs2,shp2,iflag)
1428 xl2(j,i)=
1440 xl2(j,node1)=xl2(j,node1)+
1442 xl2(j,node2)=xl2(j,node2)+
1445 xl2(j,node1)=xl2(j,node1)+
1457 xl2(j,node1)=xl2(j,node1)+
1499 xl2(j,i)=
1539 xl2(j,i)=
1551 xl2(j,node1)=xl2(j,node1)+
1553 xl2(j,node2)=xl2(j,node2)+
[all …]
H A Dprintoutfacefem.f43 & voldl(0:mi(2),8),xl2(3,8),xsj2(3),
174 xl2(j,i)=co(j,konl(ifaceq(i,ig)))
180 xl2(j,i)=co(j,konl(ifacet(i,ig)))
186 xl2(j,i)=co(j,konl(ifacew(i,ig)))
215 call shape4q(xi,et,xl2,xsj2,xs2,shp2,iflag)
217 call shape3tri(xi,et,xl2,xsj2,xs2,shp2,iflag)
225 coords(j1)=coords(j1)+shp2(4,i1)*xl2(j1,i1)
/dports/games/burrtools/burrtools-0.6.3/src/gui/
H A Dgrideditor_4.cpp166 *xl2 = xa2; *yl2 = ya2; in findCommonEdge()
172 *xl2 = xa3; *yl2 = ya3; in findCommonEdge()
182 *xl2 = xa2; *yl2 = ya2; in findCommonEdge()
188 *xl2 = xa3; *yl2 = ya3; in findCommonEdge()
198 *xl2 = xa2; *yl2 = ya2; in findCommonEdge()
204 *xl2 = xa3; *yl2 = ya3; in findCommonEdge()
213 *xl2 = xa1; *yl2 = ya1; in findCommonEdge()
219 *xl2 = xa3; *yl2 = ya3; in findCommonEdge()
229 *xl2 = xa2; *yl2 = ya2; in findCommonEdge()
235 *xl2 = xa3; *yl2 = ya3; in findCommonEdge()
[all …]
H A Dgrideditor_3.cpp192 *xl2 = xa2; *yl2 = ya2; in findCommonEdge()
198 *xl2 = xa3; *yl2 = ya3; in findCommonEdge()
208 *xl2 = xa2; *yl2 = ya2; in findCommonEdge()
214 *xl2 = xa3; *yl2 = ya3; in findCommonEdge()
224 *xl2 = xa2; *yl2 = ya2; in findCommonEdge()
230 *xl2 = xa3; *yl2 = ya3; in findCommonEdge()
239 *xl2 = xa1; *yl2 = ya1; in findCommonEdge()
245 *xl2 = xa3; *yl2 = ya3; in findCommonEdge()
255 *xl2 = xa2; *yl2 = ya2; in findCommonEdge()
261 *xl2 = xa3; *yl2 = ya3; in findCommonEdge()
[all …]
H A Dgrideditor_1.cpp187 int xl1, yl1, xl2, yl2, xl3, yl3; in drawTileCursor() local
194 xl2 = xl1+sx; in drawTileCursor()
203 xl2 = xl1+sx; in drawTileCursor()
213 fl_line(xl1, yl1+1, xl2, yl2+1); in drawTileCursor()
214 fl_line(xl1, yl1-1, xl2, yl2-1); in drawTileCursor()
218 fl_line(xl1, yl1+1, xl2, yl2+1); in drawTileCursor()
219 fl_line(xl1, yl1-1, xl2, yl2-1); in drawTileCursor()
/dports/multimedia/dirac/dirac-1.0.2/libdirac_common/
H A Dwavelet_utils_mmx.cpp64 const int xl2( xl>>1);
78 int stopx = (xl2>>2)<<2;
171 const int xl2( xl>>1); in Interleave_mmx() local
188 int stopx = (xl2>>2)<<2; in Interleave_mmx()
1086 const int xl2 (xl>>1);
1199 predict.Filter( line_data[0] , line_data[xl2] , line_data[xl2] );
1227 update.Filter( line_data[xl-2] , line_data[xl2-2] , line_data[xl2-1] );
1228 update.Filter( line_data[xl-1] , line_data[xl2-1] , line_data[xl2-1] );
1410 const int xl2( xl>>1); in DeInterleave_mmx() local
1487 const int xl2 = xl>>1; in Split() local
[all …]
/dports/graphics/appleseed/appleseed-2.1.0-beta/src/appleseed/foundation/math/intersection/
H A Drayaabb.h140 const T xl2 = ray_info.m_rcp_dir.x * (bbox[ ray_info.m_sgn_dir.x].x - ray.m_org.x); in intersect() local
145 const T tmax = ssemin(zl2, ssemin(yl2, ssemin(xl2, ray.m_tmax))); in intersect()
178 const __m128 tmax = _mm_min_ps(zl2, _mm_min_ps(yl2, _mm_min_ps(xl2, ray_tmax)));
215 const __m128d tmax = _mm_min_pd(zl2, _mm_min_pd(yl2, _mm_min_pd(xl2, ray_tmax)));
239 const T xl2 = ray_info.m_rcp_dir.x * (bbox[ ray_info.m_sgn_dir.x].x - ray.m_org.x); in intersect() local
244 const T tmax = ssemin(zl2, ssemin(yl2, ssemin(xl2, ray.m_tmax))); in intersect()
271 const T tmax = ssemin(zl2, ssemin(yl2, ssemin(xl2, ray.m_tmax))); in intersect()
299 const T tmax = ssemin(zl2, ssemin(yl2, ssemin(xl2, ray.m_tmax))); in intersect()
328 const T tmax = ssemin(zl2, ssemin(yl2, ssemin(xl2, ray.m_tmax))); in clip()
367 const __m128 tmax = _mm_min_ps(zl2, _mm_min_ps(yl2, _mm_min_ps(xl2, ray_tmax)));
[all …]
/dports/devel/onetbb/oneTBB-2021.4.0/examples/parallel_for/polygon_overlay/
H A Drpolygon.hpp187 int xl1, yl1, xh1, yh1, xl2, yl2, xh2, yh2; in PolygonsOverlap() local
192 p2->get(&xl2, &yl2, &xh2, &yh2); in PolygonsOverlap()
195 if (xh1 < xl2) in PolygonsOverlap()
201 xl = (xl1 < xl2) ? xl2 : xl1; in PolygonsOverlap()

12345678910>>...12