⊦ dnode(md, sdt).dir?
tree.dir? ⊦ ∃ md, sdt. tree = dnode(md, sdt)
Used simplifier rules: isdnode: ⊦ dnode(md, sdt).dir?;