diff --git a/src/biogeochem/CNPhenologyMod.F90 b/src/biogeochem/CNPhenologyMod.F90 index d5b8ef5447..5ff7a2a5ac 100644 --- a/src/biogeochem/CNPhenologyMod.F90 +++ b/src/biogeochem/CNPhenologyMod.F90 @@ -2723,6 +2723,7 @@ end subroutine PlantCrop function DaysPastPlanting(idop) ! !USES: use clm_time_manager, only : get_prev_calday, get_curr_days_per_year + use clm_varcon , only : secspday ! ! !ARGUMENTS: integer, intent(in) :: idop ! patch day of planting @@ -2739,7 +2740,7 @@ function DaysPastPlanting(idop) else ! get_curr_days_per_year() or get_prev_days_per_year() would only differ in the last timestep ! of the year, but in that case this line is not reached. - DaysPastPlanting = jday - idop + get_curr_days_per_year() + DaysPastPlanting = jday - idop + get_curr_days_per_year(offset = -365*int(secspday)) end if end function DaysPastPlanting