SWI-Prolog
count3rmeasure