let A be non empty set ; for B being Element of Fin A
for L being 1_Lattice
for f, g being Function of A, the carrier of L st ( for x being Element of A st x in B holds
f . x [= g . x ) holds
FinMeet (B,f) [= FinMeet (B,g)
let B be Element of Fin A; for L being 1_Lattice
for f, g being Function of A, the carrier of L st ( for x being Element of A st x in B holds
f . x [= g . x ) holds
FinMeet (B,f) [= FinMeet (B,g)
let L be 1_Lattice; for f, g being Function of A, the carrier of L st ( for x being Element of A st x in B holds
f . x [= g . x ) holds
FinMeet (B,f) [= FinMeet (B,g)
let f, g be Function of A, the carrier of L; ( ( for x being Element of A st x in B holds
f . x [= g . x ) implies FinMeet (B,f) [= FinMeet (B,g) )
assume A1:
for x being Element of A st x in B holds
f . x [= g . x
; FinMeet (B,f) [= FinMeet (B,g)
hence
FinMeet (B,f) [= FinMeet (B,g)
by Th59; verum