description Function

  1. off_solver_object.f90
  2. off_solver_object
  3. description

private pure function description(self, prefix) result(desc)

Return a pretty-formatted description of solver parameters.

Arguments

Type IntentOptional AttributesName
class(solver_object), intent(in) :: self

Solver object.
character(len=*), intent(in), optional :: prefix

Prefixing string.

Return Value character(len=:), allocatable

Description.

Calls

proc~~description~8~~CallsGraph proc~description~8 description str str proc~description~8->str
Help

Source Code

description

Source Code

   pure function description(self, prefix) result(desc)
   !< Return a pretty-formatted description of solver parameters.
   class(solver_object), intent(in)           :: self             !< Solver object.
   character(*),         intent(in), optional :: prefix           !< Prefixing string.
   character(len=:), allocatable              :: desc             !< Description.
   character(len=:), allocatable              :: prefix_          !< Prefixing string, local variable.
   character(len=1), parameter                :: NL=new_line('a') !< New line character.

   prefix_ = '' ; if (present(prefix)) prefix_ = prefix
   desc = ''
   if(allocated(self%time_integrator    ))desc=desc//prefix_//'time integrator       : '//self%time_integrator//NL
   if(allocated(self%convective_operator))desc=desc//prefix_//'convective operator   : '//self%convective_operator//NL
   if(allocated(self%diffusive_operator ))desc=desc//prefix_//'diffusive operator    : '//self%diffusive_operator//NL
   if(allocated(self%turbulence_model   ))desc=desc//prefix_//'turbulence model      : '//self%turbulence_model//NL
                                          desc=desc//prefix_//'artificial viscosity  : '//trim(str(self%artificial_viscosity))//NL
                                          desc=desc//prefix_//'residuals tolerance   : '//trim(str(self%residuals_tolerance))//NL
                                          desc=desc//prefix_//'pseudo compressibility: '//trim(str(self%pseudo_compressibility))//NL
                                          desc=desc//prefix_//'chimera forcing       : '//trim(str(self%chimera_forcing))
   endfunction description

All Procedures

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