exes</span>

  <span style="color: #a020f0;">allocate</span>(commsnnz(<span style="color: #a020f0;">size</span>(comms)))
  <span style="color: #a020f0;">do</span> i = 1, <span style="color: #a020f0;">size</span>(comms)
     c =&gt; comms(i)
     cnnz =&gt; commsnnz(i)

     cnnz%src = c%src
     cnnz%dst = c%dst
     <span style="color: #a020f0;">if</span> (myrank1 == c%src) <span style="color: #a020f0;">then</span>
        <span style="color: #b22222;">! </span><span style="color: #b22222;">Starting positi