# code: http://golf.shinh.org/reveal.rb?Vowel+Density+FIXED/tails_1645294572&nbb
# target Nibbles version: 0.23
# commenter version: 0.1.2.181

& #(justify):[chr] 
    " " #(string):[chr] 
    / #(divide):int 
        * #(multiply):int 
            , #(length):int 
                | #(filter):[chr] 
                    @ #(= fstLine):[chr] 
                    ? #(index):int <--arg( A:chr ) 
                        "AEIOU" #(string):[chr] 
                        `) #(to uppercase):chr 
                            $ #(= A):chr 
            40 #(integer):int 
        , #(length):int 
            | #(filter):[chr] 
                @ #(= fstLine):[chr] 
                \ #(char class):[chr] <--arg( B:chr ) 
                    $ #(= B):chr 
                    S #(not.isSpace):null 
    "*" #(string):[chr]