File: _mesh.sci

package info (click to toggle)
scilab-plotlib 0.41-2
  • links: PTS, VCS
  • area: main
  • in suites: squeeze
  • size: 3,196 kB
  • sloc: xml: 3,308; makefile: 15
file content (18 lines) | stat: -rw-r--r-- 397 bytes parent folder | download | duplicates (2) 
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
 
function hdl=_mesh(varargin)

[lhs,rhs]=argn(0);

if rhs==0
  [u,v]=meshgrid(linspace(0,%pi,30),linspace(0,%pi,30));
  h1=_mesh(sin(v).*cos(u),sin(v).*sin(u),cos(v),'edgecolor','blue');
  _hold on
  h2=_mesh(sin(v).*cos(u),1-sin(v).*sin(u),cos(v),'edgecolor','red');
  _hold off
  _axis equal
  _axis([-1 1 -1 2 -1 1])
  hdl=[h1 h2];
else
   hdl=_mainPlot('mesh',varargin);
end

endfunction /////