
Page 18-69
n Place n dans la pile
p 2 + Calcule p+1
FOR j Commence la boucle, j = n-1 à p+1,
étape = -1
j COL− DROP Retire une colonne, la supprime de
la pile
-1 STEP Ferme la boucle FOR-STEP
ELSE
IF ‘p>n-1’ THEN
n 1 + Calcule n+1
p 1 + Calcule p+1
FOR j Commence la boucle avec j = n,
n+1, …, p+1.
x j ^ Calcule x
j
, comme une liste
OBJ ARRY Convertit la liste en ensemble
j COL+ Ajoute une colonne à la matrice
NEXT Ferme la boucle FOR-NEXT
END Termine la seconde clause IF
END Termine la première clause IF.
Produit X
y OBJ ARRY Convertit la liste y en ensemble
X yv Entre la matrice et l’ensemble
comme X et y
« ouvre le sous-programme 3
X yv MTREG X et y utilisés par le programme
MTREG
NUM Si nécessaire, convertit le point
flottant
b vecteur résultant passé comme b
« ouvre le sous-programme 4
b yv Place b et yv dans la pile
X b * Calcule X⋅b
- Calcule e = y - X⋅b
ABS SQ DUP Calcule SSE, en fait une copie
y ΣLIST n / Calculey
n 1 LIST SWAP CON Crée le vecteur de n valeurs de y
Comentários a estes Manuais