|
|
 |
|
» Invierte la matríz de datos y el número que representa el grado del polinómio. |
|
|
 |
|
» Duplica la matríz de datos que se encuentra en la pila (stack) y almacena el duplicado en la variable ΣDAT. |
|
|
 |
|
» Aplica el comando TRN (transpuesta) a la matríz de datos (intercambia filas por columnas) y utiliza el comando AXL para convertirla en una Lista de Listas (matríz lista). Los comandos OBJ y DROP descomponen la lista en sus elementos (en dos listas X e Y). |
|
|
 |
|
» Subprograma que calcula la sumatoria de los elementos de una lista, y el valor 0 (cero) que inicializará la variable 'm1'. |
|
|
 |
|
» El procedimiento ó subrutina toma el número que representa al grado del polinómio, las listas, el subprograma y el cero, y los asigna a las variables locales respectivas. |
|
|
 |
|
» Asigna a 'm1' ó sobreescribe a 'm1', con el valor 'm+1'. |
|
|
 |
|
» Plotea los datos ingresados (pares ordenados) y dibuja los ejes. |
|
|
 |
|
» Calcula la suma de los elementos de la lista 'y'. Primer elemento de la matríz columna. |
|
|
 |
|
» Bucle FOR NEXT que calcula desde 'Σ(x^1·y)' hasta 'Σ(x^m·y)'. Elementos que completan la matríz columna. |
|
|
 |
|
» Ensambla la matriz columna de (m+1)×1. |
|
|
 |
|
» Calcula el número de elemento de la lista 'X'. Primer elemento de la matríz cuadrada |
|
|
 |
|
» Bucle FOR NEXT que devuelve los terminos desde 'Σ(x^1)' hasta 'Σ(x^m)'. Elementos que completan la primera fila de la matríz cuadrada. |
|
|
 |
|
» Se inicia el bucle definido FOR NEXT desde 'm+1' hasta '2*m'. |
|
|
 |
|
» Duplica los 'm' elementos finales de la fila obtenida anteriormente, y calcula 'Σ(x^q)' para completar una nueva fila. |
|
|
 |
|
» Ensambla la matriz cuadrada de (m+1)×(m+1). |
|
|
 |
|
» Divide las matrices, el resultado: una matríz columna de 3×1 que contiene los coeficientes de la función cuadrática. |
|
|
 |
|
» Valor 1, primer término de la matríz fila que contendrá la parte literal del polinómio, terminos en función de 'X'. |
|
|
 |
|
» Bucle FOR NEXT que devuelve los terminos desde 'X^1' hasta 'X^s'. Términos de la matríz fila que contendrá la parte literal del polinómio, terminos en función de 'X'. |
|
|
 |
|
» Ensambla la matriz fila de 1×(m+1). |
|
|
 |
|
» Intercambia en la pila (stack) la matriz [[ 1 'X' 'X^2' ... 'X^m' ]] con la matríz de coeficientes y realiza el producto, el resultado: Matríz de 1×1 que contiene la expresión polinómial en función de 'X'. |
|
|
 |
|
» Extrae la función cuadrática de la matríz anterior y almacena su duplicado en la variable reservada 'EQ'. |
|
|
 |
|
» Activa el modo FUNCTION en la calculadora, representaciones gráficas del tipo función, luego DRAW dibuja la función cuadrática almacenada en EQ. Finalmente se activa el modo gráfico PICTURE. |
|
|