mg_timer_start Subroutine

public subroutine mg_timer_start(timer)

Uses

  • proc~~mg_timer_start~2~~UsesGraph proc~mg_timer_start~2 mg_timer_start mpi mpi proc~mg_timer_start~2->mpi

Arguments

Type IntentOptional Attributes Name
type(mg_timer_t), intent(inout) :: timer

Calls

proc~~mg_timer_start~2~~CallsGraph proc~mg_timer_start~2 mg_timer_start mpi_wtime mpi_wtime proc~mg_timer_start~2->mpi_wtime

Called by

proc~~mg_timer_start~2~~CalledByGraph proc~mg_timer_start~2 mg_timer_start proc~mg_fas_fmg~2 mg_fas_fmg proc~mg_fas_fmg~2->proc~mg_timer_start~2 proc~mg_fas_vcycle~2 mg_fas_vcycle proc~mg_fas_fmg~2->proc~mg_fas_vcycle~2 proc~mg_fas_vcycle~2->proc~mg_timer_start~2 proc~smooth_boxes~2 smooth_boxes proc~mg_fas_vcycle~2->proc~smooth_boxes~2 proc~smooth_boxes~2->proc~mg_timer_start~2 proc~diffusion_solve_acoeff~2 diffusion_solve_acoeff proc~diffusion_solve_acoeff~2->proc~mg_fas_fmg~2 proc~diffusion_solve_acoeff~2->proc~mg_fas_vcycle~2 proc~diffusion_solve_vcoeff~2 diffusion_solve_vcoeff proc~diffusion_solve_vcoeff~2->proc~mg_fas_fmg~2 proc~diffusion_solve_vcoeff~2->proc~mg_fas_vcycle~2 proc~diffusion_solve~2 diffusion_solve proc~diffusion_solve~2->proc~mg_fas_fmg~2 proc~diffusion_solve~2->proc~mg_fas_vcycle~2

Source Code

  subroutine mg_timer_start(timer)
    use mpi
    type(mg_timer_t), intent(inout) :: timer
    timer%t0 = mpi_wtime()
  end subroutine mg_timer_start