theorem
  0 * p = |[ 0,0,0 ]|
proof
  thus 0 * p = |[ 0 * p.1,0 * p.2,0 * p.3]| by Lm1
 .= |[ 0,0,0 ]|;
end;
