Skip to content

Commit

Permalink
Makefile typo fix, initialised var in pesticides fix
Browse files Browse the repository at this point in the history
  • Loading branch information
Casper Boon committed Feb 29, 2024
1 parent 9309fe1 commit 2ca6e8f
Show file tree
Hide file tree
Showing 2 changed files with 2 additions and 2 deletions.
2 changes: 1 addition & 1 deletion Makefile
Original file line number Diff line number Diff line change
Expand Up @@ -114,7 +114,7 @@ endif
ifeq ($(DEBUG),true)
FFLAGS+=$(DEBUG_FFLAGS)
ifeq ($MDEBUG),true)
FFLAGS+=$(MDBG_FFLAGS
FFLAGS+=$(MDBG_FFLAGS)
endif
else
FFLAGS+=$(OPT_FFLAGS)
Expand Down
2 changes: 1 addition & 1 deletion src/aed_pesticides.F90
Original file line number Diff line number Diff line change
Expand Up @@ -891,7 +891,7 @@ SUBROUTINE aed_equilibrate_pesticides(data,column,layer_idx)
! Retrieve current environmental conditions for the cell.
temp = _STATE_VAR_(data%id_tem) ! local temperature

pest_d = zero_ ; pest_t = zero_ ; pest_s(:) = zero_
pest_d = zero_ ; pest_t = zero_ ; pest_s(:) = zero_ ; sorbents = zero_

DO pst_i=1,data%num_pesticides

Expand Down

0 comments on commit 2ca6e8f

Please sign in to comment.