summaryrefslogtreecommitdiff
path: root/src/statisticsFunctions/variance/zcolumnvariancea.c
diff options
context:
space:
mode:
authortorset2009-01-27 13:37:01 +0000
committertorset2009-01-27 13:37:01 +0000
commit144963c0581158c31732e77e26823f40923c3ecb (patch)
treee6392978e4dd51d0a3a15cf58eca369d2c2687c2 /src/statisticsFunctions/variance/zcolumnvariancea.c
parent389138519aba9337322cb1ac753b01584d50357c (diff)
downloadscilab2c-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.c13
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);
}