(caddr x) to (cadr (cdr x) fix