(init-round) ( out -- out temp quot )


Vocabulary
crypto.aes.private

Inputs
outan object


Outputs
outan object
tempan object
quotan object


Definition
USING: kernel math sequences ;

IN: crypto.aes.private

: (init-round) ( out -- out temp quot )
[ ] [ last ]
[ length 6 > [ aes-256-key ] [ aes-128-key ] if ] tri ;