[ns] Probleme with wireless1.tcl

[abassi ghassen]

I tried to simulate wireless1.tcl but i have this message:

num_nodes is set 3
warning: Please use -channel as shown in tcl/ex/wireless-mitf.tcl
invalid command name "-Channel/WirelessChannel"
    while executing
"-Channel/WirelessChannel create _o13 "
    invoked from within
"catch "$className create $o $args" msg"
    invoked from within
"if [catch "$className create $o $args" msg] {
if [string match "__FAILED_SHADOW_OBJECT_" $msg] {
delete $o
return ""
}
global errorInfo
error "class $..."
    (procedure "new" line 3)
    invoked from within
"new $channelType_"
    (procedure "_o3" line 44)
    (Simulator node-config line 44)
    invoked from within
"$ns_ node-config -adhocRouting $val(adhocRouting) \
                 -llType $val(ll) \
                 -macType $val(mac) \
                 -ifqTyp..."
    (file "wireless1.tcl" line 60)

thanks
-- 
Ghassen Abassi