R help - Nov 2010 - Extract node names from BinaryTree in package party

Hi there,

I need to extract the variable names from all nodes (except the
terminal nodes) from a ctree object, e.g.

library(party)
mammoct <- ctree(ME ~ ., data = mammoexp)
plot(mammoct)

how can I extract the varnames from node   1 (SYMPT) and node 3 (PB)
from the fitted object "mammoct"?

Many Thanks, Sven