addpath ([pwd(),"/inst"]);

graphics_toolkit gnuplot;

## Avoid call of frsynabs with BFGS method, which would require
## the minFunc suite.

demos = {
    "audiocompression",
    "audiodenoise",
    "audioshrink",
    "auditoryfilterbank",
    "audscales",
    "dgt",
    "firwin",
    "framemul",
    "gabfir",
    "gablasso",
    "gabmixdual",
    "gabmulappr",
    "imagecompression",
    "nextfastfft",
    "nsdgt",
    "ofdm",
    "pbspline",
    "pgauss",
    "phaseplot"
};

cd inst/demos

for i = 1 : length (demos)
    file = sprintf ("demo_%s.m", demos {i});
    printf ("[%s]\n", file);
    fflush (stdout);
    source (file);
endfor

## wavfile = "../signals/gspi.wav";

## blockproc_demos = {
##     "basicloop",
##     "denoising",
##     "dgtequalizer",
##     "paramequalizer",
##     "pitchshift",
##     "slidingcqt",
##     "slidingerblets",
##     "slidingsgram"
## };

## ### Override blockplay
## function blockplay (f)
## endfunction

## for i = 1 : length (demos)
##     func = sprintf ("demo_blockproc_%s", blockproc_demos {i});
##     printf ("[%s]\n", func);
##     fflush (stdout);
##     eval (sprintf ("%s (wavfile);", func))
## endfor
