Metrica dada por una matriz simetrica definida positiva

> F:=linalg[hilbert](3);

[Maple Math]

> A := matrix([[1, 2], [4, 2], [5, 3]]):

> T:=Schmidt(A,F); Da una base ortonormal de Col(A) en la metrica de Hilbert anterior

[Maple Math]

Comprobacion