From 4ec994054b4ddc9a952a6029589b264b08890e2a Mon Sep 17 00:00:00 2001 From: Geek <1069093304@qq.com> Date: Tue, 14 Apr 2026 12:26:02 +0800 Subject: [PATCH] Add support for CMA source in rd_grib2.F --- ungrib/src/rd_grib2.F | 2 ++ 1 file changed, 2 insertions(+) diff --git a/ungrib/src/rd_grib2.F b/ungrib/src/rd_grib2.F index 5a584384..726f433b 100644 --- a/ungrib/src/rd_grib2.F +++ b/ungrib/src/rd_grib2.F @@ -328,6 +328,8 @@ SUBROUTINE rd_grib2(junit, gribflnm, hdate, map%source = 'UKMO' else if (icenter .eq. 78 .or. icenter .eq. 79 ) then map%source = 'DWD' + else if (icenter .eq. 38) then ! Edited by Geek-007 + map%source = 'CMA' else map%source = 'unknown model and orig center' end if