let L be Semilattice; :: thesis: for x being Element of L holds downarrow x is meet-closed
let x be Element of L; :: thesis: downarrow x is meet-closed
reconsider x1 = x as Element of L ;
now :: thesis: for y, z being Element of L st y in the carrier of (subrelstr (downarrow x)) & z in the carrier of (subrelstr (downarrow x)) & ex_inf_of {y,z},L holds
inf {y,z} in the carrier of (subrelstr (downarrow x))
end;
then subrelstr (downarrow x) is meet-inheriting ;
hence downarrow x is meet-closed ; :: thesis: verum