--- rpl/lapack/lapack/dla_gerfsx_extended.f 2020/05/21 21:45:57 1.16 +++ rpl/lapack/lapack/dla_gerfsx_extended.f 2023/08/07 08:38:52 1.17 @@ -53,7 +53,7 @@ *> In addition to normwise error bound, the code provides maximum *> componentwise error bound if possible. See comments for ERRS_N *> and ERRS_C for details of the error bounds. Note that this -*> subroutine is only resonsible for setting the second fields of +*> subroutine is only responsible for setting the second fields of *> ERRS_N and ERRS_C. *> \endverbatim * @@ -355,7 +355,7 @@ *> DZ_UB is DOUBLE PRECISION *> Determines when to start considering componentwise convergence. *> Componentwise convergence is only considered after each component -*> of the solution Y is stable, which we definte as the relative +*> of the solution Y is stable, which we define as the relative *> change in each component being less than DZ_UB. The default value *> is 0.25, requiring the first bit to be stable. See LAWN 165 for *> more details. @@ -384,8 +384,6 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \date June 2017 -* *> \ingroup doubleGEcomputational * * ===================================================================== @@ -396,10 +394,9 @@ $ Y_TAIL, RCOND, ITHRESH, RTHRESH, $ DZ_UB, IGNORE_CWISE, INFO ) * -* -- LAPACK computational routine (version 3.7.1) -- +* -- LAPACK computational routine -- * -- LAPACK is a software package provided by Univ. of Tennessee, -- * -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- -* June 2017 * * .. Scalar Arguments .. INTEGER INFO, LDA, LDAF, LDB, LDY, N, NRHS, PREC_TYPE, @@ -682,4 +679,7 @@ END DO * RETURN +* +* End of DLA_GERFSX_EXTENDED +* END