#! /bin/csh -f -e

foreach f ( 0000 0001 )

  PZFilter \
    -inFile caquinhos-2-$f \
    -outFile zcaquinhos-2-$f-02-08-f \
    -lMin 2 \
    -lMax 8 \
    -nIter 30 \
    -spline
    
  PZFilter \
    -inFile caquinhos-2-$f \
    -outFile zcaquinhos-2-$f-08-32-f \
    -lMin 8 \
    -lMax 32 \
    -nIter 30 \
    -spline 
    
  PZFilter \
    -inFile caquinhos-2-$f \
    -outFile zcaquinhos-2-$f-16-64-f \
    -lMin 16 \
    -lMax 64 \
    -nIter 30 \
    -spline   
end


# foreach fg ( 02-08.02 08-32.08 16-64.16 )
foreach fg ( 16-64.16 )
  set step = "${fg:e}"
  set g = "${fg:r}"
  PZInvar \
    -inName zcaquinhos-2-0000-$g-f \
    -outName zcaquinhos-2-0000-$g-c \
    -squeeze 100.0 -step ${step}
  /bin/rm -f zcaquinhos-2-0000-$g-c.plt
  cat zcaquinhos-2-0000-$g-c.fcv \
  | egrep -e '^[-0-9]' \
  > zcaquinhos-2-0000-$g-c.plt
  show-curvature-plot zcaquinhos-2-0000-$g-c
end

 
foreach g ( 02-08 08-32 16-64 )
  PZInvar \
    -inName zcaquinhos-2-0001-$g-f \
    -outName zcaquinhos-2-0001-$g-c \
    -squeeze 100.0 -step 2
  /bin/rm -f zcaquinhos-2-0001-$g-c.plt
  cat zcaquinhos-2-0001-$g-c.fcv \
  | egrep -e '^[-0-9]' \
  > zcaquinhos-2-0001-$g-c.plt
  show-curvature-plot zcaquinhos-2-0001-$g-c
end


 foreach g ( 02-08 08-32 16-64 )
    PZDraw \
      -window  caquinhos-2-0000 \
      -outName zcaquinhos-2-0000-$g-d \
      -dots zcaquinhos-2-0000-$g-c -prec 0 \
      -eps -rect rect-0000 \
      < zcaquinhos-2-0000-$g-f.flc
    ghostview -openwindows zcaquinhos-2-0000-$g-d.eps
 end
 
foreach g ( 02-08 08-32 16-64 )
   PZDraw \
     -window  caquinhos-2-0001 \
     -outName zcaquinhos-2-0001-$g-d \
     -dots zcaquinhos-2-0001-$g-c -prec 0 \
     -eps -rect rect-0001  \
     < zcaquinhos-2-0001-$g-f.flc
   ghostview -openwindows zcaquinhos-2-0001-$g-d.eps
end
 
 
foreach g ( 02-08 08-32 16-64 )
PZMatrix \
  -xChain zcaquinhos-2-0000-$g-c \
  -yChain zcaquinhos-2-0001-$g-c \
  -outFile zcaquinhos-2-0000x0001-$g-112
 
xv zcaquinhos-2-0000x0001-$g-112.pgm &

end

set bin = /home/phd/hcgl/modula/PZTestMinimizer/SOLgnu
set segA1 =  circle-0000-02-08-f 0.61 0.85
set segB1 =  circle-0001-02-08-f  0.04 0.27 
set outName = circle-0000-0001-sib96

/usr/bin/rm circle-0000-0001-sib96-r.plt
nice +19 /home/phd/hcgl/modula/PZTestMinimizer/SOLgnu/PZTestMinimizer \
  -inName1 /home/phd/hcgl/modula/PZTestMinimizer/tests/circle-0000-f 0.61 0.85  \
  -inName2 /home/phd/hcgl/modula/PZTestMinimizer/tests/circle-0001-f  0.04 0.27 \
  -outName circle-0000-0001-sib96 \
  -random 35 \
  -maxEvals 250 \
  -nTries 50 \
  -trimEnds -draw -eps\
  | sort +1 -2n \
  > circle-0000-0001-sib96-r.plt

nice +19 ${bin}/PZTestMinimizer \
  -random 35 -matching -nTries ${nTries} \
  -inName1 ${segA1} \
  -outName ${outName}-m \
  -maxEvals 250 \
  -nTries 50 \
  -trimEnds -draw -eps \
  | sort +1 -2n \
  > ${outName}-m.plt