dc -e[?0 0?1 0!]n?d?-1+2/p2^-vp