| /dports/math/arpack-ng/arpack-ng-3.8.0/SRC/ |
| H A D | dneupd.f | 395 nconv = iparam(5)
411 if (nconv .le. 0) then
588 if (numcnv .lt. nconv .and.
610 if (numcnv .ne. nconv) then
669 if (nconv2 .lt. nconv) then
670 nconv = nconv2
740 do 20 j=1, nconv
766 if (j .le. nconv) then
793 do 40 j=1, nconv
839 do 45 j=1, nconv
[all …]
|
| H A D | sneupd.f | 395 nconv = iparam(5)
411 if (nconv .le. 0) then
588 if (numcnv .lt. nconv .and.
610 if (numcnv .ne. nconv) then
669 if (nconv2 .lt. nconv) then
670 nconv = nconv2
739 do 20 j=1, nconv
765 if (j .le. nconv) then
792 do 40 j=1, nconv
838 do 45 j=1, nconv
[all …]
|
| H A D | zneupd.f | 341 nconv = iparam(5)
359 if (nconv .le. 0) then
521 if (numcnv .lt. nconv .and.
545 if (numcnv .ne. nconv) then
598 if (nconv2 .lt. nconv) then
599 nconv = nconv2
666 do 20 j=1, nconv
693 if (j .le. nconv) then
719 do 40 j=1, nconv
818 do 60 k=1, nconv
[all …]
|
| H A D | cneupd.f | 341 nconv = iparam(5)
359 if (nconv .le. 0) then
521 if (numcnv .lt. nconv .and.
545 if (numcnv .ne. nconv) then
598 if (nconv2 .lt. nconv) then
599 nconv = nconv2
666 do 20 j=1, nconv
693 if (j .le. nconv) then
719 do 40 j=1, nconv
818 do 60 k=1, nconv
[all …]
|
| /dports/science/py-scipy/scipy-1.7.1/scipy/sparse/linalg/eigen/arpack/ARPACK/SRC/ |
| H A D | dneupd.f | 395 nconv = iparam(5)
411 if (nconv .le. 0) then
588 if (numcnv .lt. nconv .and.
610 if (numcnv .ne. nconv) then
669 if (nconv2 .lt. nconv) then
670 nconv = nconv2
740 do 20 j=1, nconv
766 if (j .le. nconv) then
793 do 40 j=1, nconv
839 do 45 j=1, nconv
[all …]
|
| H A D | sneupd.f | 395 nconv = iparam(5)
411 if (nconv .le. 0) then
588 if (numcnv .lt. nconv .and.
610 if (numcnv .ne. nconv) then
669 if (nconv2 .lt. nconv) then
670 nconv = nconv2
739 do 20 j=1, nconv
765 if (j .le. nconv) then
792 do 40 j=1, nconv
838 do 45 j=1, nconv
[all …]
|
| H A D | zneupd.f | 341 nconv = iparam(5)
359 if (nconv .le. 0) then
521 if (numcnv .lt. nconv .and.
545 if (numcnv .ne. nconv) then
598 if (nconv2 .lt. nconv) then
599 nconv = nconv2
666 do 20 j=1, nconv
693 if (j .le. nconv) then
719 do 40 j=1, nconv
818 do 60 k=1, nconv
[all …]
|
| H A D | cneupd.f | 341 nconv = iparam(5)
359 if (nconv .le. 0) then
521 if (numcnv .lt. nconv .and.
545 if (numcnv .ne. nconv) then
598 if (nconv2 .lt. nconv) then
599 nconv = nconv2
666 do 20 j=1, nconv
693 if (j .le. nconv) then
719 do 40 j=1, nconv
818 do 60 k=1, nconv
[all …]
|
| /dports/math/arpack-ng/arpack-ng-3.8.0/PARPACK/SRC/BLACS/ |
| H A D | pdneupd.f | 365 & iheigr, iheigi, iconj , nconv ,
410 nconv = iparam(5)
426 if (nconv .le. 0) then
604 if (numcnv .lt. nconv .and.
626 if (numcnv .ne. nconv) then
721 call dgeqr2 (ncv, nconv , workl(invsub),
743 do 20 j=1, nconv
769 if (j .le. nconv) then
796 do 40 j=1, nconv
844 do 45 j=1, nconv
[all …]
|
| H A D | psneupd.f | 365 & iheigr, iheigi, iconj , nconv ,
410 nconv = iparam(5)
426 if (nconv .le. 0) then
604 if (numcnv .lt. nconv .and.
626 if (numcnv .ne. nconv) then
721 call sgeqr2(ncv, nconv , workl(invsub),
743 do 20 j=1, nconv
769 if (j .le. nconv) then
796 do 40 j=1, nconv
844 do 45 j=1, nconv
[all …]
|
| H A D | pzneupd.f | 362 nconv = iparam(5)
380 if (nconv .le. 0) then
543 if (numcnv .lt. nconv .and.
567 if (numcnv .ne. nconv) then
656 call zgeqr2(ncv, nconv , workl(invsub),
678 do 20 j=1, nconv
705 if (j .le. nconv) then
731 do 40 j=1, nconv
787 call zcopy(nconv, workl(ritz), 1, d, 1)
831 do 60 k=1, nconv
[all …]
|
| H A D | pcneupd.f | 362 nconv = iparam(5)
380 if (nconv .le. 0) then
543 if (numcnv .lt. nconv .and.
567 if (numcnv .ne. nconv) then
656 call cgeqr2(ncv, nconv , workl(invsub),
678 do 20 j=1, nconv
705 if (j .le. nconv) then
731 do 40 j=1, nconv
787 call ccopy(nconv, workl(ritz), 1, d, 1)
831 do 60 k=1, nconv
[all …]
|
| /dports/math/arpack-ng/arpack-ng-3.8.0/PARPACK/SRC/MPI/ |
| H A D | pdneupd.f | 365 & iheigr, iheigi, iconj , nconv ,
410 nconv = iparam(5)
426 if (nconv .le. 0) then
604 if (numcnv .lt. nconv .and.
626 if (numcnv .ne. nconv) then
721 call dgeqr2 (ncv, nconv , workl(invsub),
743 do 20 j=1, nconv
769 if (j .le. nconv) then
796 do 40 j=1, nconv
844 do 45 j=1, nconv
[all …]
|
| H A D | psneupd.f | 365 & iheigr, iheigi, iconj , nconv ,
410 nconv = iparam(5)
426 if (nconv .le. 0) then
604 if (numcnv .lt. nconv .and.
626 if (numcnv .ne. nconv) then
721 call sgeqr2(ncv, nconv , workl(invsub),
743 do 20 j=1, nconv
769 if (j .le. nconv) then
796 do 40 j=1, nconv
844 do 45 j=1, nconv
[all …]
|
| H A D | pcneupd.f | 362 nconv = iparam(5)
380 if (nconv .le. 0) then
543 if (numcnv .lt. nconv .and.
567 if (numcnv .ne. nconv) then
656 call cgeqr2(ncv, nconv , workl(invsub),
678 do 20 j=1, nconv
705 if (j .le. nconv) then
731 do 40 j=1, nconv
787 call ccopy(nconv, workl(ritz), 1, d, 1)
831 do 60 k=1, nconv
[all …]
|
| H A D | pzneupd.f | 362 nconv = iparam(5)
380 if (nconv .le. 0) then
543 if (numcnv .lt. nconv .and.
567 if (numcnv .ne. nconv) then
656 call zgeqr2(ncv, nconv , workl(invsub),
678 do 20 j=1, nconv
705 if (j .le. nconv) then
731 do 40 j=1, nconv
787 call zcopy(nconv, workl(ritz), 1, d, 1)
831 do 60 k=1, nconv
[all …]
|
| /dports/science/apbs/apbs-pdb2pqr-apbs-1.5-102-g500c1473/apbs/externals/fetk/punc/src/arpack/src_f77/ |
| H A D | sneupd.f | 395 nconv = iparam(5)
411 if (nconv .le. 0) then
588 if (numcnv .lt. nconv .and.
610 if (numcnv .ne. nconv) then
735 do 20 j=1, nconv
761 if (j .le. nconv) then
788 do 40 j=1, nconv
834 do 45 j=1, nconv
991 call svout(logfil, nconv, dr, ndigit,
998 call svout(logfil, nconv, dr, ndigit,
[all …]
|
| H A D | dneupd.f | 395 nconv = iparam(5)
411 if (nconv .le. 0) then
588 if (numcnv .lt. nconv .and.
610 if (numcnv .ne. nconv) then
735 do 20 j=1, nconv
761 if (j .le. nconv) then
788 do 40 j=1, nconv
834 do 45 j=1, nconv
991 call dvout (logfil, nconv, dr, ndigit,
998 call dvout (logfil, nconv, dr, ndigit,
[all …]
|
| H A D | zneupd.f | 341 nconv = iparam(5)
359 if (nconv .le. 0) then
521 if (numcnv .lt. nconv .and.
545 if (numcnv .ne. nconv) then
662 do 20 j=1, nconv
689 if (j .le. nconv) then
715 do 40 j=1, nconv
814 do 60 k=1, nconv
820 call zvout (logfil, nconv, d, ndigit,
825 call zvout (logfil, nconv, d, ndigit,
[all …]
|
| /dports/math/algae/algae-4.3.6/arpack/ |
| H A D | dneupd.f | 395 nconv = iparam(5)
411 if (nconv .le. 0) then
588 if (numcnv .lt. nconv .and.
610 if (numcnv .ne. nconv) then
735 do 20 j=1, nconv
761 if (j .le. nconv) then
788 do 40 j=1, nconv
834 do 45 j=1, nconv
991 call dvout (logfil, nconv, dr, ndigit,
998 call dvout (logfil, nconv, dr, ndigit,
[all …]
|
| /dports/science/getdp/getdp-3.4.0-source/contrib/Arpack/ |
| H A D | dneupd.f | 395 nconv = iparam(5)
411 if (nconv .le. 0) then
588 if (numcnv .lt. nconv .and.
610 if (numcnv .ne. nconv) then
735 do 20 j=1, nconv
761 if (j .le. nconv) then
788 do 40 j=1, nconv
834 do 45 j=1, nconv
991 call dvout (logfil, nconv, dr, ndigit,
998 call dvout (logfil, nconv, dr, ndigit,
[all …]
|
| H A D | sneupd.f | 395 nconv = iparam(5)
411 if (nconv .le. 0) then
588 if (numcnv .lt. nconv .and.
610 if (numcnv .ne. nconv) then
735 do 20 j=1, nconv
761 if (j .le. nconv) then
788 do 40 j=1, nconv
834 do 45 j=1, nconv
991 call svout(logfil, nconv, dr, ndigit,
998 call svout(logfil, nconv, dr, ndigit,
[all …]
|
| /dports/science/elmerfem/elmerfem-release-9.0/mathlibs/src/parpack/ |
| H A D | psneupd.f | 365 & iheigr, iheigi, iconj , nconv ,
410 nconv = iparam(5)
426 if (nconv .le. 0) then
604 if (numcnv .lt. nconv .and.
626 if (numcnv .ne. nconv) then
721 call sgeqr2(ncv, nconv , workl(invsub),
743 do 20 j=1, nconv
769 if (j .le. nconv) then
796 do 40 j=1, nconv
844 do 45 j=1, nconv
[all …]
|
| H A D | pdneupd.f | 365 & iheigr, iheigi, iconj , nconv ,
410 nconv = iparam(5)
426 if (nconv .le. 0) then
604 if (numcnv .lt. nconv .and.
626 if (numcnv .ne. nconv) then
721 call dgeqr2 (ncv, nconv , workl(invsub),
743 do 20 j=1, nconv
769 if (j .le. nconv) then
796 do 40 j=1, nconv
844 do 45 j=1, nconv
[all …]
|
| H A D | pcneupd.f | 362 nconv = iparam(5)
380 if (nconv .le. 0) then
543 if (numcnv .lt. nconv .and.
567 if (numcnv .ne. nconv) then
656 call cgeqr2(ncv, nconv , workl(invsub),
678 do 20 j=1, nconv
705 if (j .le. nconv) then
731 do 40 j=1, nconv
787 call ccopy(nconv, workl(ritz), 1, d, 1)
831 do 60 k=1, nconv
[all …]
|