plot.sh

   1 #!/bin/sh
   2 # vim: set tabstop=4 softtabstop=4 shiftwidth=4 expandtab:
   3 #
   4 # Trabajo Práctico I de Análisis Numérico I
   5 # Genera gráficos con los resultados de las corridas utilizando
   6 # GNU Plot.
   7 # Copyright (C) 2002 Leandro Lucarella <leandro@lucarella.com.ar>
   8 #
   9 # Este programa es Software Libre; usted puede redistribuirlo
  10 # y/o modificarlo bajo los términos de la "GNU General Public
  11 # License" como lo publica la "FSF Free Software Foundation",
  12 # o (a su elección) de cualquier versión posterior.
  13 #
  14 # Este programa es distribuido con la esperanza de que le será
  15 # útil, pero SIN NINGUNA GARANTIA; incluso sin la garantía
  16 # implícita por el MERCADEO o EJERCICIO DE ALGUN PROPOSITO en
  17 # particular. Vea la "GNU General Public License" para más
  18 # detalles.
  19 #
  20 # Usted debe haber recibido una copia de la "GNU General Public
  21 # License" junto con este programa, si no, escriba a la "FSF
  22 # Free Software Foundation, Inc.", 59 Temple Place - Suite 330,
  23 # Boston, MA  02111-1307, USA.
  24 #
  25 # $URL$
  26 # $Date$
  27 # $Rev$
  28 # $Author$
  29 #
  30
  31 # Genera todos los gráficos del punto d
  32 for (( n=4; n <= 32; n*=2 )); do
  33     sed "s/<N>/$n/g" d.gnuplot | gnuplot
  34 done
  35
  36 # Genera gráficos del punto e-g
  37 sed "s/<A>/e/g" efg.gnuplot | sed "s/<B>/1.35/g" | gnuplot
  38
  39 # Genera gráficos del punto f-g
  40 sed "s/<A>/f/g" efg.gnuplot | sed "s/<B>/1.85/g" | gnuplot
  41
  42 # Genera gráficos para el informe.
  43 for f in regiones grilla mother; do
  44     xcftopnm $f.xcf | pnmtops -imagewidth 3 -dpi 360 > $f.eps
  45 done