added error when climate and update grid

Nicholaswogan · May 17, 2024 · 9961559 · 9961559
1 parent a3c20e6
commit 9961559
Showing 1 changed file with 5 additions and 0 deletions.
diff --git a/src/evoatmosphere/photochem_evoatmosphere_utils.f90 b/src/evoatmosphere/photochem_evoatmosphere_utils.f90
@@ -730,6 +730,11 @@ module subroutine update_vertical_grid(self, TOA_alt, TOA_pressure, err)
     var => self%var
     wrk => self%wrk
 
+    if (self%evolve_climate) then
+      err = 'You can not call "update_vertical_grid" when evolving climate'
+      return
+    endif
+
     if (present(TOA_alt) .and. present(TOA_pressure)) then
       err = 'Both "TOA_alt" and "TOA_pressure" can not be specified'
       return