1:- use_module(library(abbreviated_dates)). 2:- use_module(library(cli_table)). 3 4solutions(Text):- % E.g. solutions('11-09, št'). 5 Starting = date(2022,09,9), 6 findall([Date,Language,Country],format(Starting,Text,Date,Language,Country),Row), 7 cli_table(Row,[head(['Date','Language','Country'])]). 8 9format(Starting, Text, DateText, Language, Country):- 10 parse(Starting, Text, [Date], _, Language, Country), 11 format_time(string(DateText), "%A, %d %b %Y", Date)