← Back to branch summary

~openhri/openhri/sptk

« back to all changes in this revision

Viewing changes to src/lib/theq.c

  • Committer: uratec
  • Date: 2014-12-30 06:29:49 UTC
  • Revision ID: uratec-20141230062949-r5d8krjnoort8c37
fix a bug in theq() suggested by Ryuichi Yamamoto.

Show diffs side-by-side

added added

removed removed

Lines of Context:
src/lib/theq.c
44
44
 
45
45
/******************************************************************
46
46
 
47
 
    $Id: theq.c,v 1.20 2014/12/11 08:30:53 uratec Exp $
 
47
    $Id: theq.c,v 1.21 2014/12/30 06:29:49 uratec Exp $
48
48
 
49
49
    Subroutine for Solving a Toeplitz plus Hankel
50
50
    Coefficient Matrix System of Equations  ( T + H ) a = b
298
298
      size = n;
299
299
   }
300
300
   if (n > size) {
301
 
      for (i = 0; i < n; i++) {
 
301
      for (i = 0; i < size; i++) {
302
302
         free((char *) r[i]);
303
303
         free((char *) x[i]);
304
304
         free((char *) xx[i]);