hangul>jamo ( hangul -- jamo-string )

Vocabulary

unicode.normalize.private

Inputs

hangul

an object

Outputs

jamo-string

an object

Definition

USING: arrays kernel math ;

IN: unicode.normalize.private

: hangul>jamo ( hangul -- jamo-string )
    hangul-base - final-count /mod final-base +
    [ medial-count /mod medial-base + [ initial-base + ] dip ]
    dip dup final-base = [ drop 2array ] [ 3array ] if ;