tem_destroy_sparta Subroutine

public subroutine tem_destroy_sparta(me)

Arguments

Type IntentOptional Attributes Name
type(tem_sparta_type), intent(inout) :: me

Called by

proc~~tem_destroy_sparta~~CalledByGraph proc~tem_destroy_sparta tem_destroy_sparta proc~load_tem load_tem proc~load_tem->proc~tem_destroy_sparta proc~tem_restart_readheader tem_restart_readHeader proc~tem_restart_readheader->proc~load_tem proc~tem_load_restart tem_load_restart proc~tem_load_restart->proc~tem_restart_readheader

Contents

Source Code


Source Code

  subroutine tem_destroy_sparta( me )
    type( tem_sparta_type ), intent(inout) :: me

    deallocate( me%send_count )
    deallocate( me%recv_count )
    deallocate( me%send_index )
    deallocate( me%recv_index )
  end subroutine tem_destroy_sparta