openmpi/ompi/mpi/fortran/use-mpi-f08/tests/print_array.c

#include <stdio.h>

void print_array(int * A, int count)
{
   int i;
   for (i = 0; i < count; i++) {
      printf("%d ", A[i]);
   }
   printf("\n");
}