atl_solve_program Subroutine

  1. atl_program_module.f90
  2. atl_program_module
  3. atl_solve_program

public subroutine atl_solve_program(params, equation, tree, nCellsNoBnd, element_container, poly_proj_list, precice_dt)

NE ! Dump and reset the timer after each Iteration NE call atl_dumpTimers( general = params%general, & NE & nElems = tree%global%nElems, & NE & nDofs = element_container%cubes & NE & %scheme_list(tree%global%minLevel) & NE & %nDofs, & NE & nVars = equation%varSys%nScalars ) NE call atl_resetTimers()

Arguments

TypeIntentOptionalAttributesName
type(atl_solver_param_type), intent(inout) :: params
type(atl_Equations_type), intent(inout) :: equation
type(treelmesh_type), intent(in) :: tree
integer, intent(inout) :: nCellsNoBnd(:)
type(atl_element_container_type), intent(inout) :: element_container
type(ply_poly_project_type), intent(inout) :: poly_proj_list(:)
real(kind=rk), intent(inout), optional :: precice_dt

Calls

proc~~atl_solve_program~~CallsGraph proc~atl_solve_program atl_solve_program proc~atl_inittimestepinfo atl_initTimeStepInfo proc~atl_solve_program->proc~atl_inittimestepinfo tem_precice_advance tem_precice_advance proc~atl_solve_program->tem_precice_advance proc~tem_opvar_reduction_transient_update tem_opVar_reduction_transient_update proc~atl_solve_program->proc~tem_opvar_reduction_transient_update proc~tem_simcontrol_clearstat tem_simControl_clearStat proc~atl_solve_program->proc~tem_simcontrol_clearstat proc~tem_starttimer tem_startTimer proc~atl_solve_program->proc~tem_starttimer proc~ply_sampled_track_output ply_sampled_track_output proc~atl_solve_program->proc~ply_sampled_track_output proc~atl_get_timestep atl_get_timestep proc~atl_solve_program->proc~atl_get_timestep proc~tem_trackmem tem_trackmem proc~atl_solve_program->proc~tem_trackmem proc~tem_horizontalspacer tem_horizontalSpacer proc~atl_solve_program->proc~tem_horizontalspacer proc~tem_simcontrol_dump_now tem_simControl_dump_now proc~atl_solve_program->proc~tem_simcontrol_dump_now proc~tem_convergence_check tem_convergence_check proc~atl_solve_program->proc~tem_convergence_check proc~tem_stoptimer tem_stopTimer proc~atl_solve_program->proc~tem_stoptimer proc~tem_status_run_terminate tem_status_run_terminate proc~atl_solve_program->proc~tem_status_run_terminate tem_precice_ongoing tem_precice_ongoing proc~atl_solve_program->tem_precice_ongoing proc~tem_status_run_end tem_status_run_end proc~atl_solve_program->proc~tem_status_run_end proc~atl_kerneldata_update_estimates atl_kerneldata_update_estimates proc~atl_solve_program->proc~atl_kerneldata_update_estimates proc~atl_writerestartifnecessary atl_writeRestartIfNecessary proc~atl_solve_program->proc~atl_writerestartifnecessary proc~tem_simcontrol_syncupdate tem_simControl_syncUpdate proc~atl_solve_program->proc~tem_simcontrol_syncupdate proc~atl_check_val atl_check_val proc~atl_solve_program->proc~atl_check_val

Called by

proc~~atl_solve_program~~CalledByGraph proc~atl_solve_program atl_solve_program program~ateles ateles program~ateles->proc~atl_solve_program

Contents

Variables


Variables

TypeVisibilityAttributesNameInitial
integer, private :: iList
integer, private :: is_ongoing =1

integer which specifies is the coupling partner is still working