range= -5:1:5
xBF.dt = 0.0625;
xBF.name = 'Gamma functions';
xBF.length = 32;
xBF.order = 4;
BM = spm_get_bf(xBF);

figure; hold on;

a =0;b=0;c=0;d=0;
wait_s = 0.5;
for a = range
    f = [a b c d] * BM.bf';
    plot(f)
    pause(wait_s)
    display('changing a');
end
a =0;b=0;c=0;d=0;
for b = range
    f = [a b c d] * BM.bf';
    plot(f)
    pause(wait_s)
    display('changing b');
end
a =0;b=0;c=0;d=0;
for c = range
        f = [a b c d] * BM.bf';
    plot(f)
    pause(wait_s)
    display('changing c');
end
a =0;b=0;c=0;d=0;
for d = range                
	f = [a b c d] * BM.bf';
    plot(f)
    pause(wait_s)
    display('changing d');
end

clf;hold on;
for i = 1:100
    a = rand
    b = rand
    c = rand
    d = rand
    f = [a b c d] * BM.bf';
    plot(f, 'Color', [0.5 .5 .5])
end
figure; hold on;
for a = range
    for b = range
        for c = range
            for d = range
                f = [a b c d] * BM.bf';
                plot(f)
            end
        end
    end
end