1 // =============================================================================
2 // Scilab ( http://www.scilab.org/ ) - This file is part of Scilab
3 // Copyright (C) 2010-2010 - DIGITEO - Sylvestre LEDRU
5 // This file is distributed under the same license as the Scilab package.
6 // =============================================================================
11 rnk = MPI_Comm_rank();
12 sizeNodes = MPI_Comm_size();
14 assert_checkequal(MPI_Comm_size(), 4);
16 SLV = rnk; // handy shortcuts, master is rank 0
17 Master = ~ SLV; // slaves are all other
25 assert_checkequal(b,42);
36 assert_checkequal(b2,[2,2;3,2]);