Diferencias

Muestra las diferencias entre dos versiones de la página.

--- introalg:taller07_6 [2007/06/12 15:28] – nicolasw
+++ introalg:taller07_6 [2018/08/10 03:03] (actual) – editor externo 127.0.0.1
@@ Línea 187: / Línea 187: @@
   * Agregar //ordenaInsFrec// como un eslabón más a la cadena de funciones ''(frecuencia.(take 1000).partePalabras.leeArchivo) "14765-utf8.txt" '' para obtener en forma creciente la frecuencia de las primeras 1000 palabras de "El Gaucho Martín Fierro".
   * Redefinir //ordenaInsFrec// a partir de //insertaOrdFrec// y **//foldr//**.
@@ Línea 275: / Línea 276: @@
   Main> :set -u
   Main> (frecuencia''.(take 100).partePalabras.leeArchivo) "14765-utf8.txt"
-ArbolFrec_Nodo ("Palacio.",1) (ArbolFrec_Nodo ("by",3) (ArbolFrec_Nodo ("formatted",1) (ArbolFrec_Nodo ("set",1) (ArbolFrec_Nodo ("www.gutenberg.net",1) ArbolFrec_Nulo (ArbolFrec_Nodo ("this",1) (ArbolFrec_Nodo ("with",2) ...
+  ArbolFrec_Nodo ("Palacio.",1) (ArbolFrec_Nodo ("by",3) (ArbolFrec_Nodo ("formatted",1) (ArbolFrec_Nodo ("set",1) (ArbolFrec_Nodo ("www.gutenberg.net",1) ArbolFrec_Nulo (ArbolFrec_Nodo ("this",1) (ArbolFrec_Nodo ("with",2) ...
 ... y esto no se entiende nada!
@@ Línea 288: / Línea 289: @@
 Ahora si veamos como se comporta la versión ABB del problema:
-<code>
+  Main> (aplanaArbol.frecuencia''.(take 100).partePalabras.leeArchivo) "14765-utf8.txt"
-Main> (aplanaArbol.frecuencia''.(take 100).partePalabras.leeArchivo) "14765-utf8.txt"
+  [("Palacio.",1),("by",3),("formatted",1),("set",1),("www.gutenberg.net",1), ...
-[("Palacio.",1),("by",3),("formatted",1),("set",1),("www.gutenberg.net",1), ...
+  (58403 reductions, 104322 cells)
-(58403 reductions, 104322 cells)
-</code>
 Woohoo!