/dports/devel/ga/ga-5.8/global/testing/ |
H A D | threadsafec.c | 261 bsize = (thi[0]-tlo[0]+1)*(thi[1]-tlo[1]+1); in main() 266 offset = (m-tlo[0])*lld + (n-tlo[1]); in main() 355 bsize = (thi[0]-tlo[0]+1)*(thi[1]-tlo[1]+1); in main() 366 offset = (m-tlo[0])*lld + (n-tlo[1]); in main() 436 bsize = (thi[0]-tlo[0]+1)*(thi[1]-tlo[1]+1); in main() 441 offset = (m-tlo[0])*lld + (n-tlo[1]); in main() 674 bsize = (thi[0]-tlo[0]+1)*(thi[1]-tlo[1]+1); in main() 679 offset = (m-tlo[0])*lld + (n-tlo[1]); in main() 787 bsize = (thi[0]-tlo[0]+1)*(thi[1]-tlo[1]+1); in main() 799 offset = (m-tlo[0])*lld + (n-tlo[1]); in main() [all …]
|
H A D | thread_perf_strided.c | 298 tlo[0] = itx*block_x; in main() 299 tlo[1] = ity*block_y; in main() 308 lld = thi[1]-tlo[1]+1; in main() 309 bsize = (thi[0]-tlo[0]+1)*(thi[1]-tlo[1]+1); in main() 314 offset = (m-tlo[0])*lld + (n-tlo[1]); in main() 416 tlo[0] = itx*block_x; in main() 417 tlo[1] = ity*block_y; in main() 423 bsize = (thi[0]-tlo[0]+1)*(thi[1]-tlo[1]+1); in main() 435 offset = (m-tlo[0])*lld + (n-tlo[1]); in main() 534 bsize = (thi[0]-tlo[0]+1)*(thi[1]-tlo[1]+1); in main() [all …]
|
H A D | patch2.F | 21 integer ndim, adims(2), bdims(2), cdims(2), tlo(2), thi(2) 116 call nga_distribution(g_c,me,tlo,thi) 117 if (tlo(1).lt.clo(1)) tlo(1) = clo(1) 118 if (tlo(2).lt.clo(2)) tlo(2) = clo(2) 122 if (tlo(1).le.thi(1).and.tlo(2).le.thi(2)) then 123 call nga_access(g_c,tlo,thi,idx,cld) 124 do j = tlo(2), thi(2) 125 jj = j - tlo(2) 126 do i = tlo(1), thi(1) 127 ii = i - tlo(1) [all …]
|
H A D | blktest.F | 210 tlo(1) = 3 212 tlo(2) = 4 219 tlo(1) = 3 221 tlo(2) = 4 672 call nga_add_patch(one,g_e,t2lo,t2hi,one,g_f,tlo,thi,g_b,tlo,thi) 673 call nga_add_patch(one,g_i,t2lo,t2hi,one,g_j,tlo,thi,g_h,tlo,thi) 713 ddot = nga_ddot_patch(g_b, 'n', tlo, thi, g_b, 'n', tlo, thi) 715 write(6,113) ddot,dble((thi(1)-tlo(1)+1)*(thi(2)-tlo(2)+1)*4) 785 call ga_elem_divide_patch(g_f,t2lo,t2hi,g_e,tlo,thi,g_b,tlo,thi) 787 call ga_elem_divide_patch(g_j,t2lo,t2hi,g_i,tlo,thi,g_h,tlo,thi) [all …]
|
H A D | thread_perf_contig.c | 186 int tlo, thi; in main() local 208 lld = thi-tlo+1; in main() 209 bsize = thi-tlo+1; in main() 213 offset = m-tlo; in main() 280 int tlo, thi; in main() local 302 lld = thi-tlo+1; in main() 314 offset = m-tlo; in main() 366 int tlo, thi; in main() local 386 tlo = k*msg_size; in main() 389 lld = thi-tlo+1; in main() [all …]
|
/dports/math/suitesparse-config/SuiteSparse-5.10.1/GraphBLAS/Source/ |
H A D | GB_pslice.c | 29 int tlo, // assign to Slice [(tlo+1):(thi-1)] in GB_pslice_worker() argument 41 ASSERT (0 <= tlo && tlo < thi - 1) ; in GB_pslice_worker() 42 for (int t = tlo+1 ; t <= thi-1 ; t++) in GB_pslice_worker() 56 int64_t klo = Slice [tlo] ; in GB_pslice_worker() 69 for (int64_t t = tlo+1 ; t <= thi-1 ; t++) in GB_pslice_worker() 84 double ntasks = thi - tlo ; in GB_pslice_worker() 86 int t = tlo + (int) floor (ratio * ntasks) ; in GB_pslice_worker() 87 t = GB_IMAX (t, tlo+1) ; in GB_pslice_worker() 88 t = GB_IMIN (t, thi-1) ; ASSERT (tlo < t && t < thi) ; in GB_pslice_worker() 101 if (tlo < t-1) in GB_pslice_worker() [all …]
|
/dports/math/suitesparse-cholmod/SuiteSparse-5.10.1/GraphBLAS/Source/ |
H A D | GB_pslice.c | 29 int tlo, // assign to Slice [(tlo+1):(thi-1)] in GB_pslice_worker() argument 41 ASSERT (0 <= tlo && tlo < thi - 1) ; in GB_pslice_worker() 42 for (int t = tlo+1 ; t <= thi-1 ; t++) in GB_pslice_worker() 56 int64_t klo = Slice [tlo] ; in GB_pslice_worker() 69 for (int64_t t = tlo+1 ; t <= thi-1 ; t++) in GB_pslice_worker() 84 double ntasks = thi - tlo ; in GB_pslice_worker() 86 int t = tlo + (int) floor (ratio * ntasks) ; in GB_pslice_worker() 87 t = GB_IMAX (t, tlo+1) ; in GB_pslice_worker() 88 t = GB_IMIN (t, thi-1) ; ASSERT (tlo < t && t < thi) ; in GB_pslice_worker() 101 if (tlo < t-1) in GB_pslice_worker() [all …]
|
/dports/math/suitesparse-klu/SuiteSparse-5.10.1/GraphBLAS/Source/ |
H A D | GB_pslice.c | 29 int tlo, // assign to Slice [(tlo+1):(thi-1)] in GB_pslice_worker() argument 41 ASSERT (0 <= tlo && tlo < thi - 1) ; in GB_pslice_worker() 42 for (int t = tlo+1 ; t <= thi-1 ; t++) in GB_pslice_worker() 56 int64_t klo = Slice [tlo] ; in GB_pslice_worker() 69 for (int64_t t = tlo+1 ; t <= thi-1 ; t++) in GB_pslice_worker() 84 double ntasks = thi - tlo ; in GB_pslice_worker() 86 int t = tlo + (int) floor (ratio * ntasks) ; in GB_pslice_worker() 87 t = GB_IMAX (t, tlo+1) ; in GB_pslice_worker() 88 t = GB_IMIN (t, thi-1) ; ASSERT (tlo < t && t < thi) ; in GB_pslice_worker() 101 if (tlo < t-1) in GB_pslice_worker() [all …]
|
/dports/math/suitesparse-amd/SuiteSparse-5.10.1/GraphBLAS/Source/ |
H A D | GB_pslice.c | 29 int tlo, // assign to Slice [(tlo+1):(thi-1)] in GB_pslice_worker() argument 41 ASSERT (0 <= tlo && tlo < thi - 1) ; in GB_pslice_worker() 42 for (int t = tlo+1 ; t <= thi-1 ; t++) in GB_pslice_worker() 56 int64_t klo = Slice [tlo] ; in GB_pslice_worker() 69 for (int64_t t = tlo+1 ; t <= thi-1 ; t++) in GB_pslice_worker() 84 double ntasks = thi - tlo ; in GB_pslice_worker() 86 int t = tlo + (int) floor (ratio * ntasks) ; in GB_pslice_worker() 87 t = GB_IMAX (t, tlo+1) ; in GB_pslice_worker() 88 t = GB_IMIN (t, thi-1) ; ASSERT (tlo < t && t < thi) ; in GB_pslice_worker() 101 if (tlo < t-1) in GB_pslice_worker() [all …]
|
/dports/math/suitesparse-rbio/SuiteSparse-5.10.1/GraphBLAS/Source/ |
H A D | GB_pslice.c | 29 int tlo, // assign to Slice [(tlo+1):(thi-1)] in GB_pslice_worker() argument 41 ASSERT (0 <= tlo && tlo < thi - 1) ; in GB_pslice_worker() 42 for (int t = tlo+1 ; t <= thi-1 ; t++) in GB_pslice_worker() 56 int64_t klo = Slice [tlo] ; in GB_pslice_worker() 69 for (int64_t t = tlo+1 ; t <= thi-1 ; t++) in GB_pslice_worker() 84 double ntasks = thi - tlo ; in GB_pslice_worker() 86 int t = tlo + (int) floor (ratio * ntasks) ; in GB_pslice_worker() 87 t = GB_IMAX (t, tlo+1) ; in GB_pslice_worker() 88 t = GB_IMIN (t, thi-1) ; ASSERT (tlo < t && t < thi) ; in GB_pslice_worker() 101 if (tlo < t-1) in GB_pslice_worker() [all …]
|
/dports/math/suitesparse-ldl/SuiteSparse-5.10.1/GraphBLAS/Source/ |
H A D | GB_pslice.c | 29 int tlo, // assign to Slice [(tlo+1):(thi-1)] in GB_pslice_worker() argument 41 ASSERT (0 <= tlo && tlo < thi - 1) ; in GB_pslice_worker() 42 for (int t = tlo+1 ; t <= thi-1 ; t++) in GB_pslice_worker() 56 int64_t klo = Slice [tlo] ; in GB_pslice_worker() 69 for (int64_t t = tlo+1 ; t <= thi-1 ; t++) in GB_pslice_worker() 84 double ntasks = thi - tlo ; in GB_pslice_worker() 86 int t = tlo + (int) floor (ratio * ntasks) ; in GB_pslice_worker() 87 t = GB_IMAX (t, tlo+1) ; in GB_pslice_worker() 88 t = GB_IMIN (t, thi-1) ; ASSERT (tlo < t && t < thi) ; in GB_pslice_worker() 101 if (tlo < t-1) in GB_pslice_worker() [all …]
|
/dports/math/suitesparse-mongoose/SuiteSparse-5.10.1/GraphBLAS/Source/ |
H A D | GB_pslice.c | 29 int tlo, // assign to Slice [(tlo+1):(thi-1)] in GB_pslice_worker() argument 41 ASSERT (0 <= tlo && tlo < thi - 1) ; in GB_pslice_worker() 42 for (int t = tlo+1 ; t <= thi-1 ; t++) in GB_pslice_worker() 56 int64_t klo = Slice [tlo] ; in GB_pslice_worker() 69 for (int64_t t = tlo+1 ; t <= thi-1 ; t++) in GB_pslice_worker() 84 double ntasks = thi - tlo ; in GB_pslice_worker() 86 int t = tlo + (int) floor (ratio * ntasks) ; in GB_pslice_worker() 87 t = GB_IMAX (t, tlo+1) ; in GB_pslice_worker() 88 t = GB_IMIN (t, thi-1) ; ASSERT (tlo < t && t < thi) ; in GB_pslice_worker() 101 if (tlo < t-1) in GB_pslice_worker() [all …]
|
/dports/math/suitesparse-camd/SuiteSparse-5.10.1/GraphBLAS/Source/ |
H A D | GB_pslice.c | 29 int tlo, // assign to Slice [(tlo+1):(thi-1)] in GB_pslice_worker() argument 41 ASSERT (0 <= tlo && tlo < thi - 1) ; in GB_pslice_worker() 42 for (int t = tlo+1 ; t <= thi-1 ; t++) in GB_pslice_worker() 56 int64_t klo = Slice [tlo] ; in GB_pslice_worker() 69 for (int64_t t = tlo+1 ; t <= thi-1 ; t++) in GB_pslice_worker() 84 double ntasks = thi - tlo ; in GB_pslice_worker() 86 int t = tlo + (int) floor (ratio * ntasks) ; in GB_pslice_worker() 87 t = GB_IMAX (t, tlo+1) ; in GB_pslice_worker() 88 t = GB_IMIN (t, thi-1) ; ASSERT (tlo < t && t < thi) ; in GB_pslice_worker() 101 if (tlo < t-1) in GB_pslice_worker() [all …]
|
/dports/math/suitesparse-colamd/SuiteSparse-5.10.1/GraphBLAS/Source/ |
H A D | GB_pslice.c | 29 int tlo, // assign to Slice [(tlo+1):(thi-1)] in GB_pslice_worker() argument 41 ASSERT (0 <= tlo && tlo < thi - 1) ; in GB_pslice_worker() 42 for (int t = tlo+1 ; t <= thi-1 ; t++) in GB_pslice_worker() 56 int64_t klo = Slice [tlo] ; in GB_pslice_worker() 69 for (int64_t t = tlo+1 ; t <= thi-1 ; t++) in GB_pslice_worker() 84 double ntasks = thi - tlo ; in GB_pslice_worker() 86 int t = tlo + (int) floor (ratio * ntasks) ; in GB_pslice_worker() 87 t = GB_IMAX (t, tlo+1) ; in GB_pslice_worker() 88 t = GB_IMIN (t, thi-1) ; ASSERT (tlo < t && t < thi) ; in GB_pslice_worker() 101 if (tlo < t-1) in GB_pslice_worker() [all …]
|
/dports/math/suitesparse-ccolamd/SuiteSparse-5.10.1/GraphBLAS/Source/ |
H A D | GB_pslice.c | 29 int tlo, // assign to Slice [(tlo+1):(thi-1)] in GB_pslice_worker() argument 41 ASSERT (0 <= tlo && tlo < thi - 1) ; in GB_pslice_worker() 42 for (int t = tlo+1 ; t <= thi-1 ; t++) in GB_pslice_worker() 56 int64_t klo = Slice [tlo] ; in GB_pslice_worker() 69 for (int64_t t = tlo+1 ; t <= thi-1 ; t++) in GB_pslice_worker() 84 double ntasks = thi - tlo ; in GB_pslice_worker() 86 int t = tlo + (int) floor (ratio * ntasks) ; in GB_pslice_worker() 87 t = GB_IMAX (t, tlo+1) ; in GB_pslice_worker() 88 t = GB_IMIN (t, thi-1) ; ASSERT (tlo < t && t < thi) ; in GB_pslice_worker() 101 if (tlo < t-1) in GB_pslice_worker() [all …]
|
/dports/math/suitesparse-spqr/SuiteSparse-5.10.1/GraphBLAS/Source/ |
H A D | GB_pslice.c | 29 int tlo, // assign to Slice [(tlo+1):(thi-1)] in GB_pslice_worker() argument 41 ASSERT (0 <= tlo && tlo < thi - 1) ; in GB_pslice_worker() 42 for (int t = tlo+1 ; t <= thi-1 ; t++) in GB_pslice_worker() 56 int64_t klo = Slice [tlo] ; in GB_pslice_worker() 69 for (int64_t t = tlo+1 ; t <= thi-1 ; t++) in GB_pslice_worker() 84 double ntasks = thi - tlo ; in GB_pslice_worker() 86 int t = tlo + (int) floor (ratio * ntasks) ; in GB_pslice_worker() 87 t = GB_IMAX (t, tlo+1) ; in GB_pslice_worker() 88 t = GB_IMIN (t, thi-1) ; ASSERT (tlo < t && t < thi) ; in GB_pslice_worker() 101 if (tlo < t-1) in GB_pslice_worker() [all …]
|
/dports/math/suitesparse-umfpack/SuiteSparse-5.10.1/GraphBLAS/Source/ |
H A D | GB_pslice.c | 29 int tlo, // assign to Slice [(tlo+1):(thi-1)] in GB_pslice_worker() argument 41 ASSERT (0 <= tlo && tlo < thi - 1) ; in GB_pslice_worker() 42 for (int t = tlo+1 ; t <= thi-1 ; t++) in GB_pslice_worker() 56 int64_t klo = Slice [tlo] ; in GB_pslice_worker() 69 for (int64_t t = tlo+1 ; t <= thi-1 ; t++) in GB_pslice_worker() 84 double ntasks = thi - tlo ; in GB_pslice_worker() 86 int t = tlo + (int) floor (ratio * ntasks) ; in GB_pslice_worker() 87 t = GB_IMAX (t, tlo+1) ; in GB_pslice_worker() 88 t = GB_IMIN (t, thi-1) ; ASSERT (tlo < t && t < thi) ; in GB_pslice_worker() 101 if (tlo < t-1) in GB_pslice_worker() [all …]
|
/dports/math/suitesparse-slip_lu/SuiteSparse-5.10.1/GraphBLAS/Source/ |
H A D | GB_pslice.c | 29 int tlo, // assign to Slice [(tlo+1):(thi-1)] in GB_pslice_worker() argument 41 ASSERT (0 <= tlo && tlo < thi - 1) ; in GB_pslice_worker() 42 for (int t = tlo+1 ; t <= thi-1 ; t++) in GB_pslice_worker() 56 int64_t klo = Slice [tlo] ; in GB_pslice_worker() 69 for (int64_t t = tlo+1 ; t <= thi-1 ; t++) in GB_pslice_worker() 84 double ntasks = thi - tlo ; in GB_pslice_worker() 86 int t = tlo + (int) floor (ratio * ntasks) ; in GB_pslice_worker() 87 t = GB_IMAX (t, tlo+1) ; in GB_pslice_worker() 88 t = GB_IMIN (t, thi-1) ; ASSERT (tlo < t && t < thi) ; in GB_pslice_worker() 101 if (tlo < t-1) in GB_pslice_worker() [all …]
|
/dports/math/suitesparse-btf/SuiteSparse-5.10.1/GraphBLAS/Source/ |
H A D | GB_pslice.c | 29 int tlo, // assign to Slice [(tlo+1):(thi-1)] in GB_pslice_worker() argument 41 ASSERT (0 <= tlo && tlo < thi - 1) ; in GB_pslice_worker() 42 for (int t = tlo+1 ; t <= thi-1 ; t++) in GB_pslice_worker() 56 int64_t klo = Slice [tlo] ; in GB_pslice_worker() 69 for (int64_t t = tlo+1 ; t <= thi-1 ; t++) in GB_pslice_worker() 84 double ntasks = thi - tlo ; in GB_pslice_worker() 86 int t = tlo + (int) floor (ratio * ntasks) ; in GB_pslice_worker() 87 t = GB_IMAX (t, tlo+1) ; in GB_pslice_worker() 88 t = GB_IMIN (t, thi-1) ; ASSERT (tlo < t && t < thi) ; in GB_pslice_worker() 101 if (tlo < t-1) in GB_pslice_worker() [all …]
|
/dports/math/suitesparse-csparse/SuiteSparse-5.10.1/GraphBLAS/Source/ |
H A D | GB_pslice.c | 29 int tlo, // assign to Slice [(tlo+1):(thi-1)] in GB_pslice_worker() argument 41 ASSERT (0 <= tlo && tlo < thi - 1) ; in GB_pslice_worker() 42 for (int t = tlo+1 ; t <= thi-1 ; t++) in GB_pslice_worker() 56 int64_t klo = Slice [tlo] ; in GB_pslice_worker() 69 for (int64_t t = tlo+1 ; t <= thi-1 ; t++) in GB_pslice_worker() 84 double ntasks = thi - tlo ; in GB_pslice_worker() 86 int t = tlo + (int) floor (ratio * ntasks) ; in GB_pslice_worker() 87 t = GB_IMAX (t, tlo+1) ; in GB_pslice_worker() 88 t = GB_IMIN (t, thi-1) ; ASSERT (tlo < t && t < thi) ; in GB_pslice_worker() 101 if (tlo < t-1) in GB_pslice_worker() [all …]
|
/dports/math/suitesparse-cxsparse/SuiteSparse-5.10.1/GraphBLAS/Source/ |
H A D | GB_pslice.c | 29 int tlo, // assign to Slice [(tlo+1):(thi-1)] in GB_pslice_worker() argument 41 ASSERT (0 <= tlo && tlo < thi - 1) ; in GB_pslice_worker() 42 for (int t = tlo+1 ; t <= thi-1 ; t++) in GB_pslice_worker() 56 int64_t klo = Slice [tlo] ; in GB_pslice_worker() 69 for (int64_t t = tlo+1 ; t <= thi-1 ; t++) in GB_pslice_worker() 84 double ntasks = thi - tlo ; in GB_pslice_worker() 86 int t = tlo + (int) floor (ratio * ntasks) ; in GB_pslice_worker() 87 t = GB_IMAX (t, tlo+1) ; in GB_pslice_worker() 88 t = GB_IMIN (t, thi-1) ; ASSERT (tlo < t && t < thi) ; in GB_pslice_worker() 101 if (tlo < t-1) in GB_pslice_worker() [all …]
|
/dports/math/suitesparse-graphblas/SuiteSparse-5.10.1/GraphBLAS/Source/ |
H A D | GB_pslice.c | 29 int tlo, // assign to Slice [(tlo+1):(thi-1)] in GB_pslice_worker() argument 41 ASSERT (0 <= tlo && tlo < thi - 1) ; in GB_pslice_worker() 42 for (int t = tlo+1 ; t <= thi-1 ; t++) in GB_pslice_worker() 56 int64_t klo = Slice [tlo] ; in GB_pslice_worker() 69 for (int64_t t = tlo+1 ; t <= thi-1 ; t++) in GB_pslice_worker() 84 double ntasks = thi - tlo ; in GB_pslice_worker() 86 int t = tlo + (int) floor (ratio * ntasks) ; in GB_pslice_worker() 87 t = GB_IMAX (t, tlo+1) ; in GB_pslice_worker() 88 t = GB_IMIN (t, thi-1) ; ASSERT (tlo < t && t < thi) ; in GB_pslice_worker() 101 if (tlo < t-1) in GB_pslice_worker() [all …]
|
/dports/cad/gmsh/gmsh-4.9.2-source/contrib/Netgen/libsrc/visualization/ |
H A D | vscsg.cpp | 85 const TopLevelObject * tlo = geometry -> GetTopLevelObject (i); in DrawScene() local 86 if (tlo->GetVisible() && !tlo->GetTransparent()) in DrawScene() 88 float mat_col[] = { tlo->GetRed(), tlo->GetGreen(), tlo->GetBlue(), 1 }; in DrawScene() 102 const TopLevelObject * tlo = geometry -> GetTopLevelObject (i); in DrawScene() local 103 if (tlo->GetVisible() && tlo->GetTransparent()) in DrawScene() 105 float mat_col[] = { tlo->GetRed(), tlo->GetGreen(), tlo->GetBlue(), transp }; in DrawScene()
|
/dports/devel/hyperscan/boost_1_75_0/libs/math/test/ |
H A D | cubic_hermite_test.cpp | 46 Real tlo = x.front(); in test_constant() local 56 tlo = boost::math::nextafter(tlo, std::numeric_limits<Real>::max()); in test_constant() 250 Real tlo = x0; in test_cardinal_constant() local 265 tlo = boost::math::nextafter(tlo, std::numeric_limits<Real>::max()); in test_cardinal_constant() 317 Real tlo = x0; in test_cardinal_linear() local 323 CHECK_ULP_CLOSE(Real(tlo), hermite_spline(tlo), 2); in test_cardinal_linear() 327 CHECK_ULP_CLOSE(Real(tlo), hermite_spline_aos(tlo), 2); in test_cardinal_linear() 381 CHECK_ULP_CLOSE(Real(tlo*tlo/2), s(tlo), 3); in test_cardinal_quadratic() 383 CHECK_ULP_CLOSE(Real(tlo), s.prime(tlo), 3); in test_cardinal_quadratic() 385 CHECK_ULP_CLOSE(Real(tlo*tlo/2), saos(tlo), 3); in test_cardinal_quadratic() [all …]
|
/dports/science/simbody/simbody-Simbody-3.7/SimTKmath/Integrators/src/CPodes/sundials/src/cpodes/ |
H A D | cpodes_root.c | 145 #define tlo (cp_mem->cp_tlo) macro 201 thi = tlo = tn; in cpRcheck1() 287 tlo = thi; in cpRcheck2() 318 thi = tlo+smallh; in cpRcheck2() 374 tlo = thi; in cpRcheck3() 553 if (ABS(tmid - tlo) < HALF*ttol) { in cpRootfind() 554 fracint = ABS(thi - tlo)/ttol; in cpRootfind() 556 tmid = tlo + fracsub*(thi - tlo); in cpRootfind() 559 fracint = ABS(thi - tlo)/ttol; in cpRootfind() 615 tlo = tmid_saved; in cpRootfind() [all …]
|