diff --git a/GEOSagcm_GridComp/GEOSphysics_GridComp/GEOSsurface_GridComp/GEOSsaltwater_GridComp/GEOS_CICE4ColumnPhysGridComp.F90 b/GEOSagcm_GridComp/GEOSphysics_GridComp/GEOSsurface_GridComp/GEOSsaltwater_GridComp/GEOS_CICE4ColumnPhysGridComp.F90 index 33ef4d134..bc5a7c044 100644 --- a/GEOSagcm_GridComp/GEOSphysics_GridComp/GEOSsurface_GridComp/GEOSsaltwater_GridComp/GEOS_CICE4ColumnPhysGridComp.F90 +++ b/GEOSagcm_GridComp/GEOSphysics_GridComp/GEOSsurface_GridComp/GEOSsaltwater_GridComp/GEOS_CICE4ColumnPhysGridComp.F90 @@ -255,7 +255,7 @@ subroutine SetServices ( GC, RC ) _RC ) call MAPL_AddExportSpec(GC, & - LONG_NAME = 'sea_ice_outgoing_longwave_flux',& + LONG_NAME = 'sea_ice_emitted_longwave_flux',& UNITS = 'W m-2' ,& SHORT_NAME = 'HLWUPICE' ,& DIMS = MAPL_DimsTileOnly ,& @@ -623,7 +623,7 @@ subroutine SetServices ( GC, RC ) _RC ) call MAPL_AddExportSpec(GC ,& - LONG_NAME = 'surface_downward_longwave_flux',& + LONG_NAME = 'surface_absorbed_longwave_flux',& UNITS = 'W m-2' ,& SHORT_NAME = 'LWDNSRF' ,& DIMS = MAPL_DimsTileOnly ,& @@ -1491,7 +1491,7 @@ subroutine SetServices ( GC, RC ) call MAPL_AddExportSpec(GC, & SHORT_NAME = 'HLWUPN' ,& - LONG_NAME = 'outgoing_longwave_flux_at_ice_snow_surface_over_ice_categories',& + LONG_NAME = 'emitted_longwave_flux_at_ice_snow_surface_over_ice_categories',& UNITS = 'W m-2' ,& DIMS = MAPL_DimsTileOnly ,& UNGRIDDED_DIMS = (/NUM_ICE_CATEGORIES/) ,&