List manipulation

There's a bit of a thread on the FM Community site about working with lists, to which I wrote an example SM function which I post here for interest....

https://community.filemaker.com/thread/188322

// liststest ( list1 ; list2 ; select? ; separator? )
// 18_07_10 JR
// v1.1
// 
//

JOIN = select?select.toInteger():1
LISTA = list1?list1.tokenize('\n'):[]
LISTB = list2?list2.tokenize('\n'):[]

SEP = separator?separator:' - '

switch(JOIN){

case 1: 
	LISTA.addAll(LISTB)
	return LISTA
break
case 2: 
	LISTA.removeAll(LISTB)
	return LISTA
break
case 3: 
	LISTB.removeAll(LISTA)
	return LISTB
break
case 4: 
	LISTA.addAll(LISTB)
	return LISTA.unique()
break
case 5: 
	result = ''
	LISTA.each(){
		def start = it
		LISTB.each(){
			result += start + SEP + it + '\n'
		}
	}
	return result
break
case 6: 
	if(LISTA.size() != LISTB.size()){
		return 'lists not same size'
	} else {
		result = ''
		i = 0
		LISTA.each(){
			result += it + SEP + LISTB.getAt(i) + '\n'
			i++
		}
	}
	return result
break
}

return 'select out of range'