4.3BSD/usr/contrib/apl/lib/fn/enc

r{ n enc v
r{ (nR2) N Dv+0.5