Fixed circular dependencies

Author: prathi-wind

src/common/m_helper.fpp

@@ -35,8 +35,7 @@ module m_helper
               associated_legendre, &
               spherical_harmonic_func, &
               double_factorial, &
-              factorial, &
-              s_update_cell_extremes
+              factorial
 
 contains
 
@@ -578,19 +577,5 @@ contains
 
     end function factorial
 
-    pure elemental subroutine s_update_cell_extremes(extreme, m, n, p)
-        type(cell_num_bounds), intent(out) :: extreme
-        integer, intent(in) :: m, n, p
-        
-        extreme%mn_max = max(m, n)
-        extreme%np_max = max(n, p)
-        extreme%mp_max = max(m, p)
-        extreme%mnp_max = max(m, n, p)
-        extreme%mn_min = min(m, n)
-        extreme%np_min = min(n, p)
-        extreme%mp_min = min(m, p)
-        extreme%mnp_min = min(m, n, p)
-
-    end subroutine s_update_cell_extremes
 
 end module m_helper

src/post_process/m_global_parameters.fpp

@@ -19,8 +19,6 @@ module m_global_parameters
 
     use m_thermochem, only: num_species, species_names
 
-    use m_helper, only: s_update_cell_extremes
-
     implicit none
 
     !> @name Logistics

src/pre_process/m_global_parameters.fpp

@@ -19,8 +19,6 @@ module m_global_parameters
 
     use m_thermochem, only: num_species
 
-    use m_helper, only: s_update_cell_extremes
-
     implicit none
 
     ! Logistics

src/simulation/m_global_parameters.fpp

@@ -21,8 +21,6 @@ module m_global_parameters
 
     use m_helper_basic         !< Functions to compare floating point numbers
 
-    use m_helper, only: s_update_cell_extremes
-
 #ifdef MFC_OpenACC
     use openacc
 #endif