Developer Reference for Intel® oneAPI Math Kernel Library for Fortran

ID 766686
Date 11/07/2023
Public

A newer version of this document is available. Customers should click here to go to the newest version.

Document Table of Contents

p?lacp3

Copies from a global parallel array into a local replicated array or vice versa.

Syntax

call pslacp3(m, i, a, desca, b, ldb, ii, jj, rev)

call pdlacp3(m, i, a, desca, b, ldb, ii, jj, rev)

call pclacp3(m, i, a, desca, b, ldb, ii, jj, rev)

call pzlacp3(m, i, a, desca, b, ldb, ii, jj, rev)

Description

This is an auxiliary routine that copies from a global parallel array into a local replicated array or vise versa. Note that the entire submatrix that is copied gets placed on one node or more. The receiving node can be specified precisely, or all nodes can receive, or just one row or column of nodes.

Product and Performance Information

Performance varies by use, configuration and other factors. Learn more at www.Intel.com/PerformanceIndex.

Notice revision #20201201

Input Parameters

m

(global) INTEGER.

m is the order of the square submatrix that is copied.

m 0. Unchanged on exit.

i

(global) INTEGER. A(i, i) is the global location that the copying starts from. Unchanged on exit.

a

(local) REAL for pslacp3

DOUBLE PRECISION for pdlacp3

COMPLEX for pclacp3

DOUBLE COMPLEX for pzlacp3

Array of size (lld_a,LOCc(n_a)). On entry, the parallel matrix to be copied into or from.

desca

(global and local) INTEGER array of size dlen_. The array descriptor for the distributed matrix A.

b

(local)

REAL for pslacp3

DOUBLE PRECISION for pdlacp3

COMPLEX for pclacp3

DOUBLE COMPLEX for pzlacp3

Array of size (lld_b,LOCc(m)). If rev = 0, this is the global portion of the matrix A(i:i+m-1, i:i+m-1). If rev = 1, this is unchanged on exit.

ldb

(local)

INTEGER.

The leading dimension of B.

ii, jj

(global) INTEGER. By using rev 0 and 1, data can be sent out and returned again. If rev = 0, then ii is destination row index and jj is destination column index for the node(s) receiving the replicated B. If ii 0, jj 0, then node (ii, jj) receives the data. If ii = -1, jj 0, then all rows in column jj receive the data. If ii 0, jj = -1, then all cols in row ii receive the data. If ii = -1, jj = -1, then all nodes receive the data. If rev !=0, then ii is the source row index for the node(s) sending the replicated B.

rev

(global) INTEGER. Use rev = 0 to send global A into locally replicated B (on node (ii, jj)). Use rev != 0 to send locally replicated B from node (ii, jj) to its owner (which changes depending on its location in A) into the global A.

Output Parameters

a

On exit, if rev = 1, the copied data. Unchanged on exit if rev = 0.

b

If rev = 1, this is unchanged on exit.

See Also