added another exit command to sub CALC_FACE_ELE