Extra array manipulation commands

array_lappend arrayName list
eg.:

	% array set try {a 1 b 2}
	% array_lappend try {a a c 3}
	% array get try
	a {1 a} b 2 c 3

array_lget arrayName list ?default?
eg.:

	% array set try {a 1 b 2}
	% array_lget try {b c} def
	b 2 c def

array_trans varName list ?default?

returns a list of all the values in the array corresponding to the indices in the given list. If the index is not present in the array, the index itself will be returned. If $default is given, it will be returned for indices not in the array.

array_lset arrayName keylist valuelist
eg.:

	% array_lset try {a b} {1 2}
	% array get try
	a 1 b 2