let L be complete LATTICE; :: thesis: for N being net of L holds inf N <= lim_inf N
let N be net of L; :: thesis: inf N <= lim_inf N
consider j being Element of N;
A1:
( ex_inf_of { (N . i) where i is Element of N : i >= j } ,L & ex_inf_of rng the mapping of N,L )
by YELLOW_0:17;
{ (N . i) where i is Element of N : i >= j } c= rng the mapping of N
then A4:
"/\" { (N . i) where i is Element of N : i >= j } ,L >= "/\" (rng the mapping of N),L
by A1, YELLOW_0:35;
set x = "/\" { (N . i) where i is Element of N : i >= j } ,L;
"/\" { (N . i) where i is Element of N : i >= j } ,L >= Inf
by A4, YELLOW_2:def 6;
then A5:
inf N <= "/\" { (N . i) where i is Element of N : i >= j } ,L
by WAYBEL_9:def 2;
set X = { ("/\" { (N . i) where i is Element of N : i >= j1 } ,L) where j1 is Element of N : verum } ;
{ ("/\" { (N . i) where i is Element of N : i >= j1 } ,L) where j1 is Element of N : verum } c= the carrier of L
then reconsider X = { ("/\" { (N . i) where i is Element of N : i >= j1 } ,L) where j1 is Element of N : verum } as Subset of L ;
reconsider X = X as Subset of L ;
A7:
"/\" { (N . i) where i is Element of N : i >= j } ,L in X
;
ex_sup_of X,L
by YELLOW_0:17;
then
X is_<=_than "\/" X,L
by YELLOW_0:def 9;
then
"/\" { (N . i) where i is Element of N : i >= j } ,L <= "\/" X,L
by A7, LATTICE3:def 9;
hence
inf N <= lim_inf N
by A5, YELLOW_0:def 2; :: thesis: verum