output_write_daily Subroutine

  1. output.f95
  2. output
  3. output_write_daily

public subroutine output_write_daily()

Arguments

None

Calls

proc~~output_write_daily~~CallsGraph proc~output_write_daily output_write_daily proc~output_write_time output_write_time proc~output_write_daily->proc~output_write_time proc~output_write_space_time_csv output_write_space_time_csv proc~output_write_time->proc~output_write_space_time_csv proc~output_array_to_bin output_array_to_bin proc~output_write_time->proc~output_array_to_bin proc~output_array_to_csv output_array_to_csv proc~output_write_space_time_csv->proc~output_array_to_csv proc~log_error log_error proc~output_write_space_time_csv->proc~log_error proc~output_array_to_csv->proc~log_error proc~log_message log_message proc~log_error->proc~log_message proc~log_write log_write proc~log_message->proc~log_write proc~log_format_message log_format_message proc~log_message->proc~log_format_message proc~to_string to_string proc~log_write->proc~to_string proc~date_time_str date_time_str proc~log_format_message->proc~date_time_str proc~colourise colourise proc~log_format_message->proc~colourise proc~string_index string_index proc~colourise->proc~string_index

Called by

proc~~output_write_daily~~CalledByGraph proc~output_write_daily output_write_daily proc~output_day output_day proc~output_day->proc~output_write_daily proc~output_year output_year proc~output_year->proc~output_write_daily proc~output_month output_month proc~output_month->proc~output_write_daily proc~time_finish_year time_finish_year proc~time_finish_year->proc~output_year proc~time_process_day time_process_day proc~time_process_day->proc~output_day proc~time_process_month time_process_month proc~time_process_month->proc~output_month proc~time_process_month->proc~time_process_day proc~time_process_years time_process_years proc~time_process_years->proc~time_finish_year proc~time_process_years->proc~time_process_month program~swim swim program~swim->proc~time_process_years

Contents

Source Code

output_write_daily

Source Code

  subroutine output_write_daily
    ! Write out storage/agg arrays as requested and reset to 0
    integer nd

    ! For varying year and month lengths
    nd = output_store_day_counter
    ! Undo day increase of previous output_day call
    if (output_write_interval /= "D") nd = nd - 1

    call output_write_time(1, output_day_ix(:nd), &
      output_storage_hydrotope(output_hydrotope_requested_ix, :, :nd), &
      output_agg_subbasin_daily(:, :, :nd), &
      output_agg_catchment_daily(:, :, :nd))
    ! Set all storage arrays to 0
    output_storage_hydrotope = 0
    output_storage_subbasin = 0
    output_agg_subbasin_daily = 0
    output_agg_catchment_daily = 0
  end subroutine output_write_daily