(prim:write (prim:* 3 (prim:cdr (prim:cons 4 2))))