Museum

Home

Lab Overview

Retrotechnology Articles

Online Manuals

⇒ crot(l) — FORTRAN 5.3

Media Vault

Software Library

Restoration Projects

Artifacts Sought

CROT(l)  —  LAPACK auxiliary routine (version 2.0)

NAME

CROT - applie a plane rotation, where the cos (C) is real and the sin (S) is complex, and the vectors CX and CY are complex

SYNOPSIS

SUBROUTINE CROT(
N, CX, INCX, CY, INCY, C, S )

INTEGER INCX, INCY, N

REAL C

COMPLEX S

COMPLEX CX( ∗ ), CY( ∗ )

PURPOSE

CROT   applies a plane rotation, where the cos (C) is real and the sin (S) is complex, and the vectors CX and CY are complex. 
 

ARGUMENTS

N       (input) INTEGER
The number of elements in the vectors CX and CY.

CX      (input/output) COMPLEX array, dimension (N)
On input, the vector X. On output, CX is overwritten with C∗X + S∗Y.

INCX    (input) INTEGER
The increment between successive values of CY.  INCX <> 0.

CY      (input/output) COMPLEX array, dimension (N)
On input, the vector Y. On output, CY is overwritten with -CONJG(S)∗X + C∗Y.

INCY    (input) INTEGER
The increment between successive values of CY.  INCX <> 0.

C       (input) REAL
S       (input) COMPLEX C and S define a rotation [  C          S  ] [ -conjg(S)   C  ] where C∗C + S∗CONJG(S) = 1.0.

  —  LAPACK version 2.0  —  08 October 1994

Typewritten Software • bear@typewritten.org • Edmonds, WA 98026