!HPF$ PROCESSORS p(2, 2)

      !HPF$ DISTRIBUTE (BLOCK, BLOCK) ONTO p :: source, target