Demo List.pro Lab4 part1

?- consult('list.pro').
% list.pro compiled 0.01 sec, 0 bytes

Yes
?- rnprint(10).
3
8
5
5
1
1
7
8
2
2

Yes
?- rnprint(4).
7
3
0
0

Yes
?- rnprint(6).
5
2
9
4
2
5

Yes
?- halt.