From 32b9fa3f50d175170638acffc9c51f9e82cb1323 Mon Sep 17 00:00:00 2001
From: Purnendu Chakraborty <purnendu.chakraborty@nasa.gov>
Date: Fri, 15 Nov 2024 17:34:10 -0500
Subject: [PATCH] Removed unnecessary returns

---
 generic3g/vertical/ModelVerticalGrid.F90 | 4 ++--
 1 file changed, 2 insertions(+), 2 deletions(-)

diff --git a/generic3g/vertical/ModelVerticalGrid.F90 b/generic3g/vertical/ModelVerticalGrid.F90
index 64ae12f2b86..2c219bb1690 100644
--- a/generic3g/vertical/ModelVerticalGrid.F90
+++ b/generic3g/vertical/ModelVerticalGrid.F90
@@ -93,13 +93,13 @@ function get_short_name(this, vertical_dim_spec, rc) result(short_name)
 
       if (vertical_dim_spec == VERTICAL_DIM_EDGE) then
          short_name = this%short_name_edge
-         _RETURN(_SUCCESS)
       else if (vertical_dim_spec == VERTICAL_DIM_CENTER) then
          short_name = this%short_name_center
-         _RETURN(_SUCCESS)
       else
          _FAIL("unsupported vertical_dim_spec")
       end if
+
+      _RETURN(_SUCCESS)
    end function get_short_name
 
    subroutine set_registry(this, registry)