loop by cdr not cddr