Remove the MOIST export LFR_GCC

Author: mmanyin

GEOSagcm_GridComp/GEOSphysics_GridComp/GEOS_PhysicsGridComp.F90

@@ -1722,8 +1722,7 @@ subroutine SetServices ( GC, RC )
                          'REV_LS  ',  'REV_AN  ', 'REV_CN  ', 'TPREC   ', &
                          'Q       ',  'DQDT    ', 'DQRL    ', 'DQRC    ', &
                          'CNV_MFC ',  'CNV_MFD ', 'CNV_CVW ', 'CNV_FRC ', &
-                         'LFR_GCC ',  'RH2     ',                         &
-                         'BYNCY   ',  'CAPE    ', 'INHB    ' /),          &
+                         'RH2     ',  'BYNCY   ', 'CAPE    ', 'INHB    ' /), &
         DST_ID      = CHEM,                                               &
         SRC_ID      = MOIST,                                              &
                                                        RC=STATUS  )

GEOSagcm_GridComp/GEOSphysics_GridComp/GEOSmoist_GridComp/GEOS_MoistGridComp.F90

@@ -4033,15 +4033,6 @@ subroutine SetServices ( GC, RC )
          VLOCATION  = MAPL_VLocationNone,              RC=STATUS  )
     VERIFY_(STATUS)
 
-    call MAPL_AddExportSpec(GC,                                       &
-         SHORT_NAME='LFR_GCC',                                        &
-         LONG_NAME ='lightning_flash_rate_for_GEOSCHEMchem',          &
-         UNITS     ='km-2 s-1',                                       &
-         DIMS      = MAPL_DimsHorzOnly,                               &
-         VLOCATION = MAPL_VLocationNone,                              &
-         RC=STATUS  )
-    VERIFY_(STATUS)
-
     call MAPL_AddExportSpec(GC,                                    &
          SHORT_NAME='UAFMOIST',                                     &
          LONG_NAME ='zonal_wind_after_all_of_moist',   &
@@ -6615,10 +6606,6 @@ subroutine RUN ( GC, IMPORT, EXPORT, CLOCK, RC )
        call MAPL_GetPointer(EXPORT, PTR2D, 'TPW', RC=STATUS); VERIFY_(STATUS)
        if (associated(PTR2D)) PTR2D = SUM( ( Q         ) *MASS , 3 )
 
-       ! Lightning Exports
-       call MAPL_GetPointer(EXPORT, PTR2D, 'LFR_GCC', NotFoundOk=.TRUE., RC=STATUS); VERIFY_(STATUS)
-       if (associated(PTR2D)) PTR2D = 0.0
-
     else
 
        ! Internal State