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

« back to all changes in this revision

Viewing changes to macros/metanet/ge_get_arcs_id.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  Ids=ge_get_arcs_id(sel)
 
2
//Copyright INRIA
 
3
//Author : Serge Steer 2002
 
4
 
 
5
  execstr('ArcId=EGdata_'+string(win)+'.ArcId')
 
6
  Ids=[]
 
7
  select ArcId
 
8
    case 1 then 
 
9
      if size(sel,1)==-1 then 
 
10
        Ids=string(1:size(GraphList.tail(sel),'*'))
 
11
      else
 
12
        Ids=string(sel)
 
13
      end
 
14
    case 2 then Ids=GraphList.edge_name(sel)
 
15
    case 3 then Ids=string(GraphList.edge_cost(sel))
 
16
    case 4 then Ids=string(GraphList.edge_min_cap(sel))
 
17
    case 5 then Ids=string(GraphList.edge_max_cap(sel))
 
18
    case 6 then Ids=string(GraphList.edge_length(sel))
 
19
    case 7 then Ids=string(GraphList.edge_q_weight(sel))
 
20
    case 8 then Ids=string(GraphList.edge_q_orig(sel))
 
21
    case 9 then Ids=string(GraphList.edge_weight(sel))
 
22
    case 10 then Ids=string(GraphList.edge_label(sel))
 
23
  end
 
24
endfunction