let parse_config config (tag:string) f = let is_config = filter_tag config tag in if ((List.length is_config) > 0) then (f (List.hd is_config))