RosettaCodeData/Task/Sort-an-integer-array/Beads/sort-an-integer-array.beads

beads 1 program 'Sort an integer array'
calc main_init
	var arr = [4, 1, 2, -1, 3, 0, 2]
	var newarr : array of num
	loop across:arr sort:val count:c val:v
		newarr[c] = v