input_open_file Function

  1. input.f95
  2. input
  3. input_open_file

public function input_open_file(file_name) result(file_id)

Arguments

Type IntentOptional AttributesName
character(len=*), intent(in) :: file_name

Return Value integer


Calls

proc~~input_open_file~~CallsGraph proc~input_open_file input_open_file proc~open_file open_file proc~input_open_file->proc~open_file proc~log_error log_error proc~open_file->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~~input_open_file~~CalledByGraph proc~input_open_file input_open_file proc~input_nc_read_grid input_nc_read_grid proc~input_nc_read_grid->proc~input_open_file proc~catchment_initialise catchment_initialise proc~catchment_initialise->proc~input_open_file proc~reservoir_read_storage_file reservoir_read_storage_file proc~reservoir_read_storage_file->proc~input_open_file proc~crop_initialise crop_initialise proc~crop_initialise->proc~input_open_file proc~soil_initialise soil_initialise proc~soil_initialise->proc~input_open_file proc~reservoir_read_month_file reservoir_read_month_file proc~reservoir_read_month_file->proc~input_open_file proc~management_read_ctrl management_read_ctrl proc~management_read_ctrl->proc~input_open_file proc~reservoir_read_control_file reservoir_read_control_file proc~reservoir_read_control_file->proc~input_open_file proc~subbasin_read_routing subbasin_read_routing proc~subbasin_read_routing->proc~input_open_file proc~hydrotope_read_input hydrotope_read_input proc~hydrotope_read_input->proc~input_open_file proc~landuse_initialise landuse_initialise proc~landuse_initialise->proc~input_open_file proc~subbasin_initialise subbasin_initialise proc~subbasin_initialise->proc~input_open_file proc~subbasin_initialise->proc~subbasin_read_routing proc~input_nc_check_grid input_nc_check_grid proc~input_nc_check_grid->proc~input_open_file proc~reservoir_initialise reservoir_initialise proc~reservoir_initialise->proc~reservoir_read_storage_file proc~reservoir_initialise->proc~reservoir_read_month_file proc~reservoir_initialise->proc~reservoir_read_control_file proc~initialise initialise proc~initialise->proc~catchment_initialise proc~initialise->proc~crop_initialise proc~initialise->proc~soil_initialise proc~initialise->proc~landuse_initialise proc~initialise->proc~subbasin_initialise proc~initialise->proc~reservoir_initialise proc~input_nc_initialise input_nc_initialise proc~initialise->proc~input_nc_initialise proc~hydrotope_initialise hydrotope_initialise proc~initialise->proc~hydrotope_initialise proc~management_initialise management_initialise proc~initialise->proc~management_initialise proc~input_nc_initialise->proc~input_nc_read_grid proc~input_nc_initialise->proc~input_nc_check_grid proc~hydrotope_initialise->proc~hydrotope_read_input proc~management_initialise->proc~management_read_ctrl program~swim swim program~swim->proc~initialise

Contents

Source Code

input_open_file

Source Code

  integer function input_open_file(file_name) result(file_id)
    ! Abstract input file opener (ascii only)
    character(len=*), intent(in) :: file_name

    file_id = open_file(trim(input_dir)//"/"//trim(file_name), 'r')
  end function input_open_file