maintain ESM15 condition here;

CABLE-LSM · Aug 14, 2024 · b611912 · b611912
1 parent 8b93b3b
commit b611912
Showing 1 changed file with 3 additions and 4 deletions.
diff --git a/src/science/casa-cnp/casa_cnp.F90 b/src/science/casa-cnp/casa_cnp.F90
@@ -1,4 +1,4 @@
-!#define ESM15 YES
+#define ESM15 YES
 !==============================================================================
 ! This source code is part of the
 ! Australian Community Atmosphere Biosphere Land Exchange (CABLE) model.
@@ -1023,10 +1023,9 @@ 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)