www.pudn.com > ica_C.rar > bss.c

#include "bss.h"
#define MAX_CORR 300

void mean0(int n, int m, matrix a)
{
  int i,j;
  vector ave;

  ave=new_vector(n);

  for(i=0;i0){*/

  for(i=0;i=0;--i){
      if(d[i]>0){lambda=EP-d[n-1];break;}
    }
    I=new_matrix(n,n);
    zeros(n,n,I);
    for(i=0;i