<<VilGebra`

DiagonalizacionFC3D[{Subscript[x,1]^2-2 Subscript[x,1] Subscript[x,2]+Subscript[x,2]^2-2 Subscript[x,3]^2==2},10,0.5]