From f101818e4d5a443cae91f17dc7b7a1d0ce4f135e Mon Sep 17 00:00:00 2001
From: Liam Bindle <lrbindle@gmail.com>
Date: Wed, 25 Aug 2021 17:34:32 -0500
Subject: [PATCH] Set esmf_logging_mode=ESMF_LOGKIND_MULTI_ON_ERROR so that any
 ESMF errors are reported to PET* files (only if they occur).

---
 src/GCHPctm.F90 | 3 ++-
 1 file changed, 2 insertions(+), 1 deletion(-)

diff --git a/src/GCHPctm.F90 b/src/GCHPctm.F90
index b66d33f8f..ec99f9481 100644
--- a/src/GCHPctm.F90
+++ b/src/GCHPctm.F90
@@ -11,7 +11,7 @@
 #include "MAPL_Generic.h"
 
 Program GCHPctm_Main
-
+   use ESMF, only: ESMF_LOGKIND_MULTI_ON_ERROR
    use MAPL
    use GCHP_GridCompMod, only:  ROOT_SetServices => SetServices
 
@@ -26,6 +26,7 @@ Program GCHPctm_Main
 
    cap_options = MAPL_CapOptions(cap_rc_file='CAP.rc')
    cap_options%logging_config = 'logging.yml'
+   cap_options%esmf_logging_mode = ESMF_LOGKIND_MULTI_ON_ERROR
    cap = MAPL_CAP('GCHP', ROOT_SetServices, cap_options=cap_options)
    call cap%run(_RC)
    _VERIFY(status)