n style="color: #a020f0;">call</span> <span style="color: #0000ff;">do_transfers_dp</span>(commsnnz,data1,data2, <span style="color: #a020f0;">&amp;</span>
          g1,g2,bridge_comm)
  <span style="color: #a020f0;">enddo</span>
  <span style="color: #a020f0;">nullify</span>(data1,data2)
  <span style="color: #a020f0;">if</span> (myid == 0) <span style="color: #a020f0;">print</span> *, <span style="color: #8b2252;">"Done transfers."</span>

  <span style="color: #a020f0;">deallocate</span>(commsnnz)
  <spa