IPP Software Navigation Tools IPP Links Communication Pan-STARRS Links

Changeset 8871


Ignore:
Timestamp:
Sep 21, 2006, 2:20:10 PM (20 years ago)
Author:
eugene
Message:

temporary debugging code

File:
1 edited

Legend:

Unmodified
Added
Removed
  • trunk/Ohana/src/opihi/cmd.data/fit2d.c

    r8297 r8871  
    9393
    9494    /* init registers for current pass */
    95     for (i = 0; i < nterm; i++) {
     95    // XXX this was incorrectly using nterm (missing 1 row)
     96    for (i = 0; i < wterm; i++) {
    9697      memset (c[i], 0, wterm*sizeof(double));
    9798      memset (b[i], 0, sizeof(double));
     
    160161    }
    161162
    162     gprint (GP_ERR, "matrix:\n");
    163     for (k = 0; k < wterm; k++) {
    164         for (K = 0; K < wterm; K++) {
    165             gprint (GP_ERR, "%f ", c[k][K]);
    166         }
    167         gprint (GP_ERR, "\n");
    168     }
    169 
    170163    dgaussj (c, wterm, b, 1);
    171 
    172     gprint (GP_ERR, "inverse:\n");
    173     for (k = 0; k < wterm; k++) {
    174         for (K = 0; K < wterm; K++) {
    175             gprint (GP_ERR, "%f ", c[k][K]);
    176         }
    177         gprint (GP_ERR, "\n");
    178     }
    179164
    180165    /** test print **/
Note: See TracChangeset for help on using the changeset viewer.