(defun complement (s1 s2))