tCorpus_compare function

Corpus comparison