Minor tweak to Haskell code re StateBinTreeBuild demo program