declare-user-mode paragraph
declare-option -hidden str paragraph_select '<a-a>pj[p'

map -docstring 'paragraph mode' global user <ret> "%opt{paragraph_select}: enter-user-mode -lock paragraph<ret>"
map global paragraph I '>' -docstring 'move right'
map global paragraph M '<' -docstring 'move left'
map global paragraph E "d[pP[p%opt{paragraph_select}" -docstring 'move up'
map global paragraph N "d]pp]p[p%opt{paragraph_select}" -docstring 'move down'
map global paragraph n "]p%opt{paragraph_select}"       -docstring 'select down'
map global paragraph e "[p%opt{paragraph_select}"       -docstring 'select up'
map global paragraph d "d%opt{paragraph_select}"        -docstring 'delete'
map global paragraph y y                                -docstring 'yank'