AAAA ( char -- weight-levels )


Vocabulary
unicode.collation.private

Inputs
charan object


Outputs
weight-levelsan object


Definition
USING: kernel math ;

IN: unicode.collation.private

: AAAA ( char -- weight-levels )
[ base ] [ -15 shift ] bi + 32 2 <weight-levels> ; inline