Re: [ns] Setting bound variables during simulation

[Debojyoti Dutta <ddutta@ISI.EDU>]

Please let us know the errors you are getting. 

Debo

On Wed, 30 May 2001, Benoit Pinguet wrote:

> Could someone explain to me why this simple Tcl script is not working, loss rate is always equal to 0:
> 
> #Create a simulator object
> set ns [new Simulator]
> 
> #Create two nodes
> set n0 [$ns node]
> set n1 [$ns node]
> 
> #Create a duplex link between the nodes
> $ns duplex-link $n0 $n1 1Mb 100ms DropTail
> 
> # create a loss_module
> set loss_module [new ErrorModel]
> 
> # optional:  set the unit and random variable
> $loss_module unit pkt           
> $loss_module ranvar [new RandomVariable/Uniform]
> 
> # set target for dropped packets
> $loss_module drop-target [new Agent/Null]
> 
> #insert the loss module in the link
> #$ns lossmodel $loss_module $n0 $n1
> 
> for {set j 1} {$j <= 25} {incr j} {
>  
>  $ns at [expr $j] "$loss_module set rate_ [expr 0.01*$j]"
>  $ns at [expr 0.1+$j] "puts \"loss rate set to [$loss_module set rate_]%\""
> }
> 
> $ns run
> 
> Thank you very much for your help
> 
> BP
>