create_global_timestep Subroutine

  1. atl_calc_time.f90
  2. atl_calc_time_module
  3. create_global_timestep

private subroutine create_global_timestep(dt, nCells, minLevel, maxLevel, proc)

\brief subroutine to create a single global timestep.

Arguments

TypeIntentOptionalAttributesName
real(kind=rk), intent(inout) :: dt(minLevel:maxLevel)

The delta t on the levels of your mesh. This will be update with the new global, local timestep.
integer, intent(in) :: nCells(minLevel:maxLevel)

The number of cells on the different levels.
integer, intent(in) :: minLevel

The minimum level of your mesh.
integer, intent(in) :: maxLevel

The maximum level of your mesh.
type(tem_comm_env_type), intent(in) :: proc

mpi communication enviroment with mpi communicator

Calls

proc~~create_global_timestep~~CallsGraph proc~create_global_timestep create_global_timestep proc~calc_common_global_timestep calc_common_global_timestep proc~create_global_timestep->proc~calc_common_global_timestep mpi_allreduce mpi_allreduce proc~calc_common_global_timestep->mpi_allreduce

Called by

proc~~create_global_timestep~~CalledByGraph proc~create_global_timestep create_global_timestep proc~atl_get_timestep atl_get_timestep proc~atl_get_timestep->proc~create_global_timestep proc~atl_solve_program atl_solve_program proc~atl_solve_program->proc~atl_get_timestep proc~atl_initialize_program atl_initialize_program proc~atl_initialize_program->proc~atl_get_timestep program~ateles ateles program~ateles->proc~atl_solve_program program~ateles->proc~atl_initialize_program

Contents

Variables


Variables

TypeVisibilityAttributesNameInitial
integer, private :: iList
real(kind=rk), private, allocatable:: local_dt(:)