output_register_hydrotope_var Function

  1. output.f95
  2. output
  3. output_register_hydrotope_var

public function output_register_hydrotope_var(name, state)

Arguments

Type IntentOptional AttributesName
character, intent(in) :: name
logical, intent(in), optional :: state

Return Value integer


Calls

proc~~output_register_hydrotope_var~~CallsGraph proc~output_register_hydrotope_var output_register_hydrotope_var proc~output_register_var output_register_var proc~output_register_hydrotope_var->proc~output_register_var proc~string_index string_index proc~output_register_var->proc~string_index proc~log_error log_error proc~output_register_var->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~colourise->proc~string_index

Called by

proc~~output_register_hydrotope_var~~CalledByGraph proc~output_register_hydrotope_var output_register_hydrotope_var proc~vegetation_initialise vegetation_initialise proc~vegetation_initialise->proc~output_register_hydrotope_var proc~snow_initialise snow_initialise proc~snow_initialise->proc~output_register_hydrotope_var proc~crop_initialise crop_initialise proc~crop_initialise->proc~output_register_hydrotope_var proc~soil_initialise soil_initialise proc~soil_initialise->proc~output_register_hydrotope_var proc~evapotranspiration_initialise evapotranspiration_initialise proc~evapotranspiration_initialise->proc~output_register_hydrotope_var proc~groundwater_initialise groundwater_initialise proc~groundwater_initialise->proc~output_register_hydrotope_var proc~hydrotope_initialise hydrotope_initialise proc~hydrotope_initialise->proc~output_register_hydrotope_var proc~initialise initialise proc~initialise->proc~vegetation_initialise proc~initialise->proc~snow_initialise proc~initialise->proc~crop_initialise proc~initialise->proc~soil_initialise proc~initialise->proc~evapotranspiration_initialise proc~initialise->proc~groundwater_initialise proc~initialise->proc~hydrotope_initialise program~swim swim program~swim->proc~initialise

Contents

Source Code

output_register_hydrotope_var

Source Code

  integer function output_register_hydrotope_var(name, state)
    ! Register hydrotope variable name and optionally "state" (default .True.).
    ! Returns output ID if variable requested for output, otherwise 0.
    ! If state = .False. temporal aggregation is sum not average.
    character(*), intent(in) :: name
    logical, intent(in), optional :: state
    logical s

    s = .True.
    if (present(state)) s = state
    call output_register_var(name, s, output_id_hydrotope_counter, &
      output_hydrotope_vars, output_register_hydrotope_var)
  end function output_register_hydrotope_var