NAME

csymm - perform one of the matrix-matrix operations C := alpha*A*B + beta*C or C := alpha*B*A + beta*C


SYNOPSIS

  SUBROUTINE CSYMM( SIDE, UPLO, M, N, ALPHA, A, LDA, B, LDB, BETA, C, 
 *      LDC)
  CHARACTER * 1 SIDE, UPLO
  COMPLEX ALPHA, BETA
  COMPLEX A(LDA,*), B(LDB,*), C(LDC,*)
  INTEGER M, N, LDA, LDB, LDC
  SUBROUTINE CSYMM_64( SIDE, UPLO, M, N, ALPHA, A, LDA, B, LDB, BETA, 
 *      C, LDC)
  CHARACTER * 1 SIDE, UPLO
  COMPLEX ALPHA, BETA
  COMPLEX A(LDA,*), B(LDB,*), C(LDC,*)
  INTEGER*8 M, N, LDA, LDB, LDC

F95 INTERFACE

  SUBROUTINE SYMM( SIDE, UPLO, [M], [N], ALPHA, A, [LDA], B, [LDB], 
 *       BETA, C, [LDC])
  CHARACTER(LEN=1) :: SIDE, UPLO
  COMPLEX :: ALPHA, BETA
  COMPLEX, DIMENSION(:,:) :: A, B, C
  INTEGER :: M, N, LDA, LDB, LDC
  SUBROUTINE SYMM_64( SIDE, UPLO, [M], [N], ALPHA, A, [LDA], B, [LDB], 
 *       BETA, C, [LDC])
  CHARACTER(LEN=1) :: SIDE, UPLO
  COMPLEX :: ALPHA, BETA
  COMPLEX, DIMENSION(:,:) :: A, B, C
  INTEGER(8) :: M, N, LDA, LDB, LDC

C INTERFACE

#include <sunperf.h>

void csymm(char side, char uplo, int m, int n, complex alpha, complex *a, int lda, complex *b, int ldb, complex beta, complex *c, int ldc);

void csymm_64(char side, char uplo, long m, long n, complex alpha, complex *a, long lda, complex *b, long ldb, complex beta, complex *c, long ldc);


PURPOSE

csymm performs one of the matrix-matrix operations C := alpha*A*B + beta*C or C := alpha*B*A + beta*C where alpha and beta are scalars, A is a symmetric matrix and B and C are m by n matrices.


ARGUMENTS