cf() {
    local dir=$(bfs -L ${1:-.} -mindepth 1 \
        -path "*/\.git" -prune -o \
        -path "*/\.redo" -prune -o \
        -type d -print 2>/dev/null |
            fzf --height 40% --reverse --preview="tree -CN {}")
    [[ -z $dir ]] || { print -s cd $dir ; cd $dir }
}