vis% ( vis -- )

Vocabulary

vin.private

Inputs

vis

an object

Outputs

None

Definition

USING: combinators kernel make math sequences strings ;

IN: vin.private

: vis% ( vis -- )
    {
        [ "vis" ,, ]
        [
            first "123456789ABCDEFGHJKLMNPRSTVWXY" index
            [ 2001 + "year" ,, ] when*
        ]
        [ second 1string "assembly_plant" ,, ]
    } cleave ;