an style="color: #a020f0;">dimension</span>(:), <span style="color: #a020f0;">pointer</span>  ::<span style="color: #a0522d;"> data1 =&gt; null(), data2 =&gt; null()</span>

  <span style="color: #228b22;">integer</span>, <span style="color: #a020f0;">allocatable</span> ::<span style="color: #a0522d;"> ranks1(:), ranks2(:)</span>

  <span style="color: #b22222;">! </span><span style="color: #b22222;">The communicators are a sanity check on the ranks</span>

  <span style="color: #a020f0;">call</span> <span 