diff options
author | torset | 2009-01-27 13:37:01 +0000 |
---|---|---|
committer | torset | 2009-01-27 13:37:01 +0000 |
commit | 144963c0581158c31732e77e26823f40923c3ecb (patch) | |
tree | e6392978e4dd51d0a3a15cf58eca369d2c2687c2 /src/statisticsFunctions/variance/zcolumnvariancea.c | |
parent | 389138519aba9337322cb1ac753b01584d50357c (diff) | |
download | scilab2c-144963c0581158c31732e77e26823f40923c3ecb.tar.gz scilab2c-144963c0581158c31732e77e26823f40923c3ecb.tar.bz2 scilab2c-144963c0581158c31732e77e26823f40923c3ecb.zip |
Debug Variance(tests without Nono aren't used in the makefile)
Diffstat (limited to 'src/statisticsFunctions/variance/zcolumnvariancea.c')
-rw-r--r-- | src/statisticsFunctions/variance/zcolumnvariancea.c | 13 |
1 files changed, 11 insertions, 2 deletions
diff --git a/src/statisticsFunctions/variance/zcolumnvariancea.c b/src/statisticsFunctions/variance/zcolumnvariancea.c index 793cf3be..bba80303 100644 --- a/src/statisticsFunctions/variance/zcolumnvariancea.c +++ b/src/statisticsFunctions/variance/zcolumnvariancea.c @@ -15,11 +15,20 @@ void zcolumnvariancea(doubleComplex *in, int lines, int columns, doubleComplex* out){ - int i = 0 ; + doubleComplex* transp = (doubleComplex*) malloc ( sizeof (doubleComplex) *(unsigned int) (lines*columns)); + + + + ztransposea ( in , lines , columns , transp ) ; + + for ( i = 0; i < lines ; i++) - out[i] = zvariancea ( in + i*columns , columns ) ; + out[i] = zvariancea ( transp + i*columns , columns ) ; + + + free (transp); } |