let R be LatAugmentation of L; :: thesis: R is join-absorbing
LattStr(# the carrier of L, the L_join of L, the L_meet of L #) = LattStr(# the carrier of R, the L_join of R, the L_meet of R #) by Def9;
hence R is join-absorbing by Th13; :: thesis: verum