:- use_module(library(lists)).
:- list_to_set([3, 1, 4, 1, 5, 9, 2, 6, 5, 3, 5, 8, 9, 7, 9], S), writeln(S).