solver_assign_solver Subroutine

  1. off_solver_object.f90
  2. off_solver_object
  3. solver_assign_solver

private pure subroutine solver_assign_solver(lhs, rhs)

Operator =.

Arguments

Type IntentOptional AttributesName
class(solver_object), intent(inout) :: lhs

Left hand side.
type(solver_object), intent(in) :: rhs

Right hand side.

Source Code

solver_assign_solver

Source Code

   pure subroutine solver_assign_solver(lhs, rhs)
   !< Operator `=`.
   class(solver_object), intent(inout) :: lhs !< Left hand side.
   type(solver_object),  intent(in)    :: rhs !< Right hand side.

                                           lhs%error                  = rhs%error
   if (allocated(rhs%time_integrator))     lhs%time_integrator        = rhs%time_integrator
   if (allocated(rhs%convective_operator)) lhs%convective_operator    = rhs%convective_operator
   if (allocated(rhs%diffusive_operator))  lhs%diffusive_operator     = rhs%diffusive_operator
   if (allocated(rhs%turbulence_model))    lhs%turbulence_model       = rhs%turbulence_model
                                           lhs%artificial_viscosity   = rhs%artificial_viscosity
                                           lhs%residuals_tolerance    = rhs%residuals_tolerance
                                           lhs%pseudo_compressibility = rhs%pseudo_compressibility
                                           lhs%chimera_forcing        = rhs%chimera_forcing
   endsubroutine solver_assign_solver

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