/dports/science/InsightToolkit/ITK-5.0.1/Modules/ThirdParty/VNL/src/vxl/v3p/netlib/lapack/double/ |
H A D | dggbal.f | 113 $ K, KOUNT, L, LCAB, LM1, LRAB, LSFMAX, LSFMIN, 356 KOUNT = 0 361 KOUNT = KOUNT + 1 366 KOUNT = KOUNT + 1 369 WORK( I+2*N ) = DBLE( KOUNT )*WORK( I+N ) + SUM 373 KOUNT = 0 378 KOUNT = KOUNT + 1 383 KOUNT = KOUNT + 1 386 WORK( J+3*N ) = DBLE( KOUNT )*WORK( J ) + SUM
|
/dports/science/apbs/apbs-pdb2pqr-apbs-1.5-102-g500c1473/apbs/externals/fetk/punc/src/lapack/src_f77/ |
H A D | sggbal.f | 113 $ K, KOUNT, L, LCAB, LM1, LRAB, LSFMAX, LSFMIN, local 356 KOUNT = 0 361 KOUNT = KOUNT + 1 366 KOUNT = KOUNT + 1 369 WORK( I+2*N ) = REAL( KOUNT )*WORK( I+N ) + SUM 373 KOUNT = 0 378 KOUNT = KOUNT + 1 383 KOUNT = KOUNT + 1 386 WORK( J+3*N ) = REAL( KOUNT )*WORK( J ) + SUM
|
H A D | dggbal.f | 113 $ K, KOUNT, L, LCAB, LM1, LRAB, LSFMAX, LSFMIN, local 356 KOUNT = 0 361 KOUNT = KOUNT + 1 366 KOUNT = KOUNT + 1 369 WORK( I+2*N ) = DBLE( KOUNT )*WORK( I+N ) + SUM 373 KOUNT = 0 378 KOUNT = KOUNT + 1 383 KOUNT = KOUNT + 1 386 WORK( J+3*N ) = DBLE( KOUNT )*WORK( J ) + SUM
|
/dports/math/algae/algae-4.3.6/lapack/ |
H A D | dggbal.f | 113 $ K, KOUNT, L, LCAB, LM1, LRAB, LSFMAX, LSFMIN, 356 KOUNT = 0 361 KOUNT = KOUNT + 1 366 KOUNT = KOUNT + 1 369 WORK( I+2*N ) = DBLE( KOUNT )*WORK( I+N ) + SUM 373 KOUNT = 0 378 KOUNT = KOUNT + 1 383 KOUNT = KOUNT + 1 386 WORK( J+3*N ) = DBLE( KOUNT )*WORK( J ) + SUM
|
/dports/science/elmerfem/elmerfem-release-9.0/mathlibs/src/lapack/ |
H A D | sggbal.f | 113 $ K, KOUNT, L, LCAB, LM1, LRAB, LSFMAX, LSFMIN, 356 KOUNT = 0 361 KOUNT = KOUNT + 1 366 KOUNT = KOUNT + 1 369 WORK( I+2*N ) = REAL( KOUNT )*WORK( I+N ) + SUM 373 KOUNT = 0 378 KOUNT = KOUNT + 1 383 KOUNT = KOUNT + 1 386 WORK( J+3*N ) = REAL( KOUNT )*WORK( J ) + SUM
|
H A D | dggbal.f | 113 $ K, KOUNT, L, LCAB, LM1, LRAB, LSFMAX, LSFMIN, 356 KOUNT = 0 361 KOUNT = KOUNT + 1 366 KOUNT = KOUNT + 1 369 WORK( I+2*N ) = DBLE( KOUNT )*WORK( I+N ) + SUM 373 KOUNT = 0 378 KOUNT = KOUNT + 1 383 KOUNT = KOUNT + 1 386 WORK( J+3*N ) = DBLE( KOUNT )*WORK( J ) + SUM
|
/dports/misc/vxl/vxl-3.3.2/v3p/netlib/lapack/double/ |
H A D | dggbal.f | 113 $ K, KOUNT, L, LCAB, LM1, LRAB, LSFMAX, LSFMIN, 356 KOUNT = 0 361 KOUNT = KOUNT + 1 366 KOUNT = KOUNT + 1 369 WORK( I+2*N ) = DBLE( KOUNT )*WORK( I+N ) + SUM 373 KOUNT = 0 378 KOUNT = KOUNT + 1 383 KOUNT = KOUNT + 1 386 WORK( J+3*N ) = DBLE( KOUNT )*WORK( J ) + SUM
|
/dports/math/slatec/src/ |
H A D | dfzero.f | 98 INTEGER IC,IFLAG,KOUNT 119 KOUNT = 2 126 KOUNT = 3 154 IF (KOUNT .GE. 500) GO TO 14 202 KOUNT = KOUNT + 1
|
H A D | sdzro.f | 57 INTEGER IC, IROOT, KOUNT, N, NQ 67 KOUNT = 0 82 IF (KOUNT .GT. 50) RETURN 125 KOUNT = KOUNT + 1
|
H A D | cdzro.f | 57 INTEGER IC, IROOT, KOUNT, N, NQ 68 KOUNT = 0 83 IF (KOUNT .GT. 50) RETURN 126 KOUNT = KOUNT + 1
|
H A D | ddzro.f | 57 INTEGER IC, IROOT, KOUNT, N, NQ 67 KOUNT = 0 82 IF (KOUNT .GT. 50) RETURN 125 KOUNT = KOUNT + 1
|
H A D | fzero.f | 97 INTEGER IC,IFLAG,KOUNT 117 KOUNT = 2 124 KOUNT = 3 152 IF (KOUNT .GE. 500) GO TO 14 200 KOUNT = KOUNT + 1
|
/dports/math/slatec/ |
H A D | qxbvsp.f | 143 KOUNT = 1 150 GO TO (80,90,100,110,120,130,140), KOUNT 158 KOUNT = 2 169 KOUNT = 3 181 KOUNT = 4 190 KOUNT = 5 198 KOUNT = 6 207 KOUNT = 7
|
/dports/science/InsightToolkit/ITK-5.0.1/Modules/ThirdParty/VNL/src/vxl/v3p/netlib/lapack/complex16/ |
H A D | zggbal.f | 117 $ K, KOUNT, L, LCAB, LM1, LRAB, LSFMAX, LSFMIN, 378 KOUNT = 0 383 KOUNT = KOUNT + 1 388 KOUNT = KOUNT + 1 391 WORK( I+2*N ) = DBLE( KOUNT )*WORK( I+N ) + SUM 395 KOUNT = 0 400 KOUNT = KOUNT + 1 405 KOUNT = KOUNT + 1 408 WORK( J+3*N ) = DBLE( KOUNT )*WORK( J ) + SUM
|
/dports/math/xlife++/xlifepp-sources-v2.0.1-2018-05-09/ext/LAPACKBLAS/SRC/ |
H A D | dggbal.f | 204 $ K, KOUNT, L, LCAB, LM1, LRAB, LSFMAX, LSFMIN, 454 KOUNT = 0 459 KOUNT = KOUNT + 1 464 KOUNT = KOUNT + 1 467 WORK( I+2*N ) = DBLE( KOUNT )*WORK( I+N ) + SUM 471 KOUNT = 0 476 KOUNT = KOUNT + 1 481 KOUNT = KOUNT + 1 484 WORK( J+3*N ) = DBLE( KOUNT )*WORK( J ) + SUM
|
H A D | cggbal.f | 206 $ K, KOUNT, L, LCAB, LM1, LRAB, LSFMAX, LSFMIN, 467 KOUNT = 0 472 KOUNT = KOUNT + 1 477 KOUNT = KOUNT + 1 480 WORK( I+2*N ) = REAL( KOUNT )*WORK( I+N ) + SUM 484 KOUNT = 0 489 KOUNT = KOUNT + 1 494 KOUNT = KOUNT + 1 497 WORK( J+3*N ) = REAL( KOUNT )*WORK( J ) + SUM
|
H A D | sggbal.f | 204 $ K, KOUNT, L, LCAB, LM1, LRAB, LSFMAX, LSFMIN, 454 KOUNT = 0 459 KOUNT = KOUNT + 1 464 KOUNT = KOUNT + 1 467 WORK( I+2*N ) = REAL( KOUNT )*WORK( I+N ) + SUM 471 KOUNT = 0 476 KOUNT = KOUNT + 1 481 KOUNT = KOUNT + 1 484 WORK( J+3*N ) = REAL( KOUNT )*WORK( J ) + SUM
|
H A D | zggbal.f | 206 $ K, KOUNT, L, LCAB, LM1, LRAB, LSFMAX, LSFMIN, 467 KOUNT = 0 472 KOUNT = KOUNT + 1 477 KOUNT = KOUNT + 1 480 WORK( I+2*N ) = DBLE( KOUNT )*WORK( I+N ) + SUM 484 KOUNT = 0 489 KOUNT = KOUNT + 1 494 KOUNT = KOUNT + 1 497 WORK( J+3*N ) = DBLE( KOUNT )*WORK( J ) + SUM
|
/dports/math/xlapack/lapack-3.10.0/SRC/ |
H A D | zggbal.f | 203 $ K, KOUNT, L, LCAB, LM1, LRAB, LSFMAX, LSFMIN, 464 KOUNT = 0 469 KOUNT = KOUNT + 1 474 KOUNT = KOUNT + 1 477 WORK( I+2*N ) = DBLE( KOUNT )*WORK( I+N ) + SUM 481 KOUNT = 0 486 KOUNT = KOUNT + 1 491 KOUNT = KOUNT + 1 494 WORK( J+3*N ) = DBLE( KOUNT )*WORK( J ) + SUM
|
H A D | sggbal.f | 201 $ K, KOUNT, L, LCAB, LM1, LRAB, LSFMAX, LSFMIN, 451 KOUNT = 0 456 KOUNT = KOUNT + 1 461 KOUNT = KOUNT + 1 464 WORK( I+2*N ) = REAL( KOUNT )*WORK( I+N ) + SUM 468 KOUNT = 0 473 KOUNT = KOUNT + 1 478 KOUNT = KOUNT + 1 481 WORK( J+3*N ) = REAL( KOUNT )*WORK( J ) + SUM
|
H A D | dggbal.f | 201 $ K, KOUNT, L, LCAB, LM1, LRAB, LSFMAX, LSFMIN, 451 KOUNT = 0 456 KOUNT = KOUNT + 1 461 KOUNT = KOUNT + 1 464 WORK( I+2*N ) = DBLE( KOUNT )*WORK( I+N ) + SUM 468 KOUNT = 0 473 KOUNT = KOUNT + 1 478 KOUNT = KOUNT + 1 481 WORK( J+3*N ) = DBLE( KOUNT )*WORK( J ) + SUM
|
H A D | cggbal.f | 203 $ K, KOUNT, L, LCAB, LM1, LRAB, LSFMAX, LSFMIN, 464 KOUNT = 0 469 KOUNT = KOUNT + 1 474 KOUNT = KOUNT + 1 477 WORK( I+2*N ) = REAL( KOUNT )*WORK( I+N ) + SUM 481 KOUNT = 0 486 KOUNT = KOUNT + 1 491 KOUNT = KOUNT + 1 494 WORK( J+3*N ) = REAL( KOUNT )*WORK( J ) + SUM
|
/dports/math/blas/lapack-3.10.0/SRC/ |
H A D | zggbal.f | 203 $ K, KOUNT, L, LCAB, LM1, LRAB, LSFMAX, LSFMIN, 464 KOUNT = 0 469 KOUNT = KOUNT + 1 474 KOUNT = KOUNT + 1 477 WORK( I+2*N ) = DBLE( KOUNT )*WORK( I+N ) + SUM 481 KOUNT = 0 486 KOUNT = KOUNT + 1 491 KOUNT = KOUNT + 1 494 WORK( J+3*N ) = DBLE( KOUNT )*WORK( J ) + SUM
|
H A D | cggbal.f | 203 $ K, KOUNT, L, LCAB, LM1, LRAB, LSFMAX, LSFMIN, 464 KOUNT = 0 469 KOUNT = KOUNT + 1 474 KOUNT = KOUNT + 1 477 WORK( I+2*N ) = REAL( KOUNT )*WORK( I+N ) + SUM 481 KOUNT = 0 486 KOUNT = KOUNT + 1 491 KOUNT = KOUNT + 1 494 WORK( J+3*N ) = REAL( KOUNT )*WORK( J ) + SUM
|
H A D | dggbal.f | 201 $ K, KOUNT, L, LCAB, LM1, LRAB, LSFMAX, LSFMIN, 451 KOUNT = 0 456 KOUNT = KOUNT + 1 461 KOUNT = KOUNT + 1 464 WORK( I+2*N ) = DBLE( KOUNT )*WORK( I+N ) + SUM 468 KOUNT = 0 473 KOUNT = KOUNT + 1 478 KOUNT = KOUNT + 1 481 WORK( J+3*N ) = DBLE( KOUNT )*WORK( J ) + SUM
|