Modified ThatRule for predicate adjective

For https://github.com/opencog/opencog/pull/1083