/dports/science/dakota/dakota-6.13.0-release-public.src-UI/packages/external/trilinos/packages/teuchos/numerics/src/ |
H A D | Teuchos_BLAS.hpp | 576 OrdinalType i, ix = izero, iy = izero; in COPY() 597 OrdinalType i, ix = izero, iy = izero; in AXPY() 643 OrdinalType i, ix = izero, iy = izero; in DOT() 644 if( n > izero ) in DOT() 686 OrdinalType result = izero, ix = izero, i; 757 OrdinalType kx = izero, ky = izero; in GEMV() 1075 if( m == izero || n == izero || alpha == alpha_zero ){ return; } in GER() 1100 OrdinalType i, j, ix, jy = izero, kx = izero; in GER() 1165 …if( (m==izero) || (n==izero) || (((alpha==alpha_zero)||(k==izero)) && (beta==beta_one)) ){ return;… in GEMM() 1748 if (n==izero || m==izero) { return; } in TRMM() [all …]
|
/dports/biology/molden/molden5.8/ |
H A D | reada.f | 7 izero = ichar('0') 23 if((n.le.nine.and.n.ge.izero).or. n.eq.minus.or.n.eq.idot) 33 if (n.le.nine.and.n.ge.izero) then 39 k1 = k1*10 + n - izero 54 if (n.le.nine.and.n.ge.izero) then 57 k2 = k2*10 + n - izero 82 if (n.le.nine.and.n.ge.izero) then 85 k3 = k3*10 + n - izero
|
/dports/science/xtb/xtb-6.4.1/src/ |
H A D | readl.f90 | 62 if(n.le.nine.and.n.ge.izero .or.n.eq.idot)goto 20 63 if(n.eq.minus.and.(m.le.nine.and.m.ge.izero & 72 if(n.le.nine.and.n.ge.izero) then 75 c1=c1*10+n-izero 88 if(n.le.nine.and.n.ge.izero) then 91 c2=c2*10+n-izero 118 if(n.le.nine.and.n.ge.izero) c1=c1*10.0d0+n-izero
|
/dports/math/scalapack/scalapack-2.1.0/PBLAS/SRC/PTOOLS/ |
H A D | PB_Cplapad.c | 184 Anb, Anq, Anq0, Arow, ctxt, izero=0, k, kb, ktmp, mn, mycol, local 230 pad( C2F_CHAR( UPLO ), C2F_CHAR( CONJUG ), &Amp, &Anq, &izero, ALPHA, 243 pad( C2F_CHAR( UPLO ), C2F_CHAR( CONJUG ), &Amp, &Anq, &izero, ALPHA, 258 pad( C2F_CHAR( UPLO ), C2F_CHAR( CONJUG ), &Amp, &Anq, &izero, ALPHA, 273 pad( C2F_CHAR( UPLO ), C2F_CHAR( CONJUG ), &Amp, &Anq, &izero, ALPHA, 303 pad( C2F_CHAR( ALL ), C2F_CHAR( NOCONJG ), &Amp0, &Anq0, &izero, 322 pad( C2F_CHAR( ALL ), C2F_CHAR( NOCONJG ), &Akp, &Anq0, &izero, 327 pad( C2F_CHAR( ALL ), C2F_CHAR( NOCONJG ), &Amp, &Anq, &izero, ALPHA, 345 pad( C2F_CHAR( ALL ), C2F_CHAR( NOCONJG ), &Akp, &Anq0, &izero, 351 pad( C2F_CHAR( ALL ), C2F_CHAR( NOCONJG ), &Amp0, &Anq0, &izero, [all …]
|
H A D | PB_CInOutV.c | 416 &K, &Ynq, &izero, *TBETA, *TBETA, 458 &izero, *TBETA, *TBETA, *YAPTR, 499 &izero, *TBETA, *TBETA, *YAPTR, &Yld ); 533 &izero, *TBETA, *TBETA, *YAPTR, &Yld ); 550 &izero, *TBETA, *TBETA, *YAPTR, &K ); 565 &izero, *TBETA, *TBETA, *YAPTR, &K ); 706 &Ymp, &K, &izero, *TBETA, *TBETA, 789 &izero, *TBETA, *TBETA, *YAPTR, &Yld ); 823 &izero, *TBETA, *TBETA, *YAPTR, &Yld ); 840 &izero, *TBETA, *TBETA, *YAPTR, &Yld ); [all …]
|
H A D | PB_Cplapd2.c | 46 imbloc, inbloc, ioffd, iupp, izero=0, jjmax, joffd, lcmt, local 125 pad( C2F_CHAR( ALL ), C2F_CHAR( &herm ), &imbloc, &tmp1, &izero, 141 pad( C2F_CHAR( ALL ), C2F_CHAR( &herm ), &tmp1, &inbloc, &izero, 168 pad( C2F_CHAR( ALL ), C2F_CHAR( &herm ), &tmp1, &n1, &izero, ALPHA, 206 pad( C2F_CHAR( ALL ), C2F_CHAR( &herm ), &tmp1, &inbloc, &izero, ALPHA, 220 pad( C2F_CHAR( ALL ), C2F_CHAR( &herm ), &tmp1, &n1, &izero, ALPHA, 244 pad( C2F_CHAR( ALL ), C2F_CHAR( &herm ), &m1, &tmp1, &izero, ALPHA, 296 pad( C2F_CHAR( ALL ), C2F_CHAR( &herm ), &m1, &tmp1, &izero, ALPHA, 320 pad( C2F_CHAR( ALL ), C2F_CHAR( &herm ), &tmp1, &n1, &izero, ALPHA, 358 pad( C2F_CHAR( ALL ), C2F_CHAR( &herm ), &tmp1, &nbloc, &izero, ALPHA, [all …]
|
H A D | PB_Cplasca2.c | 125 scal( C2F_CHAR( ALL ), &imbloc, &tmp1, &izero, ALPHA, 141 scal( C2F_CHAR( ALL ), &tmp1, &inbloc, &izero, ALPHA, 168 scal( C2F_CHAR( ALL ), &tmp1, &n1, &izero, ALPHA, 206 scal( C2F_CHAR( ALL ), &tmp1, &inbloc, &izero, ALPHA, 220 scal( C2F_CHAR( ALL ), &tmp1, &n1, &izero, ALPHA, 244 scal( C2F_CHAR( ALL ), &m1, &tmp1, &izero, ALPHA, 282 scal( C2F_CHAR( ALL ), &imbloc, &tmp1, &izero, ALPHA, 296 scal( C2F_CHAR( ALL ), &m1, &tmp1, &izero, ALPHA, 320 scal( C2F_CHAR( ALL ), &tmp1, &n1, &izero, ALPHA, 358 scal( C2F_CHAR( ALL ), &tmp1, &nbloc, &izero, ALPHA, [all …]
|
H A D | PB_CpaxpbyDN.c | 222 BnprocsD, BprocR, Broc, Brow, RRorCC, ctxt, izero=0, k, kbb, local 346 &izero, zero, zero, Mptr( B, Bii, Bjj, Bld, size ), 375 &izero, zero, zero, Mptr( B, Bii, k, Bld, 379 &izero, zero, zero, Mptr( B, k, Bjj, Bld, 391 pad( C2F_CHAR( ALL ), C2F_CHAR( NOCONJG ), &M, &N, &izero, 465 &Ainb1D, &izero, zero, zero, Mptr( B, Bii, Bjj, 469 &N, &izero, zero, zero, Mptr( B, Bii, Bjj, Bld, 494 &kbb, &izero, zero, zero, Mptr( B, Bii, k, 511 pad( C2F_CHAR( ALL ), C2F_CHAR( NOCONJG ), &M, &N, &izero, 826 pad( C2F_CHAR( ALL ), C2F_CHAR( NOCONJG ), &Bm, &Bn, &izero, [all …]
|
H A D | PB_Cplascal.c | 175 Amp0, Anb, Anq, Anq0, ctxt, izero=0, k, kb, ktmp, mn, mycol, local 295 scal( C2F_CHAR( UPLO ), &Amp, &Anq, &izero, ALPHA, Aptr, &Ald ); 323 scal( C2F_CHAR( ALL ), &Amp0, &Anq0, &izero, ALPHA, Mptr( Aptr, 342 scal( C2F_CHAR( ALL ), &Akp, &Anq0, &izero, ALPHA, Mptr( Aptr, 347 scal( C2F_CHAR( ALL ), &Amp, &Anq, &izero, ALPHA, Mptr( Aptr, 0, 365 scal( C2F_CHAR( ALL ), &Akp, &Anq0, &izero, ALPHA, Mptr( Aptr, 370 scal( C2F_CHAR( ALL ), &Amp0, &Anq0, &izero, ALPHA, Mptr( Aptr, 374 scal( C2F_CHAR( ALL ), &Amp, &Anq, &izero, ALPHA, Mptr( Aptr, 0,
|
H A D | PB_COutV.c | 179 izero=0, nprow, myrow, npcol, mycol; local 244 &izero, zero, zero, *YAPTR, &Yld ); 267 &izero, zero, zero, *YAPTR, &Yld ); 305 &izero, zero, zero, *YAPTR, &Yld ); 328 &izero, zero, zero, *YAPTR, &Yld );
|
/dports/multimedia/opentoonz/opentoonz-1.5.0/thirdparty/superlu/SuperLU_4.1/TESTING/ |
H A D | cdrive.c | 71 int zerot, izero, ioff; in main() local 214 if ( imat == 5 ) izero = 1; in main() 215 else if ( imat == 6 ) izero = n; in main() 216 else izero = n / 2 + 1; in main() 217 ioff = (izero - 1) * lda; in main() 221 for (j = 0; j < n - izero + 1; ++j) in main() 226 izero = 0; in main() 233 izero = 0; in main() 346 if ( info && info != izero ) { in main() 355 if ( izero == 0 ) { in main() [all …]
|
H A D | ddrive.c | 71 int zerot, izero, ioff; in main() local 214 if ( imat == 5 ) izero = 1; in main() 215 else if ( imat == 6 ) izero = n; in main() 216 else izero = n / 2 + 1; in main() 217 ioff = (izero - 1) * lda; in main() 221 for (j = 0; j < n - izero + 1; ++j) in main() 226 izero = 0; in main() 233 izero = 0; in main() 346 if ( info && info != izero ) { in main() 355 if ( izero == 0 ) { in main() [all …]
|
H A D | sdrive.c | 71 int zerot, izero, ioff; in main() local 214 if ( imat == 5 ) izero = 1; in main() 215 else if ( imat == 6 ) izero = n; in main() 216 else izero = n / 2 + 1; in main() 217 ioff = (izero - 1) * lda; in main() 221 for (j = 0; j < n - izero + 1; ++j) in main() 226 izero = 0; in main() 233 izero = 0; in main() 346 if ( info && info != izero ) { in main() 355 if ( izero == 0 ) { in main() [all …]
|
H A D | zdrive.c | 71 int zerot, izero, ioff; in main() local 214 if ( imat == 5 ) izero = 1; in main() 215 else if ( imat == 6 ) izero = n; in main() 216 else izero = n / 2 + 1; in main() 217 ioff = (izero - 1) * lda; in main() 221 for (j = 0; j < n - izero + 1; ++j) in main() 226 izero = 0; in main() 233 izero = 0; in main() 346 if ( info && info != izero ) { in main() 355 if ( izero == 0 ) { in main() [all …]
|
/dports/science/cp2k/cp2k-2e995eec7fd208c8a72d9544807bd8b8ba8cd1cc/src/pw/ |
H A D | ps_wavelet_kernel.F | 595 izero = 0 598 izero = izero + 1 602 ivalue = izero 634 ivalue = izero 650 izero = izero + 1 653 izero = izero - 1 710 izero = 0 713 izero = izero + 1 718 ivalue = izero 764 izero = izero + 1 [all …]
|
/dports/science/cp2k-data/cp2k-7.1.0/src/pw/ |
H A D | ps_wavelet_kernel.F | 595 izero = 0 598 izero = izero + 1 602 ivalue = izero 634 ivalue = izero 650 izero = izero + 1 653 izero = izero - 1 710 izero = 0 713 izero = izero + 1 718 ivalue = izero 764 izero = izero + 1 [all …]
|
/dports/math/superlu/superlu-5.2.2/TESTING/ |
H A D | ddrive.c | 83 int zerot, izero, ioff; in main() local 227 if ( imat == 5 ) izero = 1; in main() 228 else if ( imat == 6 ) izero = n; in main() 229 else izero = n / 2 + 1; in main() 230 ioff = (izero - 1) * lda; in main() 234 for (j = 0; j < n - izero + 1; ++j) in main() 239 izero = 0; in main() 246 izero = 0; in main() 359 if ( info && info != izero ) { in main() 368 if ( izero == 0 ) { in main() [all …]
|
H A D | zdrive.c | 83 int zerot, izero, ioff; in main() local 227 if ( imat == 5 ) izero = 1; in main() 228 else if ( imat == 6 ) izero = n; in main() 229 else izero = n / 2 + 1; in main() 230 ioff = (izero - 1) * lda; in main() 234 for (j = 0; j < n - izero + 1; ++j) in main() 239 izero = 0; in main() 246 izero = 0; in main() 359 if ( info && info != izero ) { in main() 368 if ( izero == 0 ) { in main() [all …]
|
H A D | cdrive.c | 83 int zerot, izero, ioff; in main() local 227 if ( imat == 5 ) izero = 1; in main() 228 else if ( imat == 6 ) izero = n; in main() 229 else izero = n / 2 + 1; in main() 230 ioff = (izero - 1) * lda; in main() 234 for (j = 0; j < n - izero + 1; ++j) in main() 239 izero = 0; in main() 246 izero = 0; in main() 359 if ( info && info != izero ) { in main() 368 if ( izero == 0 ) { in main() [all …]
|
H A D | sdrive.c | 83 int zerot, izero, ioff; in main() local 227 if ( imat == 5 ) izero = 1; in main() 228 else if ( imat == 6 ) izero = n; in main() 229 else izero = n / 2 + 1; in main() 230 ioff = (izero - 1) * lda; in main() 234 for (j = 0; j < n - izero + 1; ++j) in main() 239 izero = 0; in main() 246 izero = 0; in main() 359 if ( info && info != izero ) { in main() 368 if ( izero == 0 ) { in main() [all …]
|
/dports/biology/molden/molden5.8/ambfor/ |
H A D | getinp.f | 357 izero = ichar('0') 370 n = izero 415 izero = ichar('0') 431 if((n.le.nine.and.n.ge.izero).or. n.eq.minus.or.n.eq.idot) 441 if (n.le.nine.and.n.ge.izero) then 447 k1 = k1*10 + n - izero 462 if (n.le.nine.and.n.ge.izero) then 465 k2 = k2*10 + n - izero 490 if (n.le.nine.and.n.ge.izero) then 493 k3 = k3*10 + n - izero
|
/dports/print/ghostscript7-base/ghostscript-7.07/src/ |
H A D | gdevpe.c | 234 #define izero (int)zero in pe_copy_mono() macro 237 if ( ione == izero ) /* vacuous case */ in pe_copy_mono() 270 invert = (izero == 1 || ione == 0 ? -1 : 0); in pe_copy_mono() 271 zmask = (izero == 0 || ione == 0 ? 0 : -1); in pe_copy_mono() 272 omask = (izero == 1 || ione == 1 ? -1 : 0); in pe_copy_mono() 274 #undef izero in pe_copy_mono()
|
/dports/print/ghostscript8-x11/ghostscript-8.71/base/ |
H A D | gdevpe.c | 229 #define izero (int)zero in pe_copy_mono() macro 232 if ( ione == izero ) /* vacuous case */ in pe_copy_mono() 265 invert = (izero == 1 || ione == 0 ? -1 : 0); in pe_copy_mono() 266 zmask = (izero == 0 || ione == 0 ? 0 : -1); in pe_copy_mono() 267 omask = (izero == 1 || ione == 1 ? -1 : 0); in pe_copy_mono() 269 #undef izero in pe_copy_mono()
|
/dports/print/ghostscript9-agpl-base/ghostscript-9.52/devices/ |
H A D | gdevpe.c | 233 #define izero (int)zero in pe_copy_mono() macro 236 if ( ione == izero ) /* vacuous case */ in pe_copy_mono() 269 invert = (izero == 1 || ione == 0 ? -1 : 0); in pe_copy_mono() 270 zmask = (izero == 0 || ione == 0 ? 0 : -1); in pe_copy_mono() 271 omask = (izero == 1 || ione == 1 ? -1 : 0); in pe_copy_mono() 273 #undef izero in pe_copy_mono()
|
/dports/print/ghostscript9-agpl-x11/ghostscript-9.52/devices/ |
H A D | gdevpe.c | 233 #define izero (int)zero in pe_copy_mono() macro 236 if ( ione == izero ) /* vacuous case */ in pe_copy_mono() 269 invert = (izero == 1 || ione == 0 ? -1 : 0); in pe_copy_mono() 270 zmask = (izero == 0 || ione == 0 ? 0 : -1); in pe_copy_mono() 271 omask = (izero == 1 || ione == 1 ? -1 : 0); in pe_copy_mono() 273 #undef izero in pe_copy_mono()
|