diff --git a/physics/radlw_main.F90 b/physics/radlw_main.F90
index 5a739a702..d6fa6f6b4 100644
--- a/physics/radlw_main.F90
+++ b/physics/radlw_main.F90
@@ -383,7 +383,7 @@ module rrtmg_lw
 
 !  ---  public accessable subprograms
 
-      public rrtmg_lw_run, rlwinit
+      public rrtmg_lw_run, rrtmg_lw_finalize, rlwinit
 
 
 ! ================
@@ -1303,6 +1303,8 @@ subroutine rrtmg_lw_run                                           &
 !...................................
       end subroutine rrtmg_lw_run
 !-----------------------------------
+      subroutine rrtmg_lw_finalize ()
+      end subroutine rrtmg_lw_finalize 
 
 !> \ingroup module_radlw_main
 !> \brief This subroutine performs calculations necessary for the initialization
diff --git a/physics/radsw_main.F90 b/physics/radsw_main.F90
index 742537a50..8ecc1d9df 100644
--- a/physics/radsw_main.F90
+++ b/physics/radsw_main.F90
@@ -404,7 +404,7 @@ module rrtmg_sw
 
 !  ---  public accessable subprograms
 
-      public rrtmg_sw_run, rswinit
+      public rrtmg_sw_run, rrtmg_sw_finalize, rswinit
 
 ! =================
       contains
@@ -1381,6 +1381,9 @@ subroutine rrtmg_sw_run                                           &
       end subroutine rrtmg_sw_run
 !-----------------------------------
 
+      subroutine rrtmg_sw_finalize ()
+      end subroutine rrtmg_sw_finalize
+
 !>\ingroup module_radsw_main
 !> This subroutine initializes non-varying module variables, conversion
 !! factors, and look-up tables.