aboutsummaryrefslogtreecommitdiff
path: root/v_windows/v/examples/quick_sort.v
blob: f890749997b41c588522be074668401129a274b1 (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
import rand

const (
	gen_len = 1000 // how many random numbers to generate
	gen_max = 10000 // max of the generated numbers
)

fn main() {
	mut arr := []int{}
	for _ in 0 .. gen_len {
		arr << rand.intn(gen_max)
	}
	println('length of random array is $arr.len')
	println('before quick sort whether array is sorted: ${is_sorted<int>(arr)}')
	quick_sort<int>(mut arr, 0, arr.len - 1)
	println('after quick sort whether array is sorted: ${is_sorted<int>(arr)}')
}

fn quick_sort<T>(mut arr []T, l int, r int) {
	if l >= r {
		return
	}
	mut sep := l // what is sep: [...all_value<arr[sep]...sep...all_value>=arr[sep]...]
	for i in l + 1 .. r + 1 {
		if arr[i] < arr[l] {
			sep++
			arr[i], arr[sep] = arr[sep], arr[i]
		}
	}
	arr[l], arr[sep] = arr[sep], arr[l]
	quick_sort<T>(mut arr, l, sep - 1)
	quick_sort<T>(mut arr, sep + 1, r)
}

fn is_sorted<T>(arr []T) bool {
	for i in 0 .. arr.len - 1 {
		if arr[i] > arr[i + 1] {
			return false
		}
	}
	return true
}