"resource:basis/alarms/alarms.factor" utf8 file-contents


 "[\n|\r|\t|\s\s]" <regexp> " " re-replace


[ length >array 20 head [ 1+ ] map  ] keep
[ swap clump ] curry map
! ... 

count-dups just-2+
[ [ second ] bi@ <=> ] sort reverse