seq() = {
	my(res = List()); 
	for(i = 200, 999, 
		si = Set(digits(i)); 
		if(#si == 3, 
			for(j = 100, i-100, 
				ti = Set(concat([si, digits(j), digits(i-j)]));
				if(#ti == 9 && ti[1] != 0, 
					listput(res, 10^6*i + 10^3*j + i-j);
				)
			)
		)
	);
	Set(res)
}