deleted radiation_norm_term

Nicholaswogan · Aug 21, 2024 · bd6894f · bd6894f
1 parent a716d62
commit bd6894f
Show file tree

Hide file tree

Showing 4 changed files with 0 additions and 33 deletions.
diff --git a/clima/cython/AdiabatClimate.pyx b/clima/cython/AdiabatClimate.pyx
@@ -705,15 +705,6 @@ cdef class AdiabatClimate:
     def __set__(self, int val):
       wa_pxd.adiabatclimate_max_rc_iters_convection_set(self._ptr, &val)
 
-  property radiation_norm_term:
-    "float. A term that weights the importance of maintaining radiative equilibrium to convection."
-    def __get__(self):
-      cdef double val
-      wa_pxd.adiabatclimate_radiation_norm_term_get(self._ptr, &val)
-      return val
-    def __set__(self, double val):
-      wa_pxd.adiabatclimate_radiation_norm_term_set(self._ptr, &val)
-
   property verbose:
     "bool. verbosity"
     def __get__(self):

diff --git a/clima/cython/AdiabatClimate_pxd.pxd b/clima/cython/AdiabatClimate_pxd.pxd
@@ -141,9 +141,6 @@ cdef extern void adiabatclimate_max_rc_iters_set(AdiabatClimate *ptr, int *val)
 cdef extern void adiabatclimate_max_rc_iters_convection_get(AdiabatClimate *ptr, int *val)
 cdef extern void adiabatclimate_max_rc_iters_convection_set(AdiabatClimate *ptr, int *val)
 
-cdef extern void adiabatclimate_radiation_norm_term_get(AdiabatClimate *ptr, double *val)
-cdef extern void adiabatclimate_radiation_norm_term_set(AdiabatClimate *ptr, double *val)
-
 cdef extern void adiabatclimate_verbose_get(AdiabatClimate *ptr, bool *val)
 cdef extern void adiabatclimate_verbose_set(AdiabatClimate *ptr, bool *val)
 

diff --git a/clima/fortran/AdiabatClimate.f90 b/clima/fortran/AdiabatClimate.f90
@@ -941,24 +941,6 @@ subroutine adiabatclimate_max_rc_iters_convection_set(ptr, val) bind(c)
   c%max_rc_iters_convection = val
 end subroutine
 
-subroutine adiabatclimate_radiation_norm_term_get(ptr, val) bind(c)
-  use clima, only: AdiabatClimate
-  type(c_ptr), value, intent(in) :: ptr
-  real(c_double), intent(out) :: val
-  type(AdiabatClimate), pointer :: c
-  call c_f_pointer(ptr, c)
-  val = c%radiation_norm_term
-end subroutine
-
-subroutine adiabatclimate_radiation_norm_term_set(ptr, val) bind(c)
-  use clima, only: AdiabatClimate
-  type(c_ptr), value, intent(in) :: ptr
-  real(c_double), intent(in) :: val
-  type(AdiabatClimate), pointer :: c
-  call c_f_pointer(ptr, c)
-  c%radiation_norm_term = val
-end subroutine
-
 subroutine adiabatclimate_verbose_get(ptr, val) bind(c)
   use clima, only: AdiabatClimate
   type(c_ptr), value, intent(in) :: ptr

diff --git a/src/adiabat/clima_adiabat.f90 b/src/adiabat/clima_adiabat.f90
@@ -104,9 +104,6 @@ module clima_adiabat
     !> Max number of iterations for which convective layers can
     !> be converged to radiative layers in the RCE routine
     integer :: max_rc_iters_convection = 5
-    !> A term that weights the importance of maintaining radiative
-    !> equilibrium to convection.
-    real(dp) :: radiation_norm_term = 1.0e-3_dp
     !> If False, then the jacobian calculation in RCE does not recompute
     !> solar radiative transfer.
     logical :: compute_solar_in_jac = .false.