; Helper function to assist evaluate-expr