doc/images/nodeshape_1.eps
author Peter Kovacs <kpeter@inf.elte.hu>
Thu, 12 Nov 2009 23:26:13 +0100
changeset 872 fa6f37d7a25b
permissions -rw-r--r--
Entirely rework CapacityScaling (#180)

- Use the new interface similarly to NetworkSimplex.
- Rework the implementation using an efficient internal structure
for handling the residual network. This improvement made the
code much faster (up to 2-5 times faster on large graphs).
- Handle GEQ supply type (LEQ is not supported).
- Handle negative costs for arcs of finite capacity.
(Note that this algorithm cannot handle arcs of negative cost
and infinite upper bound, thus it returns UNBOUNDED if such
an arc exists.)
- Extend the documentation.
ladanyi@152
     1
%!PS-Adobe-2.0 EPSF-2.0
ladanyi@152
     2
%%Title: LEMON GraphToEps figure
ladanyi@152
     3
%%Creator: LEMON GraphToEps function
ladanyi@152
     4
%%BoundingBox: 0 0 200 200
ladanyi@152
     5
%%EndComments
ladanyi@152
     6
/lb { setlinewidth setrgbcolor newpath moveto
ladanyi@152
     7
      4 2 roll 1 index 1 index curveto stroke } bind def
ladanyi@152
     8
/l { setlinewidth setrgbcolor newpath moveto lineto stroke } bind def
ladanyi@152
     9
/c { newpath dup 3 index add 2 index moveto 0 360 arc closepath } bind def
ladanyi@152
    10
/sq { newpath 2 index 1 index add 2 index 2 index add moveto
ladanyi@152
    11
      2 index 1 index sub 2 index 2 index add lineto
ladanyi@152
    12
      2 index 1 index sub 2 index 2 index sub lineto
ladanyi@152
    13
      2 index 1 index add 2 index 2 index sub lineto
ladanyi@152
    14
      closepath pop pop pop} bind def
ladanyi@152
    15
/di { newpath 2 index 1 index add 2 index moveto
ladanyi@152
    16
      2 index             2 index 2 index add lineto
ladanyi@152
    17
      2 index 1 index sub 2 index             lineto
ladanyi@152
    18
      2 index             2 index 2 index sub lineto
ladanyi@152
    19
      closepath pop pop pop} bind def
ladanyi@152
    20
/nc { 0 0 0 setrgbcolor 5 index 5 index 5 index c fill
ladanyi@152
    21
     setrgbcolor 1.1 div c fill
ladanyi@152
    22
   } bind def
ladanyi@152
    23
/nsq { 0 0 0 setrgbcolor 5 index 5 index 5 index sq fill
ladanyi@152
    24
     setrgbcolor 1.1 div sq fill
ladanyi@152
    25
   } bind def
ladanyi@152
    26
/ndi { 0 0 0 setrgbcolor 5 index 5 index 5 index di fill
ladanyi@152
    27
     setrgbcolor 1.1 div di fill
ladanyi@152
    28
   } bind def
ladanyi@152
    29
/arrl 1 def
ladanyi@152
    30
/arrw 0.3 def
ladanyi@152
    31
/lrl { 2 index mul exch 2 index mul exch rlineto pop} bind def
ladanyi@152
    32
/arr { setrgbcolor /y1 exch def /x1 exch def /dy exch def /dx exch def
ladanyi@152
    33
       /w exch def /len exch def
ladanyi@152
    34
       newpath x1 dy w 2 div mul add y1 dx w 2 div mul sub moveto
ladanyi@152
    35
       len w sub arrl sub dx dy lrl
ladanyi@152
    36
       arrw dy dx neg lrl
ladanyi@152
    37
       dx arrl w add mul dy w 2 div arrw add mul sub
ladanyi@152
    38
       dy arrl w add mul dx w 2 div arrw add mul add rlineto
ladanyi@152
    39
       dx arrl w add mul neg dy w 2 div arrw add mul sub
ladanyi@152
    40
       dy arrl w add mul neg dx w 2 div arrw add mul add rlineto
ladanyi@152
    41
       arrw dy dx neg lrl
ladanyi@152
    42
       len w sub arrl sub neg dx dy lrl
ladanyi@152
    43
       closepath fill } bind def
ladanyi@152
    44
/cshow { 2 index 2 index moveto dup stringwidth pop
ladanyi@152
    45
         neg 2 div fosi .35 mul neg rmoveto show pop pop} def
ladanyi@152
    46
ladanyi@152
    47
gsave
ladanyi@152
    48
100 dup scale
ladanyi@152
    49
%Edges:
ladanyi@152
    50
gsave
ladanyi@152
    51
grestore
ladanyi@152
    52
%Nodes:
ladanyi@152
    53
gsave
ladanyi@152
    54
1 1 1 0.2 1 0.2 nsq
ladanyi@152
    55
grestore
ladanyi@152
    56
grestore
ladanyi@152
    57
showpage