remove unused arguments in physics/GWD/ugwpv1_gsldrag_post.F90

Author: grantfirl

physics/GWD/ugwpv1_gsldrag_post.F90

@@ -23,7 +23,7 @@ subroutine ugwpv1_gsldrag_post_run ( im, levs, ldiag_ugwp,       &
          du_ogwcol, dv_ogwcol, du_oblcol, dv_oblcol, du_osscol,       &
          dv_osscol, du_ofdcol, dv_ofdcol, du3_ogwcol, dv3_ogwcol,     &
          du3_oblcol, dv3_oblcol, du3_osscol, dv3_osscol, du3_ofdcol,  &
-         dv3_ofdcol, dtdt, dudt, dvdt, errmsg, errflg)
+         dv3_ofdcol, errmsg, errflg)
 
         use machine,                only: kind_phys
 
@@ -60,8 +60,6 @@ subroutine ugwpv1_gsldrag_post_run ( im, levs, ldiag_ugwp,       &
         real(kind=kind_phys), intent(inout), dimension(:), optional   :: du3_oblcol, dv3_oblcol
         real(kind=kind_phys), intent(inout), dimension(:), optional   :: du3_osscol, dv3_osscol
         real(kind=kind_phys), intent(inout), dimension(:), optional   :: du3_ofdcol, dv3_ofdcol
-	
-        real(kind=kind_phys), intent(inout), dimension(:,:) :: dtdt, dudt, dvdt
 
         character(len=*),        intent(out) :: errmsg
         integer,                 intent(out) :: errflg

physics/GWD/ugwpv1_gsldrag_post.meta

@@ -535,30 +535,6 @@
   kind = kind_phys
   intent = inout
   optional = True
-[dtdt]
-  standard_name = process_split_cumulative_tendency_of_air_temperature
-  long_name = air temperature tendency due to model physics
-  units = K s-1
-  dimensions = (horizontal_loop_extent,vertical_layer_dimension)
-  type = real
-  kind = kind_phys
-  intent = inout
-[dudt]
-  standard_name = process_split_cumulative_tendency_of_x_wind
-  long_name = zonal wind tendency due to model physics
-  units = m s-2
-  dimensions = (horizontal_loop_extent,vertical_layer_dimension)
-  type = real
-  kind = kind_phys
-  intent = inout
-[dvdt]
-  standard_name = process_split_cumulative_tendency_of_y_wind
-  long_name = meridional wind tendency due to model physics
-  units = m s-2
-  dimensions = (horizontal_loop_extent,vertical_layer_dimension)
-  type = real
-  kind = kind_phys
-  intent = inout
 [errmsg]
   standard_name = ccpp_error_message
   long_name = error message for error handling in CCPP