reserve a,b,c,d,e,f for Real,
        k,m for Nat,
        D for non empty set,
        V for non trivial RealLinearSpace,
        u,v,w for Element of V,
        p,q,r for Element of ProjectiveSpace(V);
reserve o,p,q,r,s,t for Point of TOP-REAL 3,
        M for Matrix of 3,F_Real;
reserve pf for FinSequence of D;
reserve PQR for Matrix of 3,F_Real;
reserve R for Ring;

theorem Th76:
  Col(<*pf*>@,1) = pf
  proof
    len <*pf*> = 1 by FINSEQ_1:39;
    then
    dom <*pf*> = Seg 1 by FINSEQ_1:def 3;
    then Col(<*pf*>@,1) = Line(<*pf*>,1) by FINSEQ_1:1,MATRIX_0:58;
    hence thesis by Th72;
  end;
