 testing

       w = aforcew(N,widthp,Type)

       w           Time window in column vector

       N           Window length
       widthp      Width in percent of N
       Type        String 'Gaussian' bell (default), or 'Halfsine'

 Note: Before applying this window, care should be taken that the data
 sequence starts with zero, by executing x=x-x(1); if the force time
 history is in a column vector x.

 See also <a href="aexpw.html" class="code" title="function w=aexpw(N, EndFactor);">AEXPW</a> <a href