MAN page from openSUSE Leap 42 blas-man-3.5.0-9.1.noarch.rpm
crotg.f
Section: LAPACK (3)
Updated: Fri Nov 4 2016
Index NAME
crotg.f -
SYNOPSIS
Functions/Subroutines
subroutine CROTG (CA, CB, C, S)
CROTG
Function/Subroutine Documentation
subroutine CROTG (complex CA, complex CB, real C, complex S)
CROTG
Purpose:
CROTG determines a complex Givens rotation.
Author:
- Univ. of Tennessee
Univ. of California Berkeley
Univ. of Colorado Denver
NAG Ltd.
Date:
- November 2011
Definition at line 41 of file crotg.f.
41 *42 * -- Reference BLAS level1 routine (version 3.4.0) --43 * -- Reference BLAS is a software package provided by Univ. of Tennessee, --44 * -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..--45 * November 201146 *47 * .. Scalar Arguments ..48 COMPLEX ca,cb,s49 REAL c50 * ..51 *52 * =====================================================================53 *54 * .. Local Scalars ..55 COMPLEX alpha56 REAL norm,scale57 * ..58 * .. Intrinsic Functions ..59 INTRINSIC cabs,conjg,sqrt60 * ..61 IF (cabs(ca).EQ.0.) THEN62 c = 0.63 s = (1.,0.)64 ca = cb65 ELSE66 scale = cabs(ca) + cabs(cb)67 norm = scale*sqrt((cabs(ca/scale))**2+ (cabs(cb/scale))**2)68 alpha = ca/cabs(ca)69 c = cabs(ca)/norm70 s = alpha*conjg(cb)/norm71 ca = alpha*norm72 END IF73 RETURN
Author
Generated automatically by Doxygen for LAPACK from the source code.
Index
- NAME
- SYNOPSIS
- Functions/Subroutines
- Function/Subroutine Documentation
- subroutine CROTG (complex CA, complex CB, real C, complex S)
- Author
This document was created byman2html,using the manual pages.