sforman
/
Thun
1
0
Fork 0
Code Issues Pull Requests Packages Projects Releases Wiki Activity

swapd function

This commit is contained in:
Simon Forman 2019-08-12 21:08:35 -07:00
parent aae0e91c44
commit 143b711028
1 changed files with 1 additions and 0 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

1
thun/gnu-prolog/thun.pl
View File

@ -94,6 +94,7 @@ func(unit, [X|S], [[X]|S]).
func(thunk, S , [X|S]).
func(rolldown, [A, B, C|S], [B, C, A|S]).
func(swapd, [A, B, C|S], [A, C, B|S]).
func(dupd, [A, B|S], [A, B, B|S]).
func(over, [A, B|S], [B, A, B|S]).
func(tuck, [A, B|S], [A, B, A|S]).