theorem Lm14:
  for f being real-valued FinSequence holds len cot f = len f
  proof
    let f be real-valued FinSequence;
    dom cot f = dom f by Def3;
    hence thesis by FINSEQ_3:29;
  end;
