IPP Software Navigation Tools IPP Links Communication Pan-STARRS Links

Changeset 8872


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

added kernel renormalization

File:
1 edited

Legend:

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

    r7917 r8872  
    7777
    7878 have_kernel:
     79  /* normalize kernel */
     80  val = 0;
     81  for (n = 0; n < 3; n++) {
     82    for (m = 0; m < 3; m++) {
     83      val += kernel[n][m];
     84    }
     85  }
     86  if (val == 0) {
     87    gprint (GP_ERR, "kernel has zero power, not renormalizing...");
     88  } else {
     89    for (n = 0; n < 3; n++) {
     90      for (m = 0; m < 3; m++) {
     91        kernel[n][m] /= val;
     92      }
     93    }
     94  }
     95
    7996  gprint (GP_ERR, "working...");
    8097 
Note: See TracChangeset for help on using the changeset viewer.