seq() = {
	my(res = List()); 
	for(i = 100, 999, 
		si = Set(digits(i)); 
		if(#si == 3, 
			for(j = i, 999, 
				ti = Set(concat([si, digits(j), digits(i+j)]));
				if(#ti == 10, 
					listput(res, 10^7*i + 10^4*j + i+j);
					listput(res, 10^7*j + 10^4*i + i+j);	
				)
			)
		)
	);
	Set(res)
}