Initial data commit

Task/Sorting-algorithms-Bubble-sort/Ra/sorting-algorithms-bubble-sort.ra

@@ -0,0 +1,31 @@
+class BubbleSort
+	**Sort a list with the Bubble Sort algorithm**
+	
+	on start
+		
+		args := program arguments
+		.sort(args)
+		print args
+	
+	define sort(list) is shared
+		**Sort the list**
+		
+		test
+			list := [4, 2, 7, 3]
+			.sort(list)
+			assert list = [2, 3, 4, 7]
+		
+		body
+			last := list.count - 1
+			
+			post while changed
+				
+				changed := false
+				
+				for i in last
+					
+					if list[i] > list[i + 1]
+						temp := list[i]
+						list[i] := list[i + 1]
+						list[i + 1] := temp
+						changed := true