From dd795d29031bc54a8c42ac9dce882642825a4faf Mon Sep 17 00:00:00 2001 From: julie Date: Wed, 13 Apr 2011 16:30:39 +0000 Subject: Upadte header for the modified routine for the 3.3.1 release --- SRC/slasd4.f | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) (limited to 'SRC/slasd4.f') diff --git a/SRC/slasd4.f b/SRC/slasd4.f index ab3f70e6..ed614458 100644 --- a/SRC/slasd4.f +++ b/SRC/slasd4.f @@ -1,9 +1,9 @@ SUBROUTINE SLASD4( N, I, D, Z, DELTA, RHO, SIGMA, WORK, INFO ) * -* -- LAPACK auxiliary routine (version 3.3.0) -- +* -- LAPACK auxiliary routine (version 3.3.1) -- * -- LAPACK is a software package provided by Univ. of Tennessee, -- * -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- -* November 2010 +* -- April 2011 -- * * .. Scalar Arguments .. INTEGER I, INFO, N -- cgit v1.2.3