init_tstart Subroutine

public subroutine init_tstart(tstart)

FIXME : Add documentation

Arguments

Type IntentOptional Attributes Name
real, intent(in) :: tstart

Contents

Source Code


Source Code

  subroutine init_tstart (tstart)
    implicit none
    real, intent (in) :: tstart

    user_time = tstart
    code_time = tstart

  end subroutine init_tstart