[
        all-slots [ name>> ] map
        [
            reverse! members 
            [ length narray reverse! ] keep 
            [ swap 2array ] 2map
        ] keep
    ]
    [
        initial-values reverse!
        [ 2array ] 2map
        [
            '[
                [ first ] [ last ] bi
                _ swap '[ drop _ ] change-at
            ] each
        ] keep
        reverse! [ last ] each
    ] 
    [
        boa
    ] tri