удалить повторяющуюся строку и пустую строку

let undefined = ["string"; ""; "string"; "boolean";"";"innermost"]

У меня есть список, и я хочу написать функцию, возвращающую список без повторяющихся и пустых строковых списков. Например, приведенный выше список undefined вернет:

["string"; "boolean"; "innermost"]

Я пишу эту функцию, которую она возвращает для меня без дубликатов, но как я могу добавить условие с проверкой пустой строки.

let rec uniquify = function
| [] -> []
| x::xs -> x :: uniquify (List.filter ((<>) x) xs)

Большое спасибо