1 /*
2 * Scilab ( http://www.scilab.org/ ) - This file is part of Scilab
3 * Copyright (C) 2008 - DIGITEO - Antoine ELIAS
4 *
5 * Copyright (C) 2012 - 2016 - Scilab Enterprises
6 *
7 * This file is hereby licensed under the terms of the GNU GPL v2.0,
8 * pursuant to article 5.3.4 of the CeCILL v.2.1.
9 * This file was originally licensed under the terms of the CeCILL v2.1,
10 * and continues to be available under such terms.
11 * For more information, see the COPYING file which you should have received
12 * along with this program.
13 *
14 */
15 #include "basic_functions.h"
16
deyes(double * _pdblOut,int _iRows,int _iCols)17 void deyes(double *_pdblOut, int _iRows, int _iCols)
18 {
19 vDset(_iRows * _iCols, 0, _pdblOut, 1);
20 vDset(Min(_iRows, _iCols), 1, _pdblOut, _iRows + 1);
21 }
22