m0=: >:@(=&'''')#] | Double quotes in y (for execute) |
m1=: \:' '&~: | Move all blanks to end of list |
m2=: /:' '&= | Move all blanks to end of list |
m3=: \:' '&= | Move all blanks to beginning of list |
m4=: /:' '&~: | Move all blanks to beginning of list |
m5=: [: -. 1: #.~ 1: , ' '"_ = ] | Negative of count of trailing blanks in y |
m6=: (m5 |. ])"1 | Justify y right |
m7=: ' '&= | Locate blanks in y |
d8=: [:+/[<:/~([:m7])#[:i.[:#] | Word index in y from character index x |
m9=: -@<.@-:@(+/)@(*./\.)@(' '&=) | Rotation for centering left justified text |
m10=: m9"1 |."_1 ] | Center left justified text |
m11=: ] |.~ -@(+/)@(*./\.)@(' '&=) | Justify right |
m12=: ] |.~ (+/)@(*./\ )@(' '&=) | Justify left |
m13=: +/\@}:@(-//.@('()'"_ =/ ])) | Depth of parentheses in y |
d14=: <.@-:@([ - #@]) |. -@[ {. ] | Center y in field x wide |