sort_test Program

Uses

  • program~~sort_test~~UsesGraph program~sort_test sort_test module~array_m array_m program~sort_test->module~array_m module~sort_m sort_m program~sort_test->module~sort_m

ヒープソートの機能テスト


Calls

program~~sort_test~~CallsGraph program~sort_test sort_test proc~test_sort sort_test::test_sort program~sort_test->proc~test_sort proc~fisheryates_shuffle array_m::FisherYates_shuffle proc~test_sort->proc~fisheryates_shuffle proc~heap_sort sort_m::heap_sort proc~test_sort->proc~heap_sort proc~merge_sort sort_m::merge_sort proc~test_sort->proc~merge_sort proc~real2content sort_m::real2content proc~test_sort->proc~real2content node node proc~heap_sort->node

Contents

Variables

Subroutines


Variables

Type Attributes Name Initial
real, parameter :: test1(10) = [-9.0, -1.0, 0.0, 3.0, 5.0, 7.2, 14.4, 99.9, 122.5, 255.0]
real, parameter :: test2(11) = [-99.0, -9.0, -1.0, 0.0, 3.0, 5.0, 7.2, 14.4, 99.9, 122.5, 255.0]
real :: test3(10000)

Subroutines

subroutine test_sort(array_correct, sort_mode)

正解配列（ソート済み配列）を引数に取り、それをシャッフルしたのちにソートを行う 正解配列とソート後の配列を比較し、ソートが機能しているかを検証

Arguments

Type IntentOptional Attributes Name
real, intent(in) :: array_correct(:)
character(len=*), intent(in) :: sort_mode