#!/usr/bin/awk -f # vim: set tabstop=4 softtabstop=4 shiftwidth=4 expandtab: # # Trabajo Práctico I de Análisis Numérico I # Muestra el resultado de una iteración de forma más agradable. # Copyright (C) 2002 Leandro Lucarella # # Este programa es Software Libre; usted puede redistribuirlo # y/o modificarlo bajo los términos de la "GNU General Public # License" como lo publica la "FSF Free Software Foundation", # o (a su elección) de cualquier versión posterior. # # Este programa es distribuido con la esperanza de que le será # útil, pero SIN NINGUNA GARANTIA; incluso sin la garantía # implícita por el MERCADEO o EJERCICIO DE ALGUN PROPOSITO en # particular. Vea la "GNU General Public License" para más # detalles. # # Usted debe haber recibido una copia de la "GNU General Public # License" junto con este programa, si no, escriba a la "FSF # Free Software Foundation, Inc.", 59 Temple Place - Suite 330, # Boston, MA 02111-1307, USA. # # $URL$ # $Date$ # $Rev$ # $Author$ # { print "Iteraciones: " $1 printf "Radio espectral experimental: %.2f\n", $3 for ( i = 4; i <= NF; i+=9 ) { for ( j = 0; (j < 9) && (i+j < NF); j++ ) { printf "%5.2f ", $(i+j) } printf "\n" } }