Substring/Top and tail: Difference between revisions

Content added Content deleted
(move the julia section so as to restore alphabetic order.)
Line 837: Line 837:


remove_last(L, LR) :-
remove_last(L, LR) :-
reverse(L, [_ | L1]),
append(LR, [_], L).</lang>
reverse(L1, LR).</lang>
Output :
Output :
<pre> ?- remove_first_last_chars.
<pre> ?- remove_first_last_chars.
Line 847: Line 846:
true.
true.
</pre>
</pre>

=={{header|PureBasic}}==
=={{header|PureBasic}}==
<lang PureBasic>If OpenConsole()
<lang PureBasic>If OpenConsole()