MakeFilter

 MakeFilter - make Gabor filters at fixed scale with numOrient orientations

 "allFilter" contains all the Gabor sine and cosine pairs
 "allSymbol" contains bars for display purpose

0001 function [allFilter, allSymbol] = MakeFilter(scaleFilter, numOrient, SinglePrecision) 
0002 % MakeFilter - make Gabor filters at fixed scale with numOrient orientations
0003 %
0004 % "allFilter" contains all the Gabor sine and cosine pairs
0005 % "allSymbol" contains bars for display purpose
0006 allOrient  = (0:numOrient-1) * 180/numOrient; 
0007 allFilter = cell(1, numOrient); 
0008 allSymbol = cell(1, numOrient); 
0009 for o = 1 : numOrient
0010      [allFilter{1, o}, allSymbol{1, o}] = GaborFilter(scaleFilter, allOrient(o));
0011      if SinglePrecision > 0
0012          allFilter{1,o} = single(allFilter{1,o});
0013          allSymbol{1,o} = single(allSymbol{1,o});
0014      end
0015 end