#!/usr/bin/tclsh
### TCP vs. AIMD, 16 flows of each.  Plot the throughput for each flow.
### RED, ECN. 
set ctr [lindex $argv 0]
set increase [lindex $argv 1]
set decrease [lindex $argv 2]
set rate [lindex $argv 3]
set queue [lindex $argv 4]
set stoptime [lindex $argv 5]
eval "exec sed \"s/270/$ctr/g\" < graphs/s0.270.two.mf | sed \"s/15:30/[expr $stoptime/2]:[expr $stoptime/2+20]/\" | sed \"s/-2:40/-2:80/\" > graphs/s$ctr.mf1"
eval "exec sed \"s/s0/s$ctr/g\" < graphs/s0.12.mf | sed \"s/QUEUE/$queue/\" \
 | sed \"s/RATE/$rate/\" > graphs/s$ctr.mf"