Factored out common semantic predicate.
Factored out common semantic predicate.

git-svn-id: https://svn.sable.mcgill.ca/mclab/Project@485 89b902b4-d83f-0410-b942-89f7a419ffdb

Migrated from Sable/mclab@eaa32b7df352376fcfb4a763db62015d71119060

Sable/mclab-core,Sable/mclab-core,Sable/mclab-core,Sable/mclab-core,Sable/mclab-core,Sable/mclab-core,Sable/mclab-core,Sable/mclab-core