1
function ge_do_options()
3
//Author : Serge Steer 2002
5
execstr('global EGdata_'+w+';EGdata=EGdata_'+w)
6
node=list('Nodes',EGdata.NodeId+1,['Nothing','Number','Name','Demand','Label'])
7
arc=list('Arcs',EGdata.ArcId+1,['Nothing','Number','Name','Cost','Min cap','Max cap',..
8
'Length', 'Quadratic weight','Quadratic origin', ...
10
rep=x_choices("Select information to display",list(node,arc))
12
if EGdata.NodeId<>rep(1)-1 | ...
13
EGdata.ArcId<>rep(2)-1 then
14
EGdata.NodeId=rep(1)-1
16
execstr('EGdata_'+w+'=EGdata')
17
GraphList=EGdata.GraphList
20
ge_drawobjs(GraphList),