advance_test Subroutine

public subroutine advance_test(istep)

FIXME : Add documentation

Arguments

Type IntentOptional Attributes Name
integer, intent(in) :: istep

Contents

Source Code


Source Code

  subroutine advance_test (istep)
    use fields_arrays, only: phi, apar, bpar, phinew, aparnew, bparnew
    use dist_fn, only: timeadv
    use dist_fn_arrays, only: g, gnew
    use array_utils, only: copy
    implicit none
    integer, intent (in) :: istep
    call copy(gnew, g)
    call timeadv (phi, apar, bpar, phinew, aparnew, bparnew, istep)
  end subroutine advance_test