In-place transpose of a general square matrix

SGETRA/DGETRA/CGETRA/ZGETRA

Name

SGETRA/DGETRA/CGETRA/ZGETRA

 

In-place transpose of a general square matrix

Purpose

These subprograms overwrite an n by n matrix A with its transpose.

Usage

VECLIB:

 

 

INTEGER*4

n, lda

 

REAL*4

a(lda, n)

 

CALL SGETRA(n, a, lda)

 

INTEGER*4

n, lda

 

REAL*8

a(lda, n)

 

CALL DGETRA(n, a, lda)

 

CHARACTER*1

trans

 

INTEGER*4

n, lda

 

COMPLEX*8

a(lda, n)

 

CALL CGETRA(trans, n, a, lda)

 

CHARACTER*1

trans

 

INTEGER*4

n, lda

 

COMPLEX*16

a(lda, n)

 

CALL ZGETRA(trans, n, a, lda)

 

VECLIB8:

 

 

INTEGER*8

n, lda

 

REAL*4

a(lda, n)

 

CALL SGETRA(n, a, lda)

 

INTEGER*8

n, lda

 

REAL*8

a(lda, n)

 

CALL DGETRA(n, a, lda)

 

CHARACTER*1

trans

 

INTEGER*8

n, lda

 

COMPLEX*8

a(lda, n)

 

CALL CGETRA(trans, n, a, lda)

 

CHARACTER*1

trans

 

INTEGER*8

n, lda

 

COMPLEX*16

a(lda, n)

 

CALL ZGETRA(trans, n, a, lda)

Input

trans

Transposition option for A:

Chapter 3 Basic Matrix Operations 241