fix arg error in : (defun :f,:x,:y,(g,:y,:x))