
theorem Th26:
  for L be add-associative right_zeroed right_complementable
left-distributive non empty doubleLoopStr for p be sequence of L holds 0.L*p
  = 0_.(L)
proof
  let L be add-associative right_zeroed right_complementable left-distributive
  non empty doubleLoopStr;
  let p be sequence of L;
   for n being Element of NAT holds (0_.(L)).n = 0.L*p.n by FUNCOP_1:7;
  hence thesis by Def4;
end;
