🧪 Example is still work in progress.
:- between(1,100,_), board_data(X, Y), assertz(data(train, X, Y)), fail; true. :- between(1,100,_), board_data(X, Y), assertz(data(val, X, Y)), fail; true.
plot :- length(H, 10), maplist(=(0), H), noise_train_list2(H, train, 19, 200, _, _). :- plot.
plot2 :- length(H, 10), maplist(=(0), H), noise_train_list3(H, train, val, 19, 200, _, _). :- plot2.