4.3BSD/usr/lib/adb/findproc

.>4
*nproc>l
*proc>f
<l="l="X
<f="f="X
<4="4="X
,<l$<findproc.nxt
,<l$<
0>f
<4=D"proc not found"