minor refactorings
rename extract closure occurrence methods
use Occurrences trait