diff options
author | simon | 2009-08-24 10:07:20 +0000 |
---|---|---|
committer | simon | 2009-08-24 10:07:20 +0000 |
commit | 1480d3bdd424ea9f3af3702573fd5d6d60f0bb16 (patch) | |
tree | dfdb6c165aa0f4d1363f03aa7f668c3ef247ae0d /src/c/matrixOperations/division/zrdivzdv.c | |
parent | 52563febd5b3700de00369d85cb32a031bdc1617 (diff) | |
download | scilab2c-1480d3bdd424ea9f3af3702573fd5d6d60f0bb16.tar.gz scilab2c-1480d3bdd424ea9f3af3702573fd5d6d60f0bb16.tar.bz2 scilab2c-1480d3bdd424ea9f3af3702573fd5d6d60f0bb16.zip |
Added mixed type functions for right division , they are only convenient functions
Diffstat (limited to 'src/c/matrixOperations/division/zrdivzdv.c')
-rw-r--r-- | src/c/matrixOperations/division/zrdivzdv.c | 25 |
1 files changed, 25 insertions, 0 deletions
diff --git a/src/c/matrixOperations/division/zrdivzdv.c b/src/c/matrixOperations/division/zrdivzdv.c new file mode 100644 index 00000000..028702a4 --- /dev/null +++ b/src/c/matrixOperations/division/zrdivzdv.c @@ -0,0 +1,25 @@ +/* + * Scilab ( http://www.scilab.org/ ) - This file is part of Scilab + * Copyright (C) 2008-2009 - INRIA - Allan SIMON + * + * This file must be used under the terms of the CeCILL. + * This source file is licensed as described in the file COPYING, which + * you should have received as part of this distribution. The terms + * are also available at + * http://www.cecill.info/licences/Licence_CeCILL_V2-en.txt + * + */ + + +#include <malloc.h> +#include "zeros.h" +#include "matrixDivision.h" + +doubleComplex zrdivzdv (doubleComplex* in1,double* in2, int size) + { + double* ZEROS; + ZEROS=malloc((unsigned int)(size*sizeof(double))); + dzerosa(ZEROS,size , 1); + + return zrdivv(in1 , DoubleComplexMatrix(in2,ZEROS,size),size ); + } |