Next: Purpose Up: Matrix Redistribution/Copy Routines Previous: Fortran Interface

## PxGEMR2D

          SUBROUTINE PSGEMR2D( M, N, A, IA, JA, DESCA, B, IB, JB, DESCB,
         $                     ICTXT )
          INTEGER            IA, IB, ICTXT, JA, JB, M, N
          INTEGER            DESCA( * ), DESCB( * )
          REAL               A( * ), B( * )

          SUBROUTINE PCGEMR2D( M, N, A, IA, JA, DESCA, B, IB, JB, DESCB,
         $                     ICTXT )
          INTEGER            IA, IB, ICTXT, JA, JB, M, N
          INTEGER            DESCA( * ), DESCB( * )
          COMPLEX            A( * ), B( * )

          SUBROUTINE PIGEMR2D( M, N, A, IA, JA, DESCA, B, IB, JB, DESCB,
         $                     ICTXT )
          INTEGER            IA, IB, ICTXT, JA, JB, M, N
          INTEGER            DESCA( * ), DESCB( * )
          INTEGER            A( * ), B( * )