Listing 9 State tables for a dictionary sort

LOCALE DICT
NOTE dictionary collation sequence
collate[0, 0      ]  '.'         $0 $I $1
collate[0, 1:$#   ]              $I $1
collate[0, 'a':'z']  @@          $0 $I $1
collate[0, 'A':'Z']  $@+'a'-'A'  $0 $I $1
collate[1, 0      ]  $@          $0 $I $1
LOCALE end
 /*  End of File */