Guest User

Untitled

a guest
Jun 18th, 2018
80
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
text 0.11 KB | None | 0 0
  1.  
  2. seq(V,V,_) :- !.
  3. seq(First,Last,N) :-
  4. Last > First,
  5. N is First,
  6. NewValue is First+1,
  7. seq(NewValue,Last,N).
Add Comment
Please, Sign In to add comment