--- /dev/null	Thu Jan 01 00:00:00 1970 +0000
+++ b/samples/sort.tp	Sun Mar 22 22:06:50 2015 -0700
@@ -0,0 +1,16 @@
+#{
+	main <- {
+		a <- #[1 2 3 4 5 6 7 8 9]
+		b <- #[9 8 7 6 5 4 3 2 1]
+		c <- #[1 3 5 7 9 2 4 6 8 10]
+		d <- #[10 8 6 4 2 9 7 5 3 1]
+		a sort
+		print: (a join: " ") . "\n"
+		b sort
+		print: (b join: " ") . "\n"
+		c sort
+		print: (c join: " ") . "\n"
+		d sort
+		print: (d join: " ") . "\n"
+	}
+}
\ No newline at end of file