| /dports/math/maxima/maxima-5.43.2/share/lapack/blas/ |
| H A D | dzasum.lisp | 20 (defun dzasum (n zx incx) function
25 (prog ((i 0) (ix 0) (stemp 0.0) (dzasum 0.0))
26 (declare (type (double-float) dzasum stemp)
28 (setf dzasum 0.0)
42 (setf dzasum stemp)
53 (setf dzasum stemp)
56 (return (values dzasum nil nil nil)))))
|
| /dports/science/InsightToolkit/ITK-5.0.1/Modules/ThirdParty/VNL/src/vxl/v3p/netlib/blas/ |
| H A D | dzasum.f | 1 double precision function dzasum(n,zx,incx) function
12 dzasum = 0.0d0
24 dzasum = stemp
32 dzasum = stemp
|
| /dports/science/apbs/apbs-pdb2pqr-apbs-1.5-102-g500c1473/apbs/externals/fetk/punc/src/blas/src_f77/ |
| H A D | dzasum.f | 1 double precision function dzasum(n,zx,incx) function
12 dzasum = 0.0d0
24 dzasum = stemp
32 dzasum = stemp
|
| /dports/math/algae/algae-4.3.6/blas/ |
| H A D | dzasum.f | 1 double precision function dzasum(n,zx,incx) function
12 dzasum = 0.0d0
24 dzasum = stemp
32 dzasum = stemp
|
| /dports/math/libflame/libflame-5.2.0/src/flablas/f2c/ |
| H A D | dzasum.f | 1 double precision function dzasum(n,zx,incx) function
12 dzasum = 0.0d0
24 dzasum = stemp
32 dzasum = stemp
|
| /dports/science/elmerfem/elmerfem-release-9.0/mathlibs/src/blas/ |
| H A D | dzasum.f | 1 double precision function dzasum(n,zx,incx) function
12 dzasum = 0.0d0
24 dzasum = stemp
32 dzasum = stemp
|
| /dports/misc/vxl/vxl-3.3.2/v3p/netlib/blas/ |
| H A D | dzasum.f | 1 double precision function dzasum(n,zx,incx) function
12 dzasum = 0.0d0
24 dzasum = stemp
32 dzasum = stemp
|
| /dports/math/xlife++/xlifepp-sources-v2.0.1-2018-05-09/ext/LAPACKBLAS/CBLAS/src/ |
| H A D | dzasumsub.f | 8 external dzasum
9 double precision dzasum,asum
13 asum=dzasum(n,x,incx)
|
| /dports/math/xlapack/lapack-3.10.0/CBLAS/src/ |
| H A D | dzasumsub.f | 8 external dzasum
9 double precision dzasum,asum
13 asum=dzasum(n,x,incx)
|
| /dports/math/blas/lapack-3.10.0/CBLAS/src/ |
| H A D | dzasumsub.f | 8 external dzasum
9 double precision dzasum,asum
13 asum=dzasum(n,x,incx)
|
| /dports/science/py-dlib/dlib-19.22/dlib/external/cblas/ |
| H A D | dzasumsub.f | 8 external dzasum
9 double precision dzasum,asum local
13 asum=dzasum(n,x,incx)
|
| /dports/math/lapack/lapack-3.10.0/CBLAS/src/ |
| H A D | dzasumsub.f | 8 external dzasum
9 double precision dzasum,asum
13 asum=dzasum(n,x,incx)
|
| /dports/math/lapacke/lapack-3.10.0/CBLAS/src/ |
| H A D | dzasumsub.f | 8 external dzasum
9 double precision dzasum,asum
13 asum=dzasum(n,x,incx)
|
| /dports/math/openblas/OpenBLAS-0.3.18/lapack-netlib/CBLAS/src/ |
| H A D | dzasumsub.f | 8 external dzasum
9 double precision dzasum,asum local
13 asum=dzasum(n,x,incx)
|
| /dports/science/dlib-cpp/dlib-19.22/dlib/external/cblas/ |
| H A D | dzasumsub.f | 8 external dzasum
9 double precision dzasum,asum
13 asum=dzasum(n,x,incx)
|
| /dports/math/cblas/lapack-3.10.0/CBLAS/src/ |
| H A D | dzasumsub.f | 8 external dzasum
9 double precision dzasum,asum
13 asum=dzasum(n,x,incx)
|
| /dports/math/linpack/linpack-1.0_14/ |
| H A D | zpoco.f | 70 double precision anorm,s,dzasum,sm,ynorm
85 z(j) = dcmplx(dzasum(j,a(1,j),1),0.0d0)
145 s = 1.0d0/dzasum(n,z,1)
160 s = 1.0d0/dzasum(n,z,1)
176 s = 1.0d0/dzasum(n,z,1)
194 s = 1.0d0/dzasum(n,z,1)
|
| H A D | zppco.f | 82 double precision anorm,s,dzasum,sm,ynorm
98 z(j) = dcmplx(dzasum(j,ap(j1),1),0.0d0)
167 s = 1.0d0/dzasum(n,z,1)
183 s = 1.0d0/dzasum(n,z,1)
200 s = 1.0d0/dzasum(n,z,1)
219 s = 1.0d0/dzasum(n,z,1)
|
| H A D | zgeco.f | 67 double precision anorm,s,dzasum,sm,ynorm
83 anorm = dmax1(anorm,dzasum(n,a(1,j),1))
139 s = 1.0d0/dzasum(n,z,1)
156 s = 1.0d0/dzasum(n,z,1)
175 s = 1.0d0/dzasum(n,z,1)
194 s = 1.0d0/dzasum(n,z,1)
|
| H A D | zpbco.f | 107 double precision anorm,s,dzasum,sm,ynorm
124 z(j) = dcmplx(dzasum(l,abd(mu,j),1),0.0d0)
190 s = 1.0d0/dzasum(n,z,1)
208 s = 1.0d0/dzasum(n,z,1)
227 s = 1.0d0/dzasum(n,z,1)
248 s = 1.0d0/dzasum(n,z,1)
|
| H A D | zgbco.f | 121 double precision anorm,s,dzasum,sm,ynorm
139 anorm = dmax1(anorm,dzasum(l,abd(is,j),1))
205 s = 1.0d0/dzasum(n,z,1)
223 s = 1.0d0/dzasum(n,z,1)
243 s = 1.0d0/dzasum(n,z,1)
265 s = 1.0d0/dzasum(n,z,1)
|
| H A D | zhico.f | 71 double precision anorm,s,dzasum,ynorm
86 z(j) = dcmplx(dzasum(j,a(1,j),1),0.0d0)
155 s = 1.0d0/dzasum(n,z,1)
178 s = 1.0d0/dzasum(n,z,1)
221 s = 1.0d0/dzasum(n,z,1)
246 s = 1.0d0/dzasum(n,z,1)
|
| H A D | zsico.f | 70 double precision anorm,s,dzasum,ynorm
85 z(j) = dcmplx(dzasum(j,a(1,j),1),0.0d0)
154 s = 1.0d0/dzasum(n,z,1)
177 s = 1.0d0/dzasum(n,z,1)
220 s = 1.0d0/dzasum(n,z,1)
245 s = 1.0d0/dzasum(n,z,1)
|
| H A D | ztrco.f | 57 double precision tnorm,ynorm,s,sm,dzasum
79 tnorm = dmax1(tnorm,dzasum(l,t(i1,j),1))
136 s = 1.0d0/dzasum(n,z,1)
161 s = 1.0d0/dzasum(n,z,1)
|
| H A D | zspco.f | 83 double precision anorm,s,dzasum,ynorm
100 z(j) = dcmplx(dzasum(j,ap(j1),1),0.0d0)
179 s = 1.0d0/dzasum(n,z,1)
206 s = 1.0d0/dzasum(n,z,1)
256 s = 1.0d0/dzasum(n,z,1)
285 s = 1.0d0/dzasum(n,z,1)
|