P1. Számsorozat generálása  

    % seq(+N, +M, -L): Az L lista M-N+1 hosszú, elemei 1 különbségû számtani
    % sorozatot alkotnak, és L első eleme (ha van) N, ahol N és M egész számok. 

    | ?- seq(2, 4, L).
    L = [2,3,4] ? ; no
    | ?- seq(4, 2, L).
    no
    | ?- seq(4, 3, L).
    L = [] ? ; no
    | ?- seq(-4, -2, L). 
    L = [-4,-3,-2] ? ; no

----------------------------------------------------------------

Írjon két klózt:

- Az első klóz legyen nem-rekurzív, amely az [] eredményt adja!

- A második klóz legyen rekurzív!

- Vigyázzon arra, hogy ha a lista elvárt hossza negatív -- pl. a

                    | ?-seq(4, 2, L).

  hívás esetén -- az eljárás hiúsuljon meg!