diff --git a/physics/radiation_surface.f b/physics/radiation_surface.f
index 29cae3992..05e62ae88 100644
--- a/physics/radiation_surface.f
+++ b/physics/radiation_surface.f
@@ -757,10 +757,12 @@ subroutine setemis                                                &
 !     tsknf (IMAX)  - ground surface temperature in k                   !
 !     tairf (IMAX)  - lowest model layer air temperature in k           !
 !     hprif (IMAX)  - topographic sdv in m                              !
+!     IMAX          - array horizontal dimension                        !
+!                                                                       !
+!  inputs/outputs:                                                      !
 !     semis_lnd (IMAX) - land emissivity                                !
 !     semis_ice (IMAX) - ice emissivity                                 !
 !     semis_wat (IMAX) - water emissivity                               !
-!     IMAX          - array horizontal dimension                        !
 !                                                                       !
 !  outputs:                                                             !
 !     sfcemis(IMAX)   - surface emissivity                              !