Massive indent of all codes:
[scilab.git] / scilab / modules / graphics / demos / anim / bubbleSort / bubbleSort.sci
1 //
2 // Scilab ( http://www.scilab.org/ ) - This file is part of Scilab
3 // Copyright (C) 2012-2012 - Scilab Enterprises - Bruno JOFRET
4 //
5 // This file must be used under the terms of the CeCILL.
6 // This source file is licensed as described in the file COPYING, which
7 // you should have received as part of this distribution.  The terms
8 // are also available at
9 // http://www.cecill.info/licences/Licence_CeCILL_V2-en.txt
10 //
11 //
12 function demo_bubbleSort()
13     function res=bubbleSort(in, polyline)
14         for (i = 1:size(in, "*"))
15             for (j = 1:i)
16                 if (in(i) < in(j))
17                     tmp = in(j);
18                     in(j) = in(i);
19                     in(i) = tmp;
20                     polyline.data(:,2) = in';
21                 end
22             end
23         end
24         res = in;
25     endfunction
26
27     nbValues = 200;
28     x = floor(rand(1, nbValues) * nbValues);
29     scf()
30     demo_viewCode(SCI+"/modules/graphics/demos/anim/bubbleSort/bubbleSort.sci");
31     plot(x, "diamond-");
32     a = gca();
33     e = a.children(1).children(1);
34     x = bubbleSort(x, e);
35     delete(gcf())
36 endfunction