save_time Subroutine

  1. module_time.f90
  2. time_info
  3. save_time

public subroutine save_time()

Routine to make a backup copy of the time.

Arguments

None

Called by

proc~~save_time~~CalledByGraph proc~save_time save_time proc~rk4_step rk4_step proc~rk4_step->proc~save_time proc~rk5_step rk5_step proc~rk5_step->proc~save_time interface~rk5_step rk5_step interface~rk5_step->proc~rk5_step interface~rk4_step rk4_step interface~rk4_step->proc~rk4_step

Contents

Source Code

save_time

Source Code

  subroutine save_time ( )
  !! Routine to make a backup copy of the time.

    implicit none

    time_save = time
    qtime_save = qtime
  end subroutine save_time