S.I/Lisp/

EMPTYLIST?

=EMPTYLIST?("()")
-> TRUE

=EMPTYLIST?({})
-> TRUE
        

DEFINE(
    EMPTYLIST?,
    LAMBDA(
        input,
        LET(
            occupied_cells,
                COUNTA(input),
            blank_cells,
                COUNTBLANK(input),
            IF(
                ONE?(
                    SUM(
                        occupied_cells,
                        blank_cells)),
                OR(
                    ISBLANK(input),
                    EQUAL(
                        input,
                        "()"),
                NO)))))
        

Help us optimize this function