a5c4c6cfde859923c83fafa4fee68b3888e5cd01
[scilab.git] / scilab / modules / integer / macros / %i_i_i.sci
1 // Scilab ( http://www.scilab.org/ ) - This file is part of Scilab
2 // Copyright (C) 1998-2011 - INRIA - Serge Steer
3 //
4 // Copyright (C) 2012 - 2016 - Scilab Enterprises
5 //
6 // This file is hereby licensed under the terms of the GNU GPL v2.0,
7 // pursuant to article 5.3.4 of the CeCILL v.2.1.
8 // This file was originally licensed under the terms of the CeCILL v2.1,
9 // and continues to be available under such terms.
10 // For more information, see the COPYING file which you should have received
11 // along with this program.
12
13 function left=%i_i_i(varargin)
14     //- insertion of an integer matrix in an matrix of integers
15     //            for more than 2 indices
16     // -insertion an integer matrix in an integer matrix which has a
17     //            different integer type
18
19     left  = varargin($);
20     rigth = varargin($-1);
21
22     rigth = iconvert(rigth, inttype(left));
23
24     left(varargin(1:$-2)) = rigth;
25 endfunction