name = 'deleteBT/3' slug = 'izbriši element iz binarnega drevesa' description = '''\
deleteBT(X, T, NewT)
: binarno drevo NewT
dobimo iz T
tako, da izbrišemo eno pojavitev elementa X
. Če X
ni v listu, ga zamenjamo s korenom levega ali desnega poddrevesa. Program naj vrača vse veljavne rešitve.
?- deleteBT(1, b(b(b(nil,4,nil),2,b(nil,6,nil)),1,b(nil,3,b(nil,5,nil))), T). T = b(b(nil,4,b(nil,6,nil)),2,b(nil,3,b(nil,5,nil))) ; T = b(b(b(nil,4,nil),6,nil),2,b(nil,3,b(nil,5,nil))) ; T = b(b(b(nil,4,nil),2,b(nil,6,nil)),3,b(nil,5,nil)).''' hint = {}