DGESDD from Lapack for R-1.4.0?

Hi,

I'm just wondering if it is planned to include the Lapack
routine DGESDD (and friends) in R-1.4.0?  This is faster
(supposedly by a factor of ~6 for large matrices) than
DGESVD which is currently (R-1.3.1) called by La.svd.

And if it is not in the plans yet, is there a chance it
could be?  I've added it to my local version of R-1.3.1 and

so far see a factor of 4 improvement over La.svd and a
factor of 3 over svd (see output below).  I'd be glad to
hand off what I've done so far to someone else or to work
more on it (make it behave as svd and La.svd do if you don't
want all the singular vectors; and add ZGESDD also).
Though what I've done so far would probably be trivial for
someone who knew what they were doing...

Mac G4, 450 MHz, LinuxPPC, pre-compiled ATLAS-3.2.1
libraries for G4 from www.netlib.org, R-1.3.1:

m <- matrix(rnorm(25e4), 5e2, 5e2)
system.time(svd(m))

[1] 22.31  0.10 23.01  0.00  0.00

system.time(La.svd(m))

[1] 29.60  0.10 29.78  0.00  0.00

system.time(La.sdd(m))

[1] 7.28 0.12 8.00 0.00 0.00

m <- matrix(rnorm(25e4), 5e2, 5e2)
system.time(svd(m))

system.time(La.svd(m))

system.time(svd(m))

system.time(La.svd(m))