owverwrite face-normal-vector, see https://github.com/euslisp/EusLisp/pull/21