CALL MPI_BCAST(PlCoordArray, SIZE(PlCoordArray), MPI_LONG_DOUBLE, 0, ELMER_COMM_WORLD, ierr) !This one works - SIZE is 30
CALL MPI_BCAST(PlZArray, SIZE(PlZArray), MPI_LONG_DOUBLE, 0, ELMER_COMM_WORLD, ierr) !This one fails - SIZE is 7515
CALL MPI_BCAST(PlMRArray, SIZE(PlMRArray), MPI_LONG_DOUBLE, 0, ELMER_COMM_WORLD, ierr) !This one presumably fails

!I've tried messing around with the counts and data types, but doesn't seem to make any difference.