( RelStr(# the carrier of T, the InternalRel of T #) is SubSpace of T & not RelStr(# the carrier of T, the InternalRel of T #) is empty ) by Lm1;
hence ex b1 being SubSpace of T st
( b1 is strict & not b1 is empty ) ; :: thesis: verum