SimpleTensorQ

SimpleTensorQ[expr]
returns True if expr represents simple tensor e.g. |a>[b|. Returns False otherwise.