1 | # simple DETER topology federated to a desktop |
---|
2 | # |
---|
3 | |
---|
4 | set ns [new Simulator] |
---|
5 | source tb_compat.tcl |
---|
6 | |
---|
7 | set a [$ns node] |
---|
8 | set b [$ns node] |
---|
9 | tb-set-node-testbed $a "deter" |
---|
10 | |
---|
11 | tb-set-node-testbed $b "desktop" |
---|
12 | |
---|
13 | set link0 [ $ns duplex-link $a $b 100Mb 0ms DropTail] |
---|
14 | |
---|
15 | $ns rtproto Static |
---|
16 | $ns run |
---|
17 | |
---|
18 | |
---|
19 | |
---|