#!/bin/csh
# Instrucciones para comprimir y descomprimir mediante red de Sanger
# ------------------------------------------------------------------

# Generamos conjuntos de entrenamiento y validacion
./splitpnm2pat -c -u -o train.pat -s8x8 pca.pgm

# Entrenamos red de Sanger
./sangers -m -a0.01 -i10 -t0 -e1 pca.rus

# Reconstriumos la imagen utilizando distintas caracteristicas
foreach a (1 2 4 6 8 12 16)
  cat cabres.txt >pca$a.res
  ./recons pca.ws pca.red 64 16 $a >> pca$a.res
  ./ressplit2pgm -opca$a.pgm pca$a.res
end

# Visualizamos todos los resultados
./xv pca*.pgm
