#!/usr/bin/tclsh
### TCP vs. AIMD, 16 flows of each.  Plot the throughput for each flow.
set ctr [lindex $argv 0]
set k 0
while {$k < 32} {
 eval "exec graphs/plottrace10.tcl graphs/s$ctr.$k > graphs/s$ctr.10.$k"
 set k [expr $k+1]
}