Процесс грамма Шмидта - реализация клена

Question

Я ищу полный код процесса Грэма-Шмидта в Клене. Я нашел его в MatLab, но я не могу его перевести. Я знаю, что в библиотеке Maples есть метод GramSchmidt, но мне нужен полный код. Кто-нибудь знает, как его написать? Возможно, кто-то это сделал.

Answer 1

Как насчет того, чтобы начать с кода собственных реализаций библиотеки Maple, чтобы узнать, что вы можете сделать из них? Они не очень сложны.

Например, для набора (или список) векторов (с большой буквы V - Vector),

restart: 
interface(verboseproc=3): 
print(LinearAlgebra:-GramSchmidt); 

и для набора (или список) списков или ныне устаревших векторов (в нижнем регистре v - vector) ,

restart: 
interface(verboseproc=3): 
print(linalg[GramSchmidt]);