diff options
author | Jean-Marc Zucconi <jmz@FreeBSD.org> | 2006-02-07 21:25:05 +0000 |
---|---|---|
committer | Jean-Marc Zucconi <jmz@FreeBSD.org> | 2006-02-07 21:25:05 +0000 |
commit | 7317500b7a888739fabce7a6daeeb20e925ac50f (patch) | |
tree | 216c79acdd0cc7a72b61aebdd1ba122c5ec94c81 /math/lapack/files/patch-ad | |
parent | - Update to 1.28 (diff) |
Don't build the included blas library and add a dependency on math/blas.
This port conflicts with math/atlas.
Problem pointed out by: Pedro F. Giffuni
Diffstat (limited to 'math/lapack/files/patch-ad')
-rw-r--r-- | math/lapack/files/patch-ad | 22 |
1 files changed, 0 insertions, 22 deletions
diff --git a/math/lapack/files/patch-ad b/math/lapack/files/patch-ad deleted file mode 100644 index d88b6f107fd7..000000000000 --- a/math/lapack/files/patch-ad +++ /dev/null @@ -1,22 +0,0 @@ -*** BLAS/SRC/zrotg.f~ Fri Oct 30 21:09:39 1992 ---- BLAS/SRC/zrotg.f Mon Jul 3 01:28:54 1995 -*************** -*** 10,17 **** - go to 20 - 10 continue - scale = cdabs(ca) + cdabs(cb) -! norm = scale*dsqrt((cdabs(ca/dcmplx(scale,0.0d0)))**2 + -! * (cdabs(cb/dcmplx(scale,0.0d0)))**2) - alpha = ca /cdabs(ca) - c = cdabs(ca) / norm - s = alpha * dconjg(cb) / norm ---- 10,18 ---- - go to 20 - 10 continue - scale = cdabs(ca) + cdabs(cb) -! c = (cdabs(ca/dcmplx(scale,0.0d0)))**2 + -! * (cdabs(cb/dcmplx(scale,0.0d0)))**2 -! norm = scale*dsqrt(c) - alpha = ca /cdabs(ca) - c = cdabs(ca) / norm - s = alpha * dconjg(cb) / norm |