Breadth-First
Searching a Labeled Tree
Searching a Labeled Tree
lfindInTreeBF(P, T) =
findInForest(P, [T]);
lfindInForest(P, [ ]) => [ ];
l findInForest(P, [Tree | Trees]) =>
Root = root(Tree),
foundInRest = findInForest(P, append(Trees, getOffspring(Tree))),
P(Root) ? [Root | foundInRest] : foundInRest;
lfindInForest(P, [ ]) => [ ];
l findInForest(P, [Tree | Trees]) =>
Root = root(Tree),
foundInRest = findInForest(P, append(Trees, getOffspring(Tree))),
P(Root) ? [Root | foundInRest] : foundInRest;
forest of
one tree