Skip to content

Commit

Permalink
Removed 'extra tokens at end of #ifndef directive'
Browse files Browse the repository at this point in the history
  • Loading branch information
mcuntz committed Mar 12, 2024
1 parent ec74353 commit a30cbd3
Showing 1 changed file with 3 additions and 2 deletions.
5 changes: 3 additions & 2 deletions src/science/casa-cnp/casa_cnp.F90
Original file line number Diff line number Diff line change
Expand Up @@ -1023,9 +1023,10 @@ SUBROUTINE casa_delplant(veg,casabiome,casapool,casaflux,casamet, &
ENDIF

casapool%dNplantdt(npt,wood) = 0.0
# ifndef ESM15 ! offline/trunk uses this condition
#ifndef ESM15
! offline/trunk uses this condition
IF (casamet%lnonwood(npt)==0) &
# endif
#endif
casapool%dNplantdt(npt,wood) = - casaflux%kplant(npt,wood) &
* casapool%Nplant(npt,wood) &
* casabiome%ftransNPtoL(veg%iveg(npt),wood)
Expand Down

0 comments on commit a30cbd3

Please sign in to comment.