From 1d9dae3ad3016776b8aad0a03be1fd7b5d14fb4d Mon Sep 17 00:00:00 2001
From: Yunpeng Shan <yshan@chrlogin1.lcrc.anl.gov>
Date: Wed, 31 Jul 2024 21:34:19 -0500
Subject: [PATCH] Add outfld lines for in-cloud properties output.

---
 components/eam/src/physics/p3/eam/micro_p3_interface.F90 | 6 ++++++
 1 file changed, 6 insertions(+)

diff --git a/components/eam/src/physics/p3/eam/micro_p3_interface.F90 b/components/eam/src/physics/p3/eam/micro_p3_interface.F90
index bb6e164b4a14..c6c533329a3f 100644
--- a/components/eam/src/physics/p3/eam/micro_p3_interface.F90
+++ b/components/eam/src/physics/p3/eam/micro_p3_interface.F90
@@ -1630,6 +1630,12 @@ subroutine micro_p3_tend(state, ptend, dtime, pbuf)
    call outfld('FREQI',       freqi,       pcols,    lchnk)
    call outfld('FREQR',       freqr,       psetcols, lchnk)
    call outfld('CDNUMC',      cdnumc,      pcols,    lchnk)
+!<shanyp 05182024
+   call outfld('ICIMRST',     icimrst,      pcols,    lchnk)
+   call outfld('ICWMRST',     icwmrst,      pcols,    lchnk)
+   call outfld('ICINC' ,      icinc,        pcols,    lchnk)
+   call outfld('ICWNC' ,      icwnc,        pcols,    lchnk)
+!shanyp 05182024>
 
    call outfld('CLOUDFRAC_LIQ_MICRO',  cld_frac_l,      pcols, lchnk)
    call outfld('CLOUDFRAC_ICE_MICRO',  cld_frac_i,      pcols, lchnk)