nsends_local</span>
     <span style="color: #228b22;">integer</span>, <span style="color: #a020f0;">allocatable</span> ::<span style="color: #a0522d;"> statuses(:,:), local_reqR(:), local_reqS(:)</span>
     <span style="color: #228b22;">integer</span> ::<span style="color: #a0522d;"> src_in_comm, dst_in_comm</span>
     <span style="color: #228b22;">integer</span> ::<span style="color: #a0522d;"> myrank1, myrank2, myid</span>
     <span style="color: #228b22;">type(comm_t)</span>, <span style="color: #a02