diff --git a/physics/Interstitials/UFS_SCM_NEPTUNE/GFS_surface_generic_post.F90 b/physics/Interstitials/UFS_SCM_NEPTUNE/GFS_surface_generic_post.F90
index 648f6bf81..24bc6f86c 100644
--- a/physics/Interstitials/UFS_SCM_NEPTUNE/GFS_surface_generic_post.F90
+++ b/physics/Interstitials/UFS_SCM_NEPTUNE/GFS_surface_generic_post.F90
@@ -117,7 +117,7 @@ subroutine GFS_surface_generic_post_run (im, cplflx, cplaqm, cplchm, cplwav, cpl
           v1(i)     = vgrs_1(i)
         enddo
 
-        if (cplflx .or. cplchm .or. cplwav) then
+        if (cplflx .or. cplchm .or. cplwav .or. cpl_fire) then
           do i=1,im
             u10mi_cpl(i) = u10m(i)
             v10mi_cpl(i) = v10m(i)