let
menu_item ?char ?(log=
Log
.empty) v =
(char, log, v)