tasks a-s

Task/Optional-parameters/AppleScript/optional-parameters-1.applescript

@@ -0,0 +1,20 @@
+on sortTable(x)
+	set {sortOrdering, sortColumn, sortReverse} to {sort_lexicographic, 1, false}
+	try
+		set sortOrdering to x's ordering
+	end try
+	try
+		set sortColumn to x's column
+	end try
+	try
+		set sortReverse to x's reverse
+	end try
+	return sortOrdering's sort(x's sequence, sortColumn, sortReverse)
+end sortTable
+
+script sort_lexicographic
+	on sort(table, column, reverse)
+		-- Implement lexicographic Sorting process here.
+		return table
+	end sort
+end script

Task/Optional-parameters/AppleScript/optional-parameters-2.applescript

@@ -0,0 +1,15 @@
+-- Another sort function.
+script sort_colex
+	on sort(table, column, reverse)
+		-- Implement colexicographic Sorting process here.
+		return table
+	end sort
+end script
+
+-- Populate a table (list) with data.
+set table to {{1,2},{3,4}}
+
+sortTable({sequence:table, ordering:sort_lexicographic, column:1, reverse:false})
+sortTable({sequence:table, ordering:sort_colex, column:2, reverse:true})
+sortTable({sequence:table, reverse:true})
+sortTable({sequence:table})