Example from ordered binary tree notebook:
?- sjc(tree_add_Ee, `pop swap rolldown rrest ccons`).
func(tree_add_Ee, [_, [_, _|C], A, B|D], [[A, B|C]|D]).
true .
|
||
|---|---|---|
| .. | ||
| compiler.pl | ||
| defs.txt | ||
| metalogical.pl | ||
| thun.pl | ||
Example from ordered binary tree notebook:
?- sjc(tree_add_Ee, `pop swap rolldown rrest ccons`).
func(tree_add_Ee, [_, [_, _|C], A, B|D], [[A, B|C]|D]).
true .
|
||
|---|---|---|
| .. | ||
| compiler.pl | ||
| defs.txt | ||
| metalogical.pl | ||
| thun.pl | ||