1dcd68c269c7b35c1b502f4471909a66ae116548
[scilab.git] / scilab / modules / fileio / tests / nonreg_tests / bug_4339.dia.ref
1 // =============================================================================
2 // Scilab ( http://www.scilab.org/ ) - This file is part of Scilab
3 // Copyright (C) 2012 - DIGITEO - Antoine ELIAS
4 //
5 //  This file is distributed under the same license as the Scilab package.
6 // =============================================================================
7 //
8 // <-- Non-regression test for bug 4339 -->
9 //
10 // <-- Bugzilla URL -->
11 // http://bugzilla.scilab.org/show_bug.cgi?id=4339
12 //
13 // <-- Short Description -->
14 // listvarinfile does not manage graphic handles
15 clear;
16 warning("off")
17 //figure
18 hF = figure();
19 //axes + plot3d
20 plot3d();
21 hPlot3d = gca();
22 //axes + compound + polyline + legend
23 scf();
24 plot2d();
25 hPlot2d = gca();
26 //Fac3d
27 scf();
28 t = [0 : 0.3 : 2*%pi]';
29 z = sin(t) * cos(t');
30 [xx, yy, zz] = genfac3d(t, t, z);
31 plot3d([xx xx],[yy yy],list([zz zz+4],[4*ones(1,400) 5*ones(1,400)]))
32 hFac3d = gce();
33 clear t z xx yy zz;
34 //Rectangle
35 scf();
36 plot2d(0,0,-1,"010"," ",[-2,-2,2,2]);
37 xrect(-1,1,2,2);
38 hRectangle = gce();
39 //Arc
40 xarc(-1.5,1.5,3,3,0,360*64)
41 hArc = gce();
42 //Champ
43 champ(-5:5,-5:5,rand(11,11),rand(11,11))
44 hChamp = gce();
45 //Segs
46 x=2*%pi*(0:7)/8;
47 xv=[2*sin(x);9*sin(x)];
48 yv=[2*cos(x);9*cos(x)];
49 xsegs(xv,yv,1:8)
50 hSeg = gce();
51 clear x xv yv;
52 //Grayplot
53 scf();
54 m=5;n=5;
55 M=round(32*rand(m,n));
56 grayplot(1:m,1:n,M)
57 hGrayplot = gce();
58 clear m n M;
59 //Matplot
60 Matplot((1:xget("lastpattern")))
61 hMatplot = gce();
62 //Fec
63 scf();
64 x = [0 1 0 -1];
65 y = [0 0 1  1];
66 T = [1 1 2 3 1;
67 2 3 4 1 1];
68 z = [0 1 0 -1];
69 fec(x, y, T, z, strf="040", mesh=%t)
70 hFec = gce();
71 clear x y z T
72 //Text
73 xstring(0.5,0.5,"Text demo",0,0)
74 hText = gce();
75 //Axis
76 scf();
77 plot2d(1:10,1:10,1,"020")
78 // horizontal axis
79 drawaxis(x=2:7,y=4,dir="u",tics="v");
80 hAxis = gce();
81 //uimenu
82 hMenu = uimenu(hF,"label", "windows");
83 //uicontrol
84 hUiControl = uicontrol(hF,"style","listbox", "position", [10 10 150 160]);
85 save(TMPDIR + "/bug_4339.bin", "hUiControl", "hMenu", "hAxis", "hText", "hFec", "hMatplot", "hGrayplot", "hSeg", "hChamp", "hArc", "hRectangle", "hFac3d", "hPlot2d", "hPlot3d", "hF");
86 [varList, varSize] = listvarinfile(TMPDIR + "/bug_4339.bin");
87 varListRef = ["hUiControl"; "hMenu"; "hAxis"; "hText"; "hFec"; "hMatplot"; "hGrayplot"; "hSeg"; "hChamp"; "hArc"; "hRectangle"; "hFac3d"; "hPlot2d"; "hPlot3d"; "hF"];
88 assert_checkequal(gsort(varList), gsort(varListRef));