Allocate arrays for storing omega history and averages
Type | Intent | Optional | Attributes | Name | ||
---|---|---|---|---|---|---|
type(diagnostics_type), | intent(in) | :: | gnostics |
subroutine init_diagnostics_omega(gnostics)
use kt_grids, only: ntheta0, naky
use diagnostics_config, only: diagnostics_type
implicit none
type(diagnostics_type), intent(in) :: gnostics
allocate (omegahist(0:gnostics%navg-1,ntheta0,naky))
allocate(domega(gnostics%navg,ntheta0,naky))
allocate(omega_average(ntheta0, naky))
omegahist = 0.0
omega_average = 0.0
end subroutine init_diagnostics_omega