.TH "lasq5" 3 "Wed Feb 7 2024 11:30:40" "Version 3.12.0" "LAPACK" \" -*- nroff -*- .ad l .nh .SH NAME lasq5 \- lasq5: dqds step .SH SYNOPSIS .br .PP .SS "Functions" .in +1c .ti -1c .RI "subroutine \fBdlasq5\fP (i0, n0, z, pp, tau, sigma, dmin, dmin1, dmin2, dn, dnm1, dnm2, ieee, eps)" .br .RI "\fBDLASQ5\fP computes one dqds transform in ping-pong form\&. Used by sbdsqr and sstegr\&. " .ti -1c .RI "subroutine \fBslasq5\fP (i0, n0, z, pp, tau, sigma, dmin, dmin1, dmin2, dn, dnm1, dnm2, ieee, eps)" .br .RI "\fB SLASQ5 computes one dqds transform in ping-pong form\&. Used by sbdsqr and sstegr\&. \fP " .in -1c .SH "Detailed Description" .PP .SH "Function Documentation" .PP .SS "subroutine dlasq5 (integer i0, integer n0, double precision, dimension( * ) z, integer pp, double precision tau, double precision sigma, double precision dmin, double precision dmin1, double precision dmin2, double precision dn, double precision dnm1, double precision dnm2, logical ieee, double precision eps)" .PP \fBDLASQ5\fP computes one dqds transform in ping-pong form\&. Used by sbdsqr and sstegr\&. .PP \fBPurpose:\fP .RS 4 .PP .nf DLASQ5 computes one dqds transform in ping-pong form, one version for IEEE machines another for non IEEE machines\&. .fi .PP .RE .PP \fBParameters\fP .RS 4 \fII0\fP .PP .nf I0 is INTEGER First index\&. .fi .PP .br \fIN0\fP .PP .nf N0 is INTEGER Last index\&. .fi .PP .br \fIZ\fP .PP .nf Z is DOUBLE PRECISION array, dimension ( 4*N ) Z holds the qd array\&. EMIN is stored in Z(4*N0) to avoid an extra argument\&. .fi .PP .br \fIPP\fP .PP .nf PP is INTEGER PP=0 for ping, PP=1 for pong\&. .fi .PP .br \fITAU\fP .PP .nf TAU is DOUBLE PRECISION This is the shift\&. .fi .PP .br \fISIGMA\fP .PP .nf SIGMA is DOUBLE PRECISION This is the accumulated shift up to this step\&. .fi .PP .br \fIDMIN\fP .PP .nf DMIN is DOUBLE PRECISION Minimum value of d\&. .fi .PP .br \fIDMIN1\fP .PP .nf DMIN1 is DOUBLE PRECISION Minimum value of d, excluding D( N0 )\&. .fi .PP .br \fIDMIN2\fP .PP .nf DMIN2 is DOUBLE PRECISION Minimum value of d, excluding D( N0 ) and D( N0-1 )\&. .fi .PP .br \fIDN\fP .PP .nf DN is DOUBLE PRECISION d(N0), the last value of d\&. .fi .PP .br \fIDNM1\fP .PP .nf DNM1 is DOUBLE PRECISION d(N0-1)\&. .fi .PP .br \fIDNM2\fP .PP .nf DNM2 is DOUBLE PRECISION d(N0-2)\&. .fi .PP .br \fIIEEE\fP .PP .nf IEEE is LOGICAL Flag for IEEE or non IEEE arithmetic\&. .fi .PP .br \fIEPS\fP .PP .nf EPS is DOUBLE PRECISION This is the value of epsilon used\&. .fi .PP .RE .PP \fBAuthor\fP .RS 4 Univ\&. of Tennessee .PP Univ\&. of California Berkeley .PP Univ\&. of Colorado Denver .PP NAG Ltd\&. .RE .PP .SS "subroutine slasq5 (integer i0, integer n0, real, dimension( * ) z, integer pp, real tau, real sigma, real dmin, real dmin1, real dmin2, real dn, real dnm1, real dnm2, logical ieee, real eps)" .PP \fB SLASQ5 computes one dqds transform in ping-pong form\&. Used by sbdsqr and sstegr\&. \fP .PP \fBPurpose:\fP .RS 4 .PP .nf SLASQ5 computes one dqds transform in ping-pong form, one version for IEEE machines another for non IEEE machines\&. .fi .PP .RE .PP \fBParameters\fP .RS 4 \fII0\fP .PP .nf I0 is INTEGER First index\&. .fi .PP .br \fIN0\fP .PP .nf N0 is INTEGER Last index\&. .fi .PP .br \fIZ\fP .PP .nf Z is REAL array, dimension ( 4*N ) Z holds the qd array\&. EMIN is stored in Z(4*N0) to avoid an extra argument\&. .fi .PP .br \fIPP\fP .PP .nf PP is INTEGER PP=0 for ping, PP=1 for pong\&. .fi .PP .br \fITAU\fP .PP .nf TAU is REAL This is the shift\&. .fi .PP .br \fISIGMA\fP .PP .nf SIGMA is REAL This is the accumulated shift up to this step\&. .fi .PP .br \fIDMIN\fP .PP .nf DMIN is REAL Minimum value of d\&. .fi .PP .br \fIDMIN1\fP .PP .nf DMIN1 is REAL Minimum value of d, excluding D( N0 )\&. .fi .PP .br \fIDMIN2\fP .PP .nf DMIN2 is REAL Minimum value of d, excluding D( N0 ) and D( N0-1 )\&. .fi .PP .br \fIDN\fP .PP .nf DN is REAL d(N0), the last value of d\&. .fi .PP .br \fIDNM1\fP .PP .nf DNM1 is REAL d(N0-1)\&. .fi .PP .br \fIDNM2\fP .PP .nf DNM2 is REAL d(N0-2)\&. .fi .PP .br \fIIEEE\fP .PP .nf IEEE is LOGICAL Flag for IEEE or non IEEE arithmetic\&. .fi .PP .br \fIEPS\fP .PP .nf EPS is REAL This is the value of epsilon used\&. .fi .PP .RE .PP \fBAuthor\fP .RS 4 Univ\&. of Tennessee .PP Univ\&. of California Berkeley .PP Univ\&. of Colorado Denver .PP NAG Ltd\&. .RE .PP .SH "Author" .PP Generated automatically by Doxygen for LAPACK from the source code\&.