initialize Subroutine

private elemental subroutine initialize(self, system)

Initialize OS.

Arguments

Type IntentOptional AttributesName
class(os_object), intent(inout) :: self

OS.

character(len=*), intent(in), optional :: system

System name, valid [unix, windows].


Source Code


Source Code

  elemental subroutine initialize(self, system)
  !< Initialize OS.
  class(os_object), intent(inout)        :: self    !< OS.
  character(*),     intent(in), optional :: system  !< System name, valid [unix, windows].
  type(string)                           :: system_ !< System name.

  self%error%status = 0
  system_ = 'UNIX'
  if (present(system)) then
     system_ = trim(adjustl(system))
     system_ = system_%upper()
  endif
  select case(system_%chars())
  case('UNIX')
     call self%initialize_unix
  case('WINDOWS')
     call self%initialize_windows
  case default
     call self%initialize_unix
     self%error%status = ERROR_FALLBACK_INIT
  endselect
  endsubroutine initialize


adim_assign_adim allocate_blocks block_assign_block block_d_assign_block_d cell_assign_cell cells_number cells_number check cli_parse cli_parse cli_parse close compute_extents compute_faces_metrics compute_metrics compute_metrics compute_reference_values compute_space_operator compute_volumes correct_metrics cp create_linspace description description description description description description description description description destroy destroy destroy destroy destroy destroy destroy destroy destroy destroy destroy destroy destroy destroy destroy err_assign_err face_assign_face file_assign_file free_assign_free grid_d_assign_grid_d initialize initialize initialize initialize initialize initialize initialize initialize initialize initialize initialize initialize initialize initialize initialize initialize_unix initialize_windows integrate interpolate_at_nodes iolength iolength iopos_block_nodes is_the_end load_file_grid load_file_name_from_file load_file_parameters load_from_file load_from_file load_from_file load_from_file load_from_file load_from_file load_from_file load_grid_dimensions_from_file load_input_files load_nodes_from_file load_nodes_from_file mkdir node_assign_node node_to_center nodes_number nodes_number nullify_normals open os_assign_os parse_command_line_interface progress rm save_file_grid save_file_grid save_file_grid_tec save_file_grid_vtk save_file_name_into_file save_file_parameters save_grid_dimensions_into_file save_into_file save_into_file save_into_file save_into_file save_into_file save_into_file save_into_file save_nodes_into_file save_nodes_into_file set_command_line_interface set_stop solver_assign_solver time_assign_time update