test_fms/diag_manager/test_time_sum.sh

   1 #!/bin/sh
   2
   3 #***********************************************************************
   4 #*                   GNU Lesser General Public License
   5 #*
   6 #* This file is part of the GFDL Flexible Modeling System (FMS).
   7 #*
   8 #* FMS is free software: you can redistribute it and/or modify it under
   9 #* the terms of the GNU Lesser General Public License as published by
  10 #* the Free Software Foundation, either version 3 of the License, or (at
  11 #* your option) any later version.
  12 #*
  13 #* FMS is distributed in the hope that it will be useful, but WITHOUT
  14 #* ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or
  15 #* FITNESS FOR A PARTICULAR PURPOSE.  See the GNU General Public License
  16 #* for more details.
  17 #*
  18 #* You should have received a copy of the GNU Lesser General Public
  19 #* License along with FMS.  If not, see <http://www.gnu.org/licenses/>.
  20 #***********************************************************************
  21
  22 # Set common test settings.
  23 . ../test-lib.sh
  24
  25 if [ -z "${skipflag}" ]; then
  26 # create and enter directory for in/output files
  27 output_dir
  28
  29 cat <<_EOF > diag_table.yaml
  30 title: test_sum
  31 base_date: 2 1 1 0 0 0
  32 diag_files:
  33 - file_name: test_sum
  34   time_units: hours
  35   unlimdim: time
  36   freq: 6 hours
  37   varlist:
  38   - module: ocn_mod
  39     var_name: var0
  40     output_name: var0_sum
  41     reduction: sum
  42     kind: r4
  43   - module: ocn_mod
  44     var_name: var1
  45     output_name: var1_sum
  46     reduction: sum
  47     kind: r4
  48   - module: ocn_mod
  49     var_name: var2
  50     output_name: var2_sum
  51     reduction: sum
  52     kind: r4
  53   - module: ocn_mod
  54     var_name: var3
  55     output_name: var3_sum
  56     reduction: sum
  57     kind: r4
  58   - module: ocn_mod
  59     var_name: var4
  60     output_name: var4_sum
  61     reduction: sum
  62     kind: r4
  63   - module: ocn_mod
  64     var_name: var3
  65     output_name: var3_Z
  66     reduction: sum
  67     zbounds: 2. 3.
  68     kind: r4
  69 - file_name: test_sum_regional
  70   time_units: hours
  71   unlimdim: time
  72   sub_region:
  73   - grid_type: latlon
  74     corner1: 78. 78.
  75     corner2: 78. 78.
  76     corner3: 81. 81.
  77     corner4: 81. 81.
  78   freq: 6 hours
  79   varlist:
  80   - module: ocn_mod
  81     var_name: var3
  82     output_name: var3_sum
  83     reduction: sum
  84     zbounds: 2. 3.
  85     kind: r4
  86 _EOF
  87
  88 my_test_count=1
  89 printf "&diag_manager_nml \n use_modern_diag=.true. \n / \n&test_reduction_methods_nml \n test_case = 0 \n/" | cat > input.nml
  90 test_expect_success "Running diag_manager with "sum" reduction method (test $my_test_count)" '
  91   mpirun -n 6 ../test_reduction_methods
  92 '
  93 test_expect_success "Checking answers for the "sum" reduction method (test $my_test_count)" '
  94   mpirun -n 1 ../check_time_sum
  95 '
  96
  97 my_test_count=`expr $my_test_count + 1`
  98 printf "&diag_manager_nml \n use_modern_diag=.true. \n / \n &test_reduction_methods_nml \n test_case = 0 \n mask_case = 1 \n \n/" | cat > input.nml
  99 test_expect_success "Running diag_manager with "sum" reduction method, logical mask (test $my_test_count)" '
 100   mpirun -n 6 ../test_reduction_methods
 101 '
 102 test_expect_success "Checking answers for the "sum" reduction method, logical mask (test $my_test_count)" '
 103   mpirun -n 1 ../check_time_sum
 104 '
 105
 106 my_test_count=`expr $my_test_count + 1`
 107 printf "&diag_manager_nml \n use_modern_diag=.true. \n / \n &test_reduction_methods_nml \n test_case = 0 \n mask_case = 2 \n \n/" | cat > input.nml
 108 test_expect_success "Running diag_manager with "sum" reduction method, real mask (test $my_test_count)" '
 109   mpirun -n 6 ../test_reduction_methods
 110 '
 111 test_expect_success "Checking answers for the "sum" reduction method, real mask (test $my_test_count)" '
 112   mpirun -n 1 ../check_time_sum
 113 '
 114
 115 export OMP_NUM_THREADS=1
 116 my_test_count=`expr $my_test_count + 1`
 117 printf "&diag_manager_nml \n use_modern_diag=.true. \n / \n&test_reduction_methods_nml \n test_case = 1 \n \n/" | cat > input.nml
 118 test_expect_success "Running diag_manager with "sum" reduction method with openmp (test $my_test_count)" '
 119   mpirun -n 6 ../test_reduction_methods
 120 '
 121 test_expect_success "Checking answers for the "sum" reduction method with openmp (test $my_test_count)" '
 122   mpirun -n 1 ../check_time_sum
 123 '
 124
 125 my_test_count=`expr $my_test_count + 1`
 126 printf "&diag_manager_nml \n use_modern_diag=.true. \n / \n&test_reduction_methods_nml \n test_case = 1 \n mask_case = 1 \n \n/" | cat > input.nml
 127 test_expect_success "Running diag_manager with "sum" reduction method with openmp, logical mask (test $my_test_count)" '
 128   mpirun -n 6 ../test_reduction_methods
 129 '
 130 test_expect_success "Checking answers for the "sum" reduction method with openmp, logical mask (test $my_test_count)" '
 131   mpirun -n 1 ../check_time_sum
 132 '
 133
 134 my_test_count=`expr $my_test_count + 1`
 135 printf "&diag_manager_nml \n use_modern_diag=.true. \n / \n&test_reduction_methods_nml \n test_case = 1 \n mask_case = 2 \n \n/" | cat > input.nml
 136 test_expect_success "Running diag_manager with "sum" reduction method with openmp, real mask (test $my_test_count)" '
 137   mpirun -n 6 ../test_reduction_methods
 138 '
 139 test_expect_success "Checking answers for the "sum" reduction method with openmp, real mask (test $my_test_count)" '
 140   mpirun -n 1 ../check_time_sum
 141 '
 142 export OMP_NUM_THREADS=2
 143
 144 my_test_count=`expr $my_test_count + 1`
 145 printf "&diag_manager_nml \n use_modern_diag=.true. \n / \n&test_reduction_methods_nml \n test_case = 2 \n \n/" | cat > input.nml
 146 test_expect_success "Running diag_manager with "sum" reduction method with halo output (test $my_test_count)" '
 147   mpirun -n 6 ../test_reduction_methods
 148 '
 149 test_expect_success "Checking answers for the "sum" reduction method with halo output (test $my_test_count)" '
 150   mpirun -n 1 ../check_time_sum
 151 '
 152
 153 my_test_count=`expr $my_test_count + 1`
 154 printf "&diag_manager_nml \n use_modern_diag=.true. \n / \n&test_reduction_methods_nml \n test_case = 2 \n mask_case = 1 \n \n/" | cat > input.nml
 155 test_expect_success "Running diag_manager with "sum" reduction method with halo output with logical mask (test $my_test_count)" '
 156   mpirun -n 6 ../test_reduction_methods
 157 '
 158 test_expect_success "Checking answers for the "sum" reduction method with halo output with logical mask (test $my_test_count)" '
 159   mpirun -n 1 ../check_time_sum
 160 '
 161
 162 my_test_count=`expr $my_test_count + 1`
 163 printf "&diag_manager_nml \n use_modern_diag=.true. \n / \n&test_reduction_methods_nml \n test_case = 2 \n mask_case = 2 \n \n/" | cat > input.nml
 164 test_expect_success "Running diag_manager with "sum" reduction method with halo output with real mask (test $my_test_count)" '
 165   mpirun -n 6 ../test_reduction_methods
 166 '
 167 test_expect_success "Checking answers for the "sum" reduction method with halo output with real mask (test $my_test_count)" '
 168   mpirun -n 1 ../check_time_sum
 169 '
 170 fi
 171 test_done