memoryblocksize() [2/2]

Int memoryblocksize

(

MDESC *

a

)

Definition at line 173 of file pgemraux.c.

{
  Int   myprow, mypcol, p, q;
  /* Compute the (myprow,mypcol) indices of processor mypnum in P0xQ0 We
   * assume the row-major ordering of the BLACS */
  Cblacs_gridinfo(a->ctxt, &p, &q, &myprow, &mypcol);
  myprow = SHIFT(myprow, a->sprow, p);
  mypcol = SHIFT(mypcol, a->spcol, q);
  assert(myprow >= 0 && mypcol >= 0);
  return localsize(myprow, p, a->nbrow, a->m) *
        localsize(mypcol, q, a->nbcol, a->n);
}

Here is the call graph for this function: