reset_periodic_shell_mean_state Subroutine

public subroutine reset_periodic_shell_mean_state(state)

Arguments

Type IntentOptional Attributes Name
type(periodic_shell_mean_state_type), intent(inout) :: state

Called by

proc~~reset_periodic_shell_mean_state~~CalledByGraph proc~reset_periodic_shell_mean_state reset_periodic_shell_mean_state proc~initialize_fmm_state initialize_fmm_state proc~initialize_fmm_state->proc~reset_periodic_shell_mean_state proc~core_update_state_impl core_update_state_impl proc~core_update_state_impl->proc~initialize_fmm_state proc~reset_fmm_state reset_fmm_state proc~reset_fmm_state->proc~initialize_fmm_state proc~core_destroy_state_impl core_destroy_state_impl proc~core_destroy_state_impl->proc~reset_fmm_state

Source Code

  subroutine reset_periodic_shell_mean_state(state)
    type(periodic_shell_mean_state_type), intent(inout) :: state

    if (allocated(state%value)) deallocate (state%value)
    if (allocated(state%slope)) deallocate (state%slope)
  end subroutine reset_periodic_shell_mean_state