FIXME : Add documentation
Type | Intent | Optional | Attributes | Name | ||
---|---|---|---|---|---|---|
type(gs2_program_state_type), | intent(inout) | :: | state |
subroutine prepare_miller_geometry_overrides(state)
use overrides, only: init_miller_geometry_overrides
use gs2_init, only: init, init_level_list
type(gs2_program_state_type), intent(inout) :: state
if (.not. state%included) return
! Initialize to the level below so that overrides are triggered
call init(state%init, init_level_list%override_miller_geometry-1)
call init_miller_geometry_overrides(state%init%mgeo_ov)
end subroutine prepare_miller_geometry_overrides