vb frequency, pstruct frequency' = .;

hash-map:array_hash_table:*+int:static:new (frequency', .capacity = average_length (&statistics)), 
{ 
  frequency, frequency' = alloc (&_, &__, T_STRUCT, hash-map:array_hash_table:*+int, AC_WRITE)         
};