name = 'numberBT/2' slug = 'preštej število vozlišč v binarnem drevesu' description = '''\
numberBT(T, N): N je število vozlišč v binarnem drevesuT.
numberBT(T, N)
N
T
?- numberBT(b(b(nil,2,nil),1,b(nil,3,nil)), N). N = 3.