give the grandpa of Mason a call
[IN:CREATE_CALL [SL:CONTACT [IN:GET_CONTACT [SL:TYPE_RELATION grandpa ] [SL:CONTACT_RELATED Mason ] ] ] ]