reserve a,b,c,k,m,n for Nat;
reserve i,j for Integer;
reserve p for Prime;

theorem
  primesFinS 1 = <*2*>
  proof
    set f = primesFinS 1;
A1: len f = 1 by Def1;
    f.(0+1) = 2 by Def1,MOEBIUS2:8;
    hence thesis by A1,FINSEQ_1:40;
  end;
