Różnice

Różnice między wybraną wersją a wersją aktualną.

Odnośnik do tego porównania

Nowa wersja Both sides next revision
pl:prolog:pllib:ascending_sorting [2019/06/27 15:50]
127.0.0.1 edycja zewnętrzna
pl:prolog:pllib:ascending_sorting [2023/01/23 11:08]
ikaf [Listing]
Linia 11: Linia 11:
 rosn([], []). rosn([], []).
 rosn([X|T], S1) :- rosn(T, St), wstaw(X, St, S1). rosn([X|T], S1) :- rosn(T, St), wstaw(X, St, S1).
-wstaw(X, [Y|S1], [Y|Sl1]) :- XY, !, wstaw(X, S1, Sl1).+wstaw(X, [Y|S1], [Y|Sl1]) :- X>Y, !, wstaw(X, S1, Sl1).
 wstaw(X, S1, [X|S1]). wstaw(X, S1, [X|S1]).
  
pl/prolog/pllib/ascending_sorting.txt · ostatnio zmienione: 2023/01/23 11:10 przez ikaf
www.chimeric.de Valid CSS Driven by DokuWiki do yourself a favour and use a real browser - get firefox!! Recent changes RSS feed Valid XHTML 1.0