table 4.9

AlysonStahl-NOAA · AlysonStahl-NOAA · commit 16a03ff28758 · 2024-12-20T15:31:50.000-08:00
diff --git a/src/grib2_all_tables_module.F90 b/src/grib2_all_tables_module.F90
@@ -553,6 +553,10 @@ module grib2_all_tables_module
   data table4_9(8) /type_of_prob('prob_near_normal_cat',7)/
   data table4_9(9) /type_of_prob('prob_below_normal_cat',8)/
   !
+  !   Added Probability Type (12/20/2024)
+  !
+  data table4_9(10) /type_of_prob('prob_counts_cat_boolean',9)/
+  !
   !
   type statistical_processing_types
      character(len=80) :: statprocesstypeskey
diff --git a/tests/test_all_key_tables.F90 b/tests/test_all_key_tables.F90
@@ -1809,6 +1809,8 @@ program test_all_tables
   if (val1 .ne. 7) stop 23
   call get_g2_typeofprob('prob_below_normal_cat', val1, ierr)
   if (val1 .ne. 8) stop 23
+  call get_g2_typeofprob('prob_counts_cat_boolean', val1, ierr)
+  if (val1 .ne. 9) stop 23
   call get_g2_typeofprob('xxxx', val1, ierr)
   if (ierr .ne. 9) stop 23
   

Original file line number	Diff line number	Diff line change
`@@ -553,6 +553,10 @@ module grib2_all_tables_module`
`553`	`553`	`data table4_9(8) /type_of_prob('prob_near_normal_cat',7)/`
`554`	`554`	`data table4_9(9) /type_of_prob('prob_below_normal_cat',8)/`
`555`	`555`	`!`
	`556`	`+ ! Added Probability Type (12/20/2024)`
	`557`	`+ !`
	`558`	`+ data table4_9(10) /type_of_prob('prob_counts_cat_boolean',9)/`
	`559`	`+ !`
`556`	`560`	`!`
`557`	`561`	`type statistical_processing_types`
`558`	`562`	`character(len=80) :: statprocesstypeskey`