Next: Purpose Up: Matrix Redistribution/Copy Routines Previous: Arguments

## PxTRMR2D

          SUBROUTINE PSTRMR2D( UPLO, DIAG, M, N, A, IA, JA, DESCA, B, IB,
         $                     JB, DESCB, ICTXT )
          CHARACTER          DIAG, UPLO
          INTEGER            IA, IB, ICTXT, JA, JB, M, N
          INTEGER            DESCA( * ), DESCB( * )
          REAL               A( * ), B( * )

          SUBROUTINE PCTRMR2D( UPLO, DIAG, M, N, A, IA, JA, DESCA, B, IB,
         $                     JB, DESCB, ICTXT )
          CHARACTER          DIAG, UPLO
          INTEGER            IA, IB, ICTXT, JA, JB, M, N
          INTEGER            DESCA( * ), DESCB( * )
          COMPLEX            A( * ), B( * )

          SUBROUTINE PITRMR2D( UPLO, DIAG, M, N, A, IA, JA, DESCA, B, IB,
         $                     JB, DESCB, ICTXT )
          CHARACTER          DIAG, UPLO
          INTEGER            IA, IB, ICTXT, JA, JB, M, N
          INTEGER            DESCA( * ), DESCB( * )
          INTEGER            A( * ), B( * )