NAME

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


SYNOPSIS

  SUBROUTINE SSYMM( SIDE, UPLO, M, N, ALPHA, A, LDA, B, LDB, BETA, C, 
 *      LDC)
  CHARACTER * 1 SIDE, UPLO
  INTEGER M, N, LDA, LDB, LDC
  REAL ALPHA, BETA
  REAL A(LDA,*), B(LDB,*), C(LDC,*)
  SUBROUTINE SSYMM_64( SIDE, UPLO, M, N, ALPHA, A, LDA, B, LDB, BETA, 
 *      C, LDC)
  CHARACTER * 1 SIDE, UPLO
  INTEGER*8 M, N, LDA, LDB, LDC
  REAL ALPHA, BETA
  REAL A(LDA,*), B(LDB,*), C(LDC,*)

F95 INTERFACE

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

C INTERFACE

#include <sunperf.h>

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

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


PURPOSE

ssymm 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