1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28 29 30 31 32 33 34 35 36 37 38 39 40 41 42 43 44 45 46 47
|
# vim: syntax=perl
# Ronald L. Rardin. "Optimizations in Operations Research"
# p.414 "Two Ring Circus"
# workaround for a possible bug in perl-base-5.8.2-2mdk
{
"-name" => "Two Ring Circus",
-type => "graph",
-linear_transform => {
-scale => [1, -1],
-offset => [0, 345],
},
-directed => 1,
-init_data => {
lin => { -pos => [ 45, 300],
dav => 3.6, wic => 2.8, spr => 4.6
},
dav => { -pos => [150, 300],
lin => 2.0, spr => 0.1
},
wic => { -pos => [ 45, 225],
lin => -0.4, spr => 2.3, lit => 1.3
},
spr => { -pos => [195, 240],
lin => 3.1, dav => 0.2, wic => 3.6, lit => 3.0, cha => 4.0
},
lit => { -pos => [120, 180],
wic => 1.5, spr => 1.5, cha => 1.6, jac => -0.9
},
cha => { -pos => [300, 180],
spr => 2.5, lit => 1.6, jac => 0.8, mon => -0.6
},
jac => { -pos => [ 90, 120],
lit => 1.1, cha => 2.8, mon => 1.6, tal => 3.5
},
mon => { -pos => [225, 120],
cha => 0.9, jac => 1.1, tal => 0.7
},
tal => { -pos => [270, 45],
jac => 4.5, mon => 2.2
},
},
}
|