images/splitnodes1.eps
author Peter Kovacs <kpeter@inf.elte.hu>
Mon, 01 Mar 2010 02:26:24 +0100
changeset 54 e99a7fb6bff5
permissions -rw-r--r--
Port and rework LP demo files from SVN -r3524
kpeter@40
     1
%!PS-Adobe-2.0 EPSF-2.0
kpeter@40
     2
%%Title: edge disjoint path
kpeter@40
     3
%%Copyright: (C) 2006 LEMON Project
kpeter@40
     4
%%Creator: LEMON, graphToEps()
kpeter@40
     5
%%CreationDate: Fri May 12 01:53:21 2006
kpeter@40
     6
%%BoundingBox: -290 -170 470 230
kpeter@40
     7
%%EndComments
kpeter@40
     8
/lb { setlinewidth setrgbcolor newpath moveto
kpeter@40
     9
      4 2 roll 1 index 1 index curveto stroke } bind def
kpeter@40
    10
/l { setlinewidth setrgbcolor newpath moveto lineto stroke } bind def
kpeter@40
    11
/c { newpath dup 3 index add 2 index moveto 0 360 arc closepath } bind def
kpeter@40
    12
/sq { newpath 2 index 1 index add 2 index 2 index add moveto
kpeter@40
    13
      2 index 1 index sub 2 index 2 index add lineto
kpeter@40
    14
      2 index 1 index sub 2 index 2 index sub lineto
kpeter@40
    15
      2 index 1 index add 2 index 2 index sub lineto
kpeter@40
    16
      closepath pop pop pop} bind def
kpeter@40
    17
/di { newpath 2 index 1 index add 2 index moveto
kpeter@40
    18
      2 index             2 index 2 index add lineto
kpeter@40
    19
      2 index 1 index sub 2 index             lineto
kpeter@40
    20
      2 index             2 index 2 index sub lineto
kpeter@40
    21
      closepath pop pop pop} bind def
kpeter@40
    22
/nc { 0 0 0 setrgbcolor 5 index 5 index 5 index c fill
kpeter@40
    23
     setrgbcolor 1.1 div c fill
kpeter@40
    24
   } bind def
kpeter@40
    25
/nsq { 0 0 0 setrgbcolor 5 index 5 index 5 index sq fill
kpeter@40
    26
     setrgbcolor 1.1 div sq fill
kpeter@40
    27
   } bind def
kpeter@40
    28
/ndi { 0 0 0 setrgbcolor 5 index 5 index 5 index di fill
kpeter@40
    29
     setrgbcolor 1.1 div di fill
kpeter@40
    30
   } bind def
kpeter@40
    31
/nfemale { 0 0 0 setrgbcolor 3 index 0.0909091 1.5 mul mul setlinewidth
kpeter@40
    32
  newpath 5 index 5 index moveto 5 index 5 index 5 index 3.01 mul sub
kpeter@40
    33
  lineto 5 index 4 index .7 mul sub 5 index 5 index 2.2 mul sub moveto
kpeter@40
    34
  5 index 4 index .7 mul add 5 index 5 index 2.2 mul sub lineto stroke
kpeter@40
    35
  5 index 5 index 5 index c fill
kpeter@40
    36
  setrgbcolor 1.1 div c fill
kpeter@40
    37
  } bind def
kpeter@40
    38
/nmale {
kpeter@40
    39
  0 0 0 setrgbcolor 3 index 0.0909091 1.5 mul mul setlinewidth
kpeter@40
    40
  newpath 5 index 5 index moveto
kpeter@40
    41
  5 index 4 index 1 mul 1.5 mul add
kpeter@40
    42
  5 index 5 index 3 sqrt 1.5 mul mul add
kpeter@40
    43
  1 index 1 index lineto
kpeter@40
    44
  1 index 1 index 7 index sub moveto
kpeter@40
    45
  1 index 1 index lineto
kpeter@40
    46
  exch 5 index 3 sqrt .5 mul mul sub exch 5 index .5 mul sub lineto
kpeter@40
    47
  stroke
kpeter@40
    48
  5 index 5 index 5 index c fill
kpeter@40
    49
  setrgbcolor 1.1 div c fill
kpeter@40
    50
  } bind def
kpeter@40
    51
/arrl 1 def
kpeter@40
    52
/arrw 0.3 def
kpeter@40
    53
/lrl { 2 index mul exch 2 index mul exch rlineto pop} bind def
kpeter@40
    54
/arr { setrgbcolor /y1 exch def /x1 exch def /dy exch def /dx exch def
kpeter@40
    55
       /w exch def /len exch def
kpeter@40
    56
       newpath x1 dy w 2 div mul add y1 dx w 2 div mul sub moveto
kpeter@40
    57
       len w sub arrl sub dx dy lrl
kpeter@40
    58
       arrw dy dx neg lrl
kpeter@40
    59
       dx arrl w add mul dy w 2 div arrw add mul sub
kpeter@40
    60
       dy arrl w add mul dx w 2 div arrw add mul add rlineto
kpeter@40
    61
       dx arrl w add mul neg dy w 2 div arrw add mul sub
kpeter@40
    62
       dy arrl w add mul neg dx w 2 div arrw add mul add rlineto
kpeter@40
    63
       arrw dy dx neg lrl
kpeter@40
    64
       len w sub arrl sub neg dx dy lrl
kpeter@40
    65
       closepath fill } bind def
kpeter@40
    66
/cshow { 2 index 2 index moveto dup stringwidth pop
kpeter@40
    67
         neg 2 div fosi .35 mul neg rmoveto show pop pop} def
kpeter@40
    68
kpeter@40
    69
gsave
kpeter@40
    70
10 dup scale
kpeter@40
    71
%Edges:
kpeter@40
    72
gsave
kpeter@40
    73
15.6433 0.3 0.841178 -0.540758 -27 5 1 0 0 arr
kpeter@40
    74
19.5913 0.3 0.874157 0.485643 -27 5 1 0 0 arr
kpeter@40
    75
10.1803 0.3 0.98387 -0.178885 -20 17 1 0 0 arr
kpeter@40
    76
20.587 0.3 0.972806 0.231621 -18 -14 1 0 0 arr
kpeter@40
    77
15.7631 0.3 0.95448 -0.298275 -13 -4 0 0 0 arr
kpeter@40
    78
15.9706 0.3 0.707107 -0.707107 -9 15 1 0 0 arr
kpeter@40
    79
16.4642 0.3 0.916157 0.400819 -13 -4 1 0 0 arr
kpeter@40
    80
14.5242 0.3 0.966235 -0.257663 -12 7 0 0 0 arr
kpeter@40
    81
10.6619 0.3 0.857493 0.514496 -9 15 1 0 0 arr
kpeter@40
    82
22.4094 0.3 0.939793 -0.341743 3 3 1 0 0 arr
kpeter@40
    83
27.1602 0.3 0.958798 -0.284088 1 21 1 0 0 arr
kpeter@40
    84
25.9258 0.3 0.928477 0.371391 3 3 1 0 0 arr
kpeter@40
    85
25.9072 0.3 0.743294 0.668965 25 -15 1 0 0 arr
kpeter@40
    86
20.5407 0.3 0.928477 0.371391 25 -5 1 0 0 arr
kpeter@40
    87
18.7231 0.3 0.861934 -0.50702 28 13 1 0 0 arr
kpeter@40
    88
14.2315 0.3 0.393919 0.919145 39 -11 0 0 0 arr
kpeter@40
    89
10.6619 0.3 0.514496 -0.857493 39 13 1 0 0 arr
kpeter@40
    90
20.0238 0.3 0.428086 -0.903738 -27 5 1 0 0 arr
kpeter@40
    91
21.8035 0.3 0.964764 -0.263117 3 -9 1 0 0 arr
kpeter@40
    92
14.1328 0.3 0.991228 0.132164 -27 5 0 0 0 arr
kpeter@40
    93
13.5602 0.3 0.961524 0.274721 25 -15 0 0 0 arr
kpeter@40
    94
10 0.3 1 0 28 13 1 0 0 arr
kpeter@40
    95
12.8924 0.3 0.503871 0.863779 -27 5 1 0 0 arr
kpeter@40
    96
grestore
kpeter@40
    97
%Nodes:
kpeter@40
    98
gsave
kpeter@40
    99
-27 5 1 1 1 1 nc
kpeter@40
   100
-13 -4 1 1 1 1 nc
kpeter@40
   101
-9 15 1 1 1 1 nc
kpeter@40
   102
3 -9 1 1 1 1 nc
kpeter@40
   103
3 3 1 1 1 1 nc
kpeter@40
   104
1 21 1 1 1 1 nc
kpeter@40
   105
25 -5 1 1 1 1 nc
kpeter@40
   106
28 13 1 1 1 1 nc
kpeter@40
   107
45 3 1 1 1 1 nc
kpeter@40
   108
-18 -14 1 1 1 1 nc
kpeter@40
   109
25 -15 1 1 1 1 nc
kpeter@40
   110
-12 7 1 1 1 1 nc
kpeter@40
   111
39 -11 1 1 1 1 nc
kpeter@40
   112
39 13 1 1 1 1 nc
kpeter@40
   113
-20 17 1 1 1 1 nc
kpeter@40
   114
grestore
kpeter@40
   115
grestore
kpeter@40
   116
showpage