From 4978d60f41fd44258fb703b1cc7d9fd957501fad Mon Sep 17 00:00:00 2001
From: Ed Hartnett <edwardjameshartnett@gmail.com>
Date: Wed, 6 Feb 2019 12:46:49 -0700
Subject: [PATCH] removed mpi_scatter from only clause of use statement, which
 causes gfortran to error

---
 tests/general/pio_decomp_tests_1d.F90.in | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/tests/general/pio_decomp_tests_1d.F90.in b/tests/general/pio_decomp_tests_1d.F90.in
index db0cd0ad741..528ce3de046 100644
--- a/tests/general/pio_decomp_tests_1d.F90.in
+++ b/tests/general/pio_decomp_tests_1d.F90.in
@@ -316,7 +316,7 @@ PIO_TF_AUTO_TEST_SUB_END nc_wr_1d_bc_with_holes
 
 PIO_TF_TEMPLATE<PIO_TF_PREDEF_TYPENAME PIO_TF_DATA_TYPE, PIO_TF_PREDEF_TYPENAME PIO_TF_FC_DATA_TYPE>
 PIO_TF_AUTO_TEST_SUB_BEGIN nc_wr_1d_bc_random
-  use mpi, only : MPI_INT, MPI_SCATTER
+  use mpi, only : MPI_INT
   implicit none
   type(var_desc_t)  :: pio_var1, pio_var2
   type(file_desc_t) :: pio_file