ScaLAPACK 2.1  2.1
ScaLAPACK: Scalable Linear Algebra PACKage
indxg2p.f
Go to the documentation of this file.
1  INTEGER FUNCTION indxg2p( INDXGLOB, NB, IPROC, ISRCPROC, NPROCS )
2 *
3 * -- ScaLAPACK tools routine (version 1.7) --
4 * University of Tennessee, Knoxville, Oak Ridge National Laboratory,
5 * and University of California, Berkeley.
6 * May 1, 1997
7 *
8 * .. Scalar Arguments ..
9  INTEGER indxglob, iproc, isrcproc, nb, nprocs
10 * ..
11 *
12 * Purpose
13 * =======
14 *
15 * INDXG2P computes the process coordinate which posseses the entry of a
16 * distributed matrix specified by a global index INDXGLOB.
17 *
18 * Arguments
19 * =========
20 *
21 * INDXGLOB (global input) INTEGER
22 * The global index of the element.
23 *
24 * NB (global input) INTEGER
25 * Block size, size of the blocks the distributed matrix is
26 * split into.
27 *
28 * IPROC (local dummy) INTEGER
29 * Dummy argument in this case in order to unify the calling
30 * sequence of the tool-routines.
31 *
32 * ISRCPROC (global input) INTEGER
33 * The coordinate of the process that possesses the first
34 * row/column of the distributed matrix.
35 *
36 * NPROCS (global input) INTEGER
37 * The total number processes over which the matrix is
38 * distributed.
39 *
40 * =====================================================================
41 *
42 * .. Intrinsic Functions ..
43  INTRINSIC mod
44 * ..
45 * .. Executable Statements ..
46 *
47  indxg2p = mod( isrcproc + (indxglob - 1) / nb, nprocs )
48 *
49  RETURN
50 *
51 * End of INDXG2P
52 *
53  END
indxg2p
integer function indxg2p(INDXGLOB, NB, IPROC, ISRCPROC, NPROCS)
Definition: indxg2p.f:2