let find_ele name e = match e with Element (e,_,_) when name = String.lowercase e -> true | _ -> false