reserve a,b,k,m,n,s for Nat;
reserve c,c1,c2,c3 for Complex;
reserve i,j,z for Integer;
reserve p for Prime;
reserve x for object;
reserve f,g for complex-valued FinSequence;

theorem Th63:
  <*c*>" = <*c"*>
  proof
A1: len(<*c*>") = len <*c*> by Th55
    .= 1 by FINSEQ_1:39;
    hence len(<*c*>") = len <*c"*> by FINSEQ_1:39;
    let k be Nat;
    assume 1 <= k & k <= len(<*c*>");
    then k = 1 by A1,XXREAL_0:1;
    hence <*c"*>.k = (<*c*>.k)"
    .= <*c*>".k by VALUED_1:10;
  end;
