my $docpos = $pos{$docID};
for (1 .. $tf) {
  $docpos->{vec ($dp, $index++, 32)}=\$order;
}