Function MoreNumerousP + tests + some comments.