/dports/science/PETSc/petsc-3.14.1/src/mat/tests/ |
H A D | ex58f.F | 14 Vec rowmax 38 call VecCreate(PETSC_COMM_WORLD,rowmax,ierr) 39 call VecSetSizes(rowmax,M,M,ierr) 40 call VecSetFromOptions(rowmax,ierr) 43 call VecView(rowmax,PETSC_VIEWER_STDOUT_WORLD,ierr) 45 call MatGetRowMax(A,rowmax,PETSC_NULL_INTEGER,ierr) 46 call VecView(rowmax,PETSC_VIEWER_STDOUT_WORLD,ierr) 49 call VecView(rowmax,PETSC_VIEWER_STDOUT_WORLD,ierr) 51 call MatGetRowMin(A,rowmax,PETSC_NULL_INTEGER,ierr) 52 call VecView(rowmax,PETSC_VIEWER_STDOUT_WORLD,ierr) [all …]
|
/dports/astro/py-astlib/astLib-0.11.7/PyWCSTools/wcssubs-3.9.5/ |
H A D | lin.c | 295 double colmax, *lu, *rowmax, dtemp; local 317 free(rowmax); 327 rowmax[i] = 0.0; 331 if (dtemp > rowmax[i]) rowmax[i] = dtemp; 337 if (rowmax[i] == 0.0) { 340 free(rowmax); 355 dtemp = fabs(lu[ik]) / rowmax[i]; 371 dtemp = rowmax[pivot]; 372 rowmax[pivot] = rowmax[k]; 373 rowmax[k] = dtemp; [all …]
|
/dports/astro/sextractor/sextractor-2.5.0/src/wcs/ |
H A D | lin.c | 281 double colmax, *lu, *rowmax, dtemp; local 303 free(rowmax); 313 rowmax[i] = 0.0; 317 if (dtemp > rowmax[i]) rowmax[i] = dtemp; 323 if (rowmax[i] == 0.0) { 326 free(rowmax); 341 dtemp = fabs(lu[ik]) / rowmax[i]; 357 dtemp = rowmax[pivot]; 358 rowmax[pivot] = rowmax[k]; 359 rowmax[k] = dtemp; [all …]
|
/dports/science/hypre/hypre-2.23.0/src/parcsr_mv/ |
H A D | communicationT.c | 28 *rowmax = -1; in hypre_RowsWithColumn_original() 36 *rowmax = i>*rowmax ? i : *rowmax; in hypre_RowsWithColumn_original() 51 *rowmax = i>*rowmax ? i : *rowmax; in hypre_RowsWithColumn_original() 65 ( HYPRE_Int * rowmin, HYPRE_Int * rowmax, HYPRE_BigInt column, in hypre_RowsWithColumn() argument 84 *rowmax = -1; in hypre_RowsWithColumn() 92 *rowmax = i>*rowmax ? i : *rowmax; in hypre_RowsWithColumn() 103 *rowmax = i>*rowmax ? i : *rowmax; in hypre_RowsWithColumn() 149 HYPRE_Int i, j, j2, k, ir, rowmin, rowmax; in hypre_MatTCommPkgCreate_core() local 309 hypre_RowsWithColumn( &rowmin, &rowmax, col, in hypre_MatTCommPkgCreate_core() 314 for ( ir=rowmin; ir<=rowmax; ++ir ) { in hypre_MatTCommPkgCreate_core() [all …]
|
/dports/math/libflame/libflame-5.2.0/src/map/lapack2flamec/f2c/c/ |
H A D | dsptrf.c | 180 doublereal colmax, rowmax; in dsptrf_() local 272 rowmax = 0.; in dsptrf_() 280 if ((d__1 = ap[kx], f2c_abs(d__1)) > rowmax) in dsptrf_() 282 rowmax = (d__1 = ap[kx], f2c_abs(d__1)); in dsptrf_() 294 d__2 = rowmax; in dsptrf_() 296 rowmax = max(d__2,d__3); in dsptrf_() 468 rowmax = 0.; in dsptrf_() 475 if ((d__1 = ap[kx], f2c_abs(d__1)) > rowmax) in dsptrf_() 477 rowmax = (d__1 = ap[kx], f2c_abs(d__1)); in dsptrf_() 489 d__2 = rowmax; in dsptrf_() [all …]
|
H A D | ssptrf.c | 179 real colmax, rowmax; in ssptrf_() local 271 rowmax = 0.f; in ssptrf_() 279 if ((r__1 = ap[kx], f2c_abs(r__1)) > rowmax) in ssptrf_() 281 rowmax = (r__1 = ap[kx], f2c_abs(r__1)); in ssptrf_() 293 r__2 = rowmax; in ssptrf_() 295 rowmax = max(r__2,r__3); in ssptrf_() 467 rowmax = 0.f; in ssptrf_() 474 if ((r__1 = ap[kx], f2c_abs(r__1)) > rowmax) in ssptrf_() 476 rowmax = (r__1 = ap[kx], f2c_abs(r__1)); in ssptrf_() 488 r__2 = rowmax; in ssptrf_() [all …]
|
/dports/science/openmx/openmx3.8/source/ |
H A D | TRAN_Distribute_Node.c | 114 int rowmax; 122 rowmax = (idxend-idxstart+1)/numprocs+1; 123 printf("max=%d\n",rowmax); 126 Idx[i]= (int*)malloc(sizeof(int*)*rowmax); 128 TRAN_Distribute_Node_Idx(idxstart,idxend,numprocs,rowmax, Idx); 131 for (j=0;j<rowmax;j++) {
|
/dports/math/saga/saga-8.1.3/saga-gis/src/tools/grid/grid_filter/geodesic_morph_rec/ |
H A D | bin_geovinc.c | 101 unsigned short rowmax; in find_border_pixels() local 116 rowmax = (row == numrows - 1) ? row : row + 1; in find_border_pixels() 120 for (nrow = rowmin; nrow <= rowmax; nrow ++) in find_border_pixels() 174 unsigned short rowmax; in binary_geodesic_morphological_reconstruction() local 204 rowmax = (row == numrows - 1) ? row : row + 1; in binary_geodesic_morphological_reconstruction() 207 for (nrow = rowmin; nrow <= rowmax; nrow ++) in binary_geodesic_morphological_reconstruction()
|
/dports/science/InsightToolkit/ITK-5.0.1/Modules/ThirdParty/VNL/src/vxl/v3p/netlib/lapack/double/ |
H A D | dsptrf.c | 56 doublereal colmax, rowmax; in dsptrf_() local 299 rowmax = 0.; in dsptrf_() 308 if ((d__1 = ap[kx], abs(d__1)) > rowmax) { in dsptrf_() 310 rowmax = (d__1 = ap[kx], abs(d__1)); in dsptrf_() 331 rowmax = max(d__2,d__3); in dsptrf_() 336 if (absakk >= alpha * colmax * (colmax / rowmax)) { in dsptrf_() 344 rowmax) { in dsptrf_() 599 rowmax = 0.; in dsptrf_() 606 if ((d__1 = ap[kx], abs(d__1)) > rowmax) { in dsptrf_() 608 rowmax = (d__1 = ap[kx], abs(d__1)); in dsptrf_() [all …]
|
/dports/science/apbs/apbs-pdb2pqr-apbs-1.5-102-g500c1473/apbs/externals/fetk/punc/src/lapack/ |
H A D | ssptrf.c | 42 static real colmax, rowmax; in ssptrf_() local 238 rowmax = 0.f; in ssptrf_() 243 if ((r__1 = ap[kx], dabs(r__1)) > rowmax) { in ssptrf_() 244 rowmax = (r__1 = ap[kx], dabs(r__1)); in ssptrf_() 257 rowmax = dmax(r__2,r__3); in ssptrf_() 260 if (absakk >= alpha * colmax * (colmax / rowmax)) { in ssptrf_() 266 rowmax) { in ssptrf_() 448 rowmax = 0.f; in ssptrf_() 452 if ((r__1 = ap[kx], dabs(r__1)) > rowmax) { in ssptrf_() 453 rowmax = (r__1 = ap[kx], dabs(r__1)); in ssptrf_() [all …]
|
H A D | dsptrf.c | 43 static doublereal colmax, rowmax; in dsptrf_() local 239 rowmax = 0.; in dsptrf_() 244 if ((d__1 = ap[kx], abs(d__1)) > rowmax) { in dsptrf_() 245 rowmax = (d__1 = ap[kx], abs(d__1)); in dsptrf_() 258 rowmax = max(d__2,d__3); in dsptrf_() 261 if (absakk >= alpha * colmax * (colmax / rowmax)) { in dsptrf_() 267 rowmax) { in dsptrf_() 449 rowmax = 0.; in dsptrf_() 453 if ((d__1 = ap[kx], abs(d__1)) > rowmax) { in dsptrf_() 454 rowmax = (d__1 = ap[kx], abs(d__1)); in dsptrf_() [all …]
|
/dports/misc/vxl/vxl-3.3.2/v3p/netlib/lapack/double/ |
H A D | dsptrf.c | 56 doublereal colmax, rowmax; in dsptrf_() local 299 rowmax = 0.; in dsptrf_() 308 if ((d__1 = ap[kx], abs(d__1)) > rowmax) { in dsptrf_() 310 rowmax = (d__1 = ap[kx], abs(d__1)); in dsptrf_() 331 rowmax = max(d__2,d__3); in dsptrf_() 336 if (absakk >= alpha * colmax * (colmax / rowmax)) { in dsptrf_() 344 rowmax) { in dsptrf_() 599 rowmax = 0.; in dsptrf_() 606 if ((d__1 = ap[kx], abs(d__1)) > rowmax) { in dsptrf_() 608 rowmax = (d__1 = ap[kx], abs(d__1)); in dsptrf_() [all …]
|
/dports/math/linpack/linpack-1.0_14/ |
H A D | csifa.f | 56 real absakk,alpha,colmax,rowmax 110 rowmax = 0.0e0 113 rowmax = amax1(rowmax,cabs1(a(imax,j))) 117 rowmax = amax1(rowmax,cabs1(a(jmax,imax))) 119 if (cabs1(a(imax,imax)) .lt. alpha*rowmax) go to 60 124 if (absakk .lt. alpha*colmax*(colmax/rowmax)) go to 70
|
H A D | zsifa.f | 56 double precision absakk,alpha,colmax,rowmax 114 rowmax = 0.0d0 117 rowmax = dmax1(rowmax,cabs1(a(imax,j))) 121 rowmax = dmax1(rowmax,cabs1(a(jmax,imax))) 123 if (cabs1(a(imax,imax)) .lt. alpha*rowmax) go to 60 128 if (absakk .lt. alpha*colmax*(colmax/rowmax)) go to 70
|
H A D | dsifa.f | 57 double precision absakk,alpha,colmax,rowmax 108 rowmax = 0.0d0 111 rowmax = dmax1(rowmax,dabs(a(imax,j))) 115 rowmax = dmax1(rowmax,dabs(a(jmax,imax))) 117 if (dabs(a(imax,imax)) .lt. alpha*rowmax) go to 60 122 if (absakk .lt. alpha*colmax*(colmax/rowmax)) go to 70
|
H A D | chifa.f | 57 real absakk,alpha,colmax,rowmax 111 rowmax = 0.0e0 114 rowmax = amax1(rowmax,cabs1(a(imax,j))) 118 rowmax = amax1(rowmax,cabs1(a(jmax,imax))) 120 if (cabs1(a(imax,imax)) .lt. alpha*rowmax) go to 60 125 if (absakk .lt. alpha*colmax*(colmax/rowmax)) go to 70
|
H A D | ssifa.f | 57 real absakk,alpha,colmax,rowmax 108 rowmax = 0.0e0 111 rowmax = amax1(rowmax,abs(a(imax,j))) 115 rowmax = amax1(rowmax,abs(a(jmax,imax))) 117 if (abs(a(imax,imax)) .lt. alpha*rowmax) go to 60 122 if (absakk .lt. alpha*colmax*(colmax/rowmax)) go to 70
|
H A D | zhifa.f | 57 double precision absakk,alpha,colmax,rowmax 115 rowmax = 0.0d0 118 rowmax = dmax1(rowmax,cabs1(a(imax,j))) 122 rowmax = dmax1(rowmax,cabs1(a(jmax,imax))) 124 if (cabs1(a(imax,imax)) .lt. alpha*rowmax) go to 60 129 if (absakk .lt. alpha*colmax*(colmax/rowmax)) go to 70
|
H A D | cspfa.f | 68 real absakk,alpha,colmax,rowmax 126 rowmax = 0.0e0 131 rowmax = amax1(rowmax,cabs1(ap(imj))) 137 rowmax = amax1(rowmax,cabs1(ap(jmim))) 140 if (cabs1(ap(imim)) .lt. alpha*rowmax) go to 60 145 if (absakk .lt. alpha*colmax*(colmax/rowmax)) go to 70
|
H A D | sspfa.f | 69 real absakk,alpha,colmax,rowmax 124 rowmax = 0.0e0 129 rowmax = amax1(rowmax,abs(ap(imj))) 135 rowmax = amax1(rowmax,abs(ap(jmim))) 138 if (abs(ap(imim)) .lt. alpha*rowmax) go to 60 143 if (absakk .lt. alpha*colmax*(colmax/rowmax)) go to 70
|
H A D | zspfa.f | 68 double precision absakk,alpha,colmax,rowmax 130 rowmax = 0.0d0 135 rowmax = dmax1(rowmax,cabs1(ap(imj))) 141 rowmax = dmax1(rowmax,cabs1(ap(jmim))) 144 if (cabs1(ap(imim)) .lt. alpha*rowmax) go to 60 149 if (absakk .lt. alpha*colmax*(colmax/rowmax)) go to 70
|
H A D | chpfa.f | 69 real absakk,alpha,colmax,rowmax 127 rowmax = 0.0e0 132 rowmax = amax1(rowmax,cabs1(ap(imj))) 138 rowmax = amax1(rowmax,cabs1(ap(jmim))) 141 if (cabs1(ap(imim)) .lt. alpha*rowmax) go to 60 146 if (absakk .lt. alpha*colmax*(colmax/rowmax)) go to 70
|
H A D | dspfa.f | 69 double precision absakk,alpha,colmax,rowmax 124 rowmax = 0.0d0 129 rowmax = dmax1(rowmax,dabs(ap(imj))) 135 rowmax = dmax1(rowmax,dabs(ap(jmim))) 138 if (dabs(ap(imim)) .lt. alpha*rowmax) go to 60 143 if (absakk .lt. alpha*colmax*(colmax/rowmax)) go to 70
|
/dports/databases/tiledb/TileDB-2.5.2/test/src/ |
H A D | unit-cppapi-updates.cc | 49 const int rowmin = 0, rowmax = 9, row_ext = rowmax - rowmin + 1; variable 55 Dimension::create<int>(ctx, "rows", {{rowmin, rowmax}}, row_ext)) 76 query_w1.set_subarray({rowmin, rowmax, colmin, colmax}) 87 query_w2.set_subarray({rowmin, rowmax, colmin, colmax}) 99 std::vector<int> subarray = {rowmin, rowmax, colmin, colmax};
|
/dports/audio/praat/praat-6.2.03/stat/ |
H A D | TableOfReal.h | 49 void TableOfReal_drawAsNumbers (TableOfReal me, Graphics g, integer rowmin, integer rowmax, int ifo… 50 void TableOfReal_drawAsNumbers_if (TableOfReal me, Graphics g, integer rowmin, integer rowmax, int … 52 void TableOfReal_drawAsSquares (TableOfReal me, Graphics g, integer rowmin, integer rowmax, 54 void TableOfReal_drawVerticalLines (TableOfReal me, Graphics g, integer rowmin, integer rowmax); 55 void TableOfReal_drawHorizontalLines (TableOfReal me, Graphics g, integer rowmin, integer rowmax); 56 void TableOfReal_drawLeftAndRightLines (TableOfReal me, Graphics g, integer rowmin, integer rowmax); 57 void TableOfReal_drawTopAndBottomLines (TableOfReal me, Graphics g, integer rowmin, integer rowmax);
|