FIXME : Add documentation
Type | Intent | Optional | Attributes | Name | ||
---|---|---|---|---|---|---|
type(gs2_program_state_type), | intent(inout) | :: | state |
subroutine finalize_overrides(state)
use overrides, only: finish_profiles_overrides
use overrides, only: finish_miller_geometry_overrides
use overrides, only: finish_initial_values_overrides
type(gs2_program_state_type), intent(inout) :: state
if (state%init%mgeo_ov%is_initialised()) call state%init%mgeo_ov%finish()
if (state%init%prof_ov%is_initialised()) call state%init%prof_ov%finish()
if (state%init%initval_ov%is_initialised()) call state%init%initval_ov%finish()
end subroutine finalize_overrides