From 996155905b017cabb93008331f9c818c7df893ee Mon Sep 17 00:00:00 2001 From: Nick Wogan Date: Fri, 17 May 2024 11:53:26 -0700 Subject: [PATCH] added error when climate and update grid --- src/evoatmosphere/photochem_evoatmosphere_utils.f90 | 5 +++++ 1 file changed, 5 insertions(+) diff --git a/src/evoatmosphere/photochem_evoatmosphere_utils.f90 b/src/evoatmosphere/photochem_evoatmosphere_utils.f90 index af6a800..fb79b47 100644 --- 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