d3bb7ffa1be031aabb5b8deec1f4edc91ea730bb
[scilab.git] / scilab / modules / graphics / demos / cmplxfunc / demo_tan.dem.sce
1 // Scilab ( http://www.scilab.org/ ) - This file is part of Scilab
2 // Copyright (C) 2008 - INRIA
3 //
4 // This file is released under the 3-clause BSD license. See COPYING-BSD.
5
6 // =============================================================================
7 // tan
8 // =============================================================================
9
10 function demo_tan()
11
12     exec("SCI/modules/graphics/demos/cmplxfunc/MacCmplx.sci", -1);
13     R     = %pi/2-0.15;
14     theta = -130;
15     alpha = 73;
16
17     my_handle = scf(100001);
18     clf(my_handle,"reset");
19
20     PlotCmplxFunc(R,0,"Square","Ox",41,"tan",theta,alpha,[-R,R]);
21     demo_viewCode("demo_tan.dem.sce");
22
23 endfunction
24
25 demo_tan()
26 clear demo_tan;