fortran-lapack
|
! More...
Public Member Functions | |
pure subroutine | classq (n, x, incx, scl, sumsq) |
la_classq | |
pure subroutine | dlassq (n, x, incx, scl, sumsq) |
la_dlassq | |
la_qlassq | |
pure subroutine | slassq (n, x, incx, scl, sumsq) |
la_slassq | |
la_wlassq | |
pure subroutine | zlassq (n, x, incx, scl, sumsq) |
la_zlassq | |
!
LASSQ: returns the values scl and smsq such that ( scl**2 )*smsq = x( 1 )**2 +...+ x( n )**2 + ( scale**2 )*sumsq, where x( i ) = X( 1 + ( i - 1 )*INCX ). The value of sumsq is assumed to be non-negative. scale and sumsq must be supplied in SCALE and SUMSQ and scl and smsq are overwritten on SCALE and SUMSQ respectively. If scale * sqrt( sumsq ) > tbig then we require: scale >= sqrt( TINY*EPS ) / sbig on entry, and if 0 < scale * sqrt( sumsq ) < tsml then we require: scale <= sqrt( HUGE ) / ssml on entry, where tbig – upper threshold for values whose square is representable; sbig – scaling constant for big numbers;
pure subroutine la_lapack::lassq::classq | ( | integer(ilp), intent(in) | n, |
complex(sp), dimension(*), intent(in) | x, | ||
integer(ilp), intent(in) | incx, | ||
real(sp), intent(inout) | scl, | ||
real(sp), intent(inout) | sumsq | ||
) |
pure subroutine la_lapack::lassq::dlassq | ( | integer(ilp), intent(in) | n, |
real(dp), dimension(*), intent(in) | x, | ||
integer(ilp), intent(in) | incx, | ||
real(dp), intent(inout) | scl, | ||
real(dp), intent(inout) | sumsq | ||
) |
la_lapack::lassq::la_classq |
la_lapack::lassq::la_dlassq |
la_lapack::lassq::la_qlassq |
la_lapack::lassq::la_slassq |
la_lapack::lassq::la_wlassq |
la_lapack::lassq::la_zlassq |
pure subroutine la_lapack::lassq::slassq | ( | integer(ilp), intent(in) | n, |
real(sp), dimension(*), intent(in) | x, | ||
integer(ilp), intent(in) | incx, | ||
real(sp), intent(inout) | scl, | ||
real(sp), intent(inout) | sumsq | ||
) |
pure subroutine la_lapack::lassq::zlassq | ( | integer(ilp), intent(in) | n, |
complex(dp), dimension(*), intent(in) | x, | ||
integer(ilp), intent(in) | incx, | ||
real(dp), intent(inout) | scl, | ||
real(dp), intent(inout) | sumsq | ||
) |