~ubuntu-branches/ubuntu/hoary/scilab/hoary

« back to all changes in this revision

Viewing changes to macros/metanet/ge_drawarcs.sci

  • Committer: Bazaar Package Importer
  • Author(s): Torsten Werner
  • Date: 2005-01-09 22:58:21 UTC
  • mfrom: (1.1.1 upstream)
  • Revision ID: james.westby@ubuntu.com-20050109225821-473xr8vhgugxxx5j
Tags: 3.0-12
changed configure.in to build scilab's own malloc.o, closes: #255869

Show diffs side-by-side

added added

removed removed

Lines of Context:
 
1
function ge_drawarcs(sel)
 
2
//Copyright INRIA
 
3
//Author : Serge Steer 2002
 
4
 
 
5
  arrowWidth=6;arrowLength=6;
 
6
  if or(type(sel)==[2 129]) then 
 
7
    sel=horner(sel,size(GraphList.tail,'*')),
 
8
  elseif size(sel,1)==-1 then 
 
9
    sel=1:size(GraphList.tail,'*'),
 
10
  end
 
11
  if GraphList.tail(sel)==[] then return,end
 
12
 
 
13
  [xx,yy,sel1,loops]=ge_arc_coordinates(sel)
 
14
  
 
15
  ge_draw_std_arcs(xx,yy,ge_get_arcs_id(sel1))
 
16
  
 
17
 
 
18
  if loops<>[] then
 
19
    loops=sel(loops)
 
20
    ge_draw_loop_arcs(loops)
 
21
  end
 
22
 
 
23
  if xget('pixmap') then xset('wshow'),end
 
24
endfunction
 
25