: #a0522d;"> basegroup, nsize1, nsize2, ierr</span>
     <span style="color: #228b22;">integer</span>, <span style="color: #a020f0;">allocatable</span>    ::<span style="color: #a0522d;"> comm_rank1(:), comm_rank2(:)</span>


     <span style="color: #228b22;">integer</span> ::<span style="color: #a0522d;"> ncomms</span>
     <span style="color: #228b22;">integer</span> ::<span style="color: #a0522d;"> i</span>
     <span style="color: #228b22;">integer</span> ::<span style="color: #a0522d;"> nrecvs_local, 