1# plotdemos16.tcl --
2#     Test performance profiles
3#
4#     This type of diagrams is used when comparing a set of numerical methods
5#     for their performance on a set of solved problems. For the performance
6#     measure: the lower the value the better.
7#
8#     Reference:
9#     Desmond Higham and Nicholas Higham
10#         Matlab Guide
11#         SIAM, 2005, Philadephia
12#
13#
14source ../../plotchart.tcl
15package require Plotchart
16
17
18#
19# Performance profile
20#
21pack [canvas .c1 -bg white]
22
23set p [::Plotchart::createPerformanceProfile .c1 5.0]
24
25#
26# Data copied from Higham and Higham
27#
28$p dataconfig ode23  -symbol circle -colour red   -type both
29$p dataconfig ode45  -symbol plus   -colour blue  -type both
30$p dataconfig ode113 -symbol cross  -colour green -type both
31
32#       Model results             Measurements to compare them with
33$p plot {ode23  {1.26e-2 2.41e-1 3.74e-2 3.37e0 1.44e-1 5.06e-1}
34         ode45  {6.20e-3 1.53e-1 5.00e-2 6.45e0 1.56e-1 1.07e0}
35         ode113 {1.56e-2 1.97e-1 6.68e-2 7.86e0 3.76e-2 1.50e0}}
36
37$p legend ode23  ode23
38$p legend ode45  ode45
39$p legend ode113 ode113
40