The relation argument is the relation whose default fillers are to be found.
(defconcept B 
    :is (:and (:all r A) (:exactly 3 r) (:filled-by r Joe Fred))) 
(defconcept C 
    :is-primitive B 
    :implies (:and (:some s A) (:at-most 2 s)) 
    :defaults (:filled-by s Sue)) 
(get-role-default-values (fc C) (fr r)) ==>  NIL 
(get-role-default-values (fc C) (fr s)) ==>  (|I|SUE)