cgerc (3p)

Name

cgerc - perform the rank 1 operation A := alpha*x*conjg( y' ) + A

Synopsis

SUBROUTINE CGERC(M, N, ALPHA, X, INCX, Y, INCY, A, LDA)

COMPLEX ALPHA
COMPLEX X(*), Y(*), A(LDA,*)
INTEGER M, N, INCX, INCY, LDA

SUBROUTINE CGERC_64(M, N, ALPHA, X, INCX, Y, INCY, A, LDA)

COMPLEX ALPHA
COMPLEX X(*), Y(*), A(LDA,*)
INTEGER*8 M, N, INCX, INCY, LDA




F95 INTERFACE
SUBROUTINE GERC(M, N, ALPHA, X, INCX, Y, INCY, A, LDA)

COMPLEX :: ALPHA
COMPLEX, DIMENSION(:) :: X, Y
COMPLEX, DIMENSION(:,:) :: A
INTEGER :: M, N, INCX, INCY, LDA

SUBROUTINE GERC_64(M, N, ALPHA, X, INCX, Y, INCY, A, LDA)

COMPLEX :: ALPHA
COMPLEX, DIMENSION(:) :: X, Y
COMPLEX, DIMENSION(:,:) :: A
INTEGER(8) :: M, N, INCX, INCY, LDA




C INTERFACE
#include <sunperf.h>

void  cgerc(int m, int n, complex *alpha, complex *x, int incx, complex
*y, int incy, complex *a, int lda);

void cgerc_64(long m, long n, complex *alpha, complex  *x,  long  incx,
complex *y, long incy, complex *a, long lda);

Description

Oracle Solaris Studio Performance Library                            cgerc(3P)



NAME
       cgerc - perform the rank 1 operation   A := alpha*x*conjg( y' ) + A


SYNOPSIS
       SUBROUTINE CGERC(M, N, ALPHA, X, INCX, Y, INCY, A, LDA)

       COMPLEX ALPHA
       COMPLEX X(*), Y(*), A(LDA,*)
       INTEGER M, N, INCX, INCY, LDA

       SUBROUTINE CGERC_64(M, N, ALPHA, X, INCX, Y, INCY, A, LDA)

       COMPLEX ALPHA
       COMPLEX X(*), Y(*), A(LDA,*)
       INTEGER*8 M, N, INCX, INCY, LDA




   F95 INTERFACE
       SUBROUTINE GERC(M, N, ALPHA, X, INCX, Y, INCY, A, LDA)

       COMPLEX :: ALPHA
       COMPLEX, DIMENSION(:) :: X, Y
       COMPLEX, DIMENSION(:,:) :: A
       INTEGER :: M, N, INCX, INCY, LDA

       SUBROUTINE GERC_64(M, N, ALPHA, X, INCX, Y, INCY, A, LDA)

       COMPLEX :: ALPHA
       COMPLEX, DIMENSION(:) :: X, Y
       COMPLEX, DIMENSION(:,:) :: A
       INTEGER(8) :: M, N, INCX, INCY, LDA




   C INTERFACE
       #include <sunperf.h>

       void  cgerc(int m, int n, complex *alpha, complex *x, int incx, complex
                 *y, int incy, complex *a, int lda);

       void cgerc_64(long m, long n, complex *alpha, complex  *x,  long  incx,
                 complex *y, long incy, complex *a, long lda);



PURPOSE
       cgerc  performs the rank 1 operation A := alpha*x*conjg( y' ) + A where
       alpha is a scalar, x is an m element vector, y is an n  element  vector
       and A is an m by n matrix.


ARGUMENTS
       M (input)
                 On  entry, M specifies the number of rows of the matrix A.  M
                 >= 0.  Unchanged on exit.


       N (input)
                 On entry, N specifies the number of columns of the matrix  A.
                 N >= 0.  Unchanged on exit.


       ALPHA (input)
                 On  entry,  ALPHA  specifies  the scalar alpha.  Unchanged on
                 exit.


       X (input)
                 ( 1 + ( m - 1 )*abs( INCX ) ).  Before entry, the incremented
                 array  X  must  contain the m element vector x.  Unchanged on
                 exit.


       INCX (input)
                 On entry, INCX specifies the increment for the elements of X.
                 INCX must not be zero.  Unchanged on exit.


       Y (input)
                 ( 1 + ( n - 1 )*abs( INCY ) ).  Before entry, the incremented
                 array Y must contain the n element vector  y.   Unchanged  on
                 exit.


       INCY (input)
                 On entry, INCY specifies the increment for the elements of Y.
                 INCY must not be zero.  Unchanged on exit.


       A (input/output)
                 Before entry, the leading m by n part of  the  array  A  must
                 contain the matrix of coefficients. On exit, A is overwritten
                 by the updated matrix.


       LDA (input)
                 On entry, LDA specifies the first dimension of A as  declared
                 in  the calling (sub) program. LDA >= max( 1, m ).  Unchanged
                 on exit.




                                  7 Nov 2015                         cgerc(3P)