example :-
    between(1,5,I), nl, between(1,I,_J),
    write('*'), fail.
example.