summaryrefslogtreecommitdiff
path: root/src/statisticsFunctions/variance/zvariancea.c
diff options
context:
space:
mode:
authortorset2009-01-08 15:15:18 +0000
committertorset2009-01-08 15:15:18 +0000
commitb8a8ffe66cf448ad1effb6ede471f6117133ba80 (patch)
treec5715ab54f8e3b3f2b2723c55669d889a8d95466 /src/statisticsFunctions/variance/zvariancea.c
parenteddd5cc74e9f744ff1109dfb1ede80ba12a31029 (diff)
downloadscilab2c-b8a8ffe66cf448ad1effb6ede471f6117133ba80.tar.gz
scilab2c-b8a8ffe66cf448ad1effb6ede471f6117133ba80.tar.bz2
scilab2c-b8a8ffe66cf448ad1effb6ede471f6117133ba80.zip
change (c/z)divises par (c/z)rdivs
Diffstat (limited to 'src/statisticsFunctions/variance/zvariancea.c')
-rw-r--r--src/statisticsFunctions/variance/zvariancea.c6
1 files changed, 3 insertions, 3 deletions
diff --git a/src/statisticsFunctions/variance/zvariancea.c b/src/statisticsFunctions/variance/zvariancea.c
index add08df5..17dabe59 100644
--- a/src/statisticsFunctions/variance/zvariancea.c
+++ b/src/statisticsFunctions/variance/zvariancea.c
@@ -38,12 +38,12 @@ doubleComplex zvariancea(doubleComplex *in, int size)
if ( fabs ( zreals ( sumc)) > 1e-16 || fabs ( zimags ( sumc)) > 1e-16 )
{
variance = zpows ( sumc ,DoubleComplex (2 , 0)) ;
- variance = zdivides ( variance , DoubleComplex ( size , 0 ) ) ;
+ variance = zrdivs ( variance , DoubleComplex ( size , 0 ) ) ;
variance = zdiffs ( sum , variance );
- variance = zdivides (variance , DoubleComplex ( (size - 1),0 ));
+ variance = zrdivs (variance , DoubleComplex ( (size - 1),0 ));
}
else
- variance = zdivides (sum , DoubleComplex ( (size - 1),0 ));
+ variance = zrdivs (sum , DoubleComplex ( (size - 1),0 ));
return variance ;
}