dc -e'[[NO]pq]sn?id2>nrd2>n*d2%1=n4>n[YES]p'