NAME

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


SYNOPSIS

  SUBROUTINE ZSYMM( SIDE, UPLO, M, N, ALPHA, A, LDA, B, LDB, BETA, C, 
 *      LDC)
  CHARACTER * 1 SIDE, UPLO
  DOUBLE COMPLEX ALPHA, BETA
  DOUBLE COMPLEX A(LDA,*), B(LDB,*), C(LDC,*)
  INTEGER M, N, LDA, LDB, LDC
  SUBROUTINE ZSYMM_64( SIDE, UPLO, M, N, ALPHA, A, LDA, B, LDB, BETA, 
 *      C, LDC)
  CHARACTER * 1 SIDE, UPLO
  DOUBLE COMPLEX ALPHA, BETA
  DOUBLE 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(8) :: ALPHA, BETA
  COMPLEX(8), 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(8) :: ALPHA, BETA
  COMPLEX(8), DIMENSION(:,:) :: A, B, C
  INTEGER(8) :: M, N, LDA, LDB, LDC

C INTERFACE

#include <sunperf.h>

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

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


PURPOSE

zsymm 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