source tb_compat.tcl set ns [new Simulator] set node1 [$ns node] set node2 [$ns node] # Network. set lan0 [$ns make-lan "$node1 $node2 " 100Mb 0ms] $ns rtproto Static $ns run