added pprint-str to get pprint version of object as string (with right trimmed)
added utility functions pch->notenum and analyze-intervals