/* From https://twitter.com/KH2020H0/status/1601503380790448129 """ Find the missing numbe[sic!] 7 4 10 2 2 2 3 2 14 10 20 ? 9 4 3 2 """ Represented as 7,2,2,10 4,3,2,2 14,9,4,20 10,3,2,? Solutions: AllGood: [program = C * (A - B),res = 14,count = 29] [program = (A - B) * C,res = 14,count = 27] [program = (A - B) * (1 * C),res = 14,count = 23] [program = C * 1 * (A - B),res = 14,count = 22] [program = C / 1 * (A - B),res = 14.0,count = 15] [program = (A - B) * (C * 1),res = 14,count = 15] [program = 1 * C * (A - B),res = 14,count = 15] [program = (A - B) * (C / 1),res = 14.0,count = 4] resultMap = [14 = 6,14.0 = 2] */ data(missing_numer,Data,Vars,Unknown,Ops,Constants,MaxSize,Params) :- Data = [ [[7,2,2],10], [[4,3,2],2], [[14,9,4],20] ], Ops = [+,-,*,/], Vars = ['A','B','C'], Unknown = [10,3,2], Constants = 1..1, MaxSize = 3, Params = new_map([num_gens=30]).