table 4.7

NOAA-EMC · Dec 20, 2024 · b0f2b21 · b0f2b21
1 parent ccee91e
commit b0f2b21
Show file tree

Hide file tree

Showing 2 changed files with 6 additions and 0 deletions.
diff --git a/src/grib2_all_tables_module.F90 b/src/grib2_all_tables_module.F90
@@ -514,6 +514,10 @@ module grib2_all_tables_module
   data table4_7(22) /type_of_derive_fcst('percentile_value_75',203)/
   data table4_7(23) /type_of_derive_fcst('percentile_value_95',204)/
   !
+  !   Added type of derive forecast (12/20/2024)
+  !
+  data table4_7(24) /type_of_derive_fcst('var_all_ens_mem',10)/
+  !
   !
   !  Added Clustering Method Table 4.8 (06/26/2019)
   !

diff --git a/tests/test_all_key_tables.F90 b/tests/test_all_key_tables.F90
@@ -1777,6 +1777,8 @@ program test_all_tables
   if (val1 .ne. 203) stop 21
   call get_g2_typeofderivefcst('percentile_value_95', val1, ierr)
   if (val1 .ne. 204) stop 21
+  call get_g2_typeofderivefcst('var_all_ens_mem', val1, ierr)
+  if (val1 .ne. 10) stop 21
   call get_g2_typeofderivefcst('xxxx', val1, ierr)
   if (ierr .ne. 9) stop 21