@ -1988,7 +1988,7 @@
; SQRT: Incrementa cont-prg en 1, quita de la pila un elemento numerico, calcula su raiz cuadrada y la coloca al final de la pila.
SQRT (let [
res (Math.sqrt (last pila)),
res (Math/sqrt (last pila)),
nueva_pila (assoc pila (- (count pila) 1) res)
]
(recur cod regs-de-act (inc cont-prg) nueva_pila mapa-regs)