Skip to content

Commit

Permalink
ensure full spatial inputs to temporal filters are always available f…
Browse files Browse the repository at this point in the history
…rom catalog (#53)
  • Loading branch information
jornbr authored Mar 1, 2024
1 parent 1a653ed commit de3392e
Showing 1 changed file with 3 additions and 0 deletions.
3 changes: 3 additions & 0 deletions src/fabm.F90
Original file line number Diff line number Diff line change
Expand Up @@ -558,6 +558,7 @@ subroutine set_domain(self _POSTARG_LOCATION_, seconds_per_time_unit)
select type (expression)
class is (type_interior_temporal_mean)
! Moving average of interior variable
call self%finalize_outputs_job%request_variable(expression%link%target, store=.true.)
expression%in = expression%link%target%catalog_index
expression%period = expression%period / seconds_per_time_unit
allocate(expression%history(_PREARG_LOCATION_ expression%n + 1))
Expand All @@ -570,6 +571,7 @@ subroutine set_domain(self _POSTARG_LOCATION_, seconds_per_time_unit)
call self%link_interior_data(expression%output_name, expression%mean)
class is (type_horizontal_temporal_mean)
! Moving average of horizontal variable
call self%finalize_outputs_job%request_variable(expression%link%target, store=.true.)
expression%in = expression%link%target%catalog_index
expression%period = expression%period / seconds_per_time_unit
allocate(expression%history(_PREARG_HORIZONTAL_LOCATION_ expression%n + 1))
Expand All @@ -582,6 +584,7 @@ subroutine set_domain(self _POSTARG_LOCATION_, seconds_per_time_unit)
call self%link_horizontal_data(expression%output_name, expression%mean)
class is (type_horizontal_temporal_maximum)
! Moving maximum of horizontal variable
call self%finalize_outputs_job%request_variable(expression%link%target, store=.true.)
expression%in = expression%link%target%catalog_index
expression%period = expression%period / seconds_per_time_unit
allocate(expression%history(_PREARG_HORIZONTAL_LOCATION_ expression%n))
Expand Down

0 comments on commit de3392e

Please sign in to comment.