finish_gs2_init Subroutine

public subroutine finish_gs2_init()

Finish this module

Arguments

None

Contents

Source Code


Source Code

  subroutine finish_gs2_init()
    use run_parameters, only: save_init_times
    implicit none
    if (save_init_times) call write_init_times
    initialized = .false.
    if (allocated(init_levels)) deallocate(init_levels)
  end subroutine finish_gs2_init