From db0a97e39a891d7e173783f92c741ecf8a1e3fe9 Mon Sep 17 00:00:00 2001
From: Shahram Najm <masn@ecmwf.int>
Date: Wed, 28 Apr 2021 16:22:28 +0100
Subject: [PATCH] Scripts: WMO tables and surface types

---
 definitions/create_grib2_codetables.pl | 7 +++++--
 1 file changed, 5 insertions(+), 2 deletions(-)

diff --git a/definitions/create_grib2_codetables.pl b/definitions/create_grib2_codetables.pl
index 38925f2f0..3b77241fa 100644
--- a/definitions/create_grib2_codetables.pl
+++ b/definitions/create_grib2_codetables.pl
@@ -180,8 +180,11 @@ sub TranslateCodes_Table_4_4 {
 ###################################################################################################
 sub TranslateCodes_Table_4_5 {
     my ($code) = @_;
-    return "sfc"  if ($code eq "1" || $code eq "8" || $code eq "17" || $code eq "18" ||
-            $code eq "101" || $code eq "103" || $code eq "106" || $code eq "177");
+    return "sfc"  if ($code eq "1" || $code eq "7" ||
+            $code eq "8"   || $code eq "17"  || $code eq "18"  ||
+            $code eq "101" || $code eq "103" || $code eq "106" ||
+            $code eq "162" || $code eq "166" || $code eq "174" ||
+            $code eq "177");
     return "pl"   if ($code eq "100");
     return "ml"   if ($code eq "105");
     return "pt"   if ($code eq "107");