Nejsem si jisty, zda jsem pochopil co chces presne udelat. Chces v jednom stromu prohodit levou a pravou stranu?
Me prijde, ze ten strom mas vytvoreny nejak zbytecne slozite. Asi bych to udelal nasledovne.
definice listu:
leaf(X).
definice stromu:
tree((leaf|leaf)). //uzel v posledni vrstve
tree((tree|tree)). //vsechny ostatni uzly
prohozeni stran:
swap(tree(X|Y), tree(Y|X)). //funkce, kde jeden argument je prevraceny strom, ktery je ve druhem argumentu
Prolog uz jsem nejaky ten patek nevidel a tak se omlouvam, pokud placam nesmysly.
