calc_common_global_timestep Function

private function calc_common_global_timestep(local_dt, proc) result(dt)

Function to find a single global time step for all levels and processes.

Arguments

Type	Intent	Optional	Attributes		Name
real(kind=rk),	intent(inout),		allocatable	::	local_dt(:)	Process local time steps on each level.
type(tem_comm_env_type),	intent(in)			::	proc	mpi communication enviroment with mpi communicator

Return Value real(kind=rk)

Resulting global time step for all processes and levels.