(match-lambda [(top-category ('uri . top-uri) ('subs . sub-categories)) (list top-category top-uri sub-categories)] [_ #f] )