diff options
author | Ankit Raj | 2017-06-21 10:26:59 +0530 |
---|---|---|
committer | Ankit Raj | 2017-06-21 10:26:59 +0530 |
commit | 958577cac90a99124cd673fde1926781d966d91f (patch) | |
tree | 134d9fe7f5b97a647cb055bb7b4c21820a749f49 /src/c/string/disp/ddisph.c | |
download | scilab2c-958577cac90a99124cd673fde1926781d966d91f.tar.gz scilab2c-958577cac90a99124cd673fde1926781d966d91f.tar.bz2 scilab2c-958577cac90a99124cd673fde1926781d966d91f.zip |
Updated Scilab2C
Diffstat (limited to 'src/c/string/disp/ddisph.c')
-rw-r--r-- | src/c/string/disp/ddisph.c | 32 |
1 files changed, 32 insertions, 0 deletions
diff --git a/src/c/string/disp/ddisph.c b/src/c/string/disp/ddisph.c new file mode 100644 index 00000000..71cda9f4 --- /dev/null +++ b/src/c/string/disp/ddisph.c @@ -0,0 +1,32 @@ +/* + * Scilab ( http://www.scilab.org/ ) - This file is part of Scilab + * Copyright (C) 2010-2010 - DIGITEO - Bruno JOFRET + * + * 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 "disp.h" + +double ddisph (double* in, int rows, int columns, int levels){ + int i = 0,j = 0,k = 0; + + for (k = 0; k < levels; ++k) + { + printf("(:, :, %d)\n", k + 1); + for (i = 0; i < rows; ++i) + { + for (j=0;j<columns;j++) + { + printf (" %1.20f ", in[i+j*rows+k*columns*rows]); + } + printf("\n"); + } + printf("\n"); + } + return 0; +} |