MONC
Functions/Subroutines
none_time_manipulation_mod Module Reference

Performs no time manipulation and returns the value, basically a no-op. More...

Functions/Subroutines

logical function, public is_none_time_manipulation_ready_to_write (latest_time, output_frequency, write_time, latest_timestep, write_timestep)
 
type(data_values_type) function, public perform_none_time_manipulation (instant_values, output_frequency, field_name, timestep, time)
 Performs no time manipulation and returns data. More...
 

Detailed Description

Performs no time manipulation and returns the value, basically a no-op.

Function/Subroutine Documentation

◆ is_none_time_manipulation_ready_to_write()

logical function, public none_time_manipulation_mod::is_none_time_manipulation_ready_to_write ( real, intent(in)  latest_time,
real, intent(in)  output_frequency,
real, intent(in)  write_time,
integer, intent(in)  latest_timestep,
integer, intent(in)  write_timestep 
)

Definition at line 20 of file none_manipulation.F90.

20  real, intent(in) :: latest_time, output_frequency, write_time
21  integer, intent(in) :: latest_timestep, write_timestep
22 
23  is_none_time_manipulation_ready_to_write=latest_timestep .ge. write_timestep

◆ perform_none_time_manipulation()

type(data_values_type) function, public none_time_manipulation_mod::perform_none_time_manipulation ( real(kind=default_precision), dimension(:), intent(in)  instant_values,
real, intent(in)  output_frequency,
character(len=*), intent(in)  field_name,
integer, intent(in)  timestep,
real(kind=default_precision), intent(in)  time 
)

Performs no time manipulation and returns data.

Parameters
instant_valuesThe instantaneous values to work with
output_frequencyThe output frequency configuration option
field_nameThe field name
timestepThe timestep
timeThe model time
Returns
An allocated array of reals if data is to be stored, otherwise this is unallocated

Definition at line 35 of file none_manipulation.F90.

35  real(kind=DEFAULT_PRECISION), dimension(:), intent(in) :: instant_values
36  real, intent(in) :: output_frequency
37  real(kind=DEFAULT_PRECISION), intent(in) :: time
38  character(len=*), intent(in) :: field_name
39  integer, intent(in) :: timestep
40 
41  allocate(perform_none_time_manipulation%values(size(instant_values)))
42  perform_none_time_manipulation%values=instant_values