class="comment">%</span>
0004 <span class="comment">%       w = aforcew(N,widthp,Type)</span>
0005 <span class="comment">%</span>
0006 <span class="comment">%       w           Time window in column vector</span>
0007 <span class="comment">%</span>
0008 <span class="comment">%       N           Window length</span>
0009 <span class="comment">%       widthp      Width in percent of N</span>
0010 <span class="comment">%       Type        String 'Gaussian' bell (default), or 'Halfsine'</span>
0011 <span class=