Fix GNU warning "Warning: Return value err_message of function declared at (1) not set [-Wreturn-type]"

Author: scrasmussen

physics/Interstitials/UFS_SCM_NEPTUNE/module_ccpp_suite_simulator.F90

@@ -121,7 +121,7 @@ function linterp_1D(this, var_name, year, month, day, hour, min, sec) result(err
           this%tend1d%q = this%tend2d%q(:,1)
        endif
     end select
-
+    err_message = ""
   end function linterp_1D
 
 !> Type-bound procedure to compute tendency profile for time-of-day.
@@ -153,6 +153,7 @@ function linterp_2D(this, var_name, lon, lat, year, month, day, hour, min, sec)
     case("q")
        this%tend1d%q = w1*this%tend3d%q(iNearest,:,ti(1)) + w2*this%tend3d%q(iNearest,:,tf(1))
     end select
+    err_message = ""
   end function linterp_2D
 
 !> Type-bound procedure to find nearest location.