Evaluated proc fibo(r) {x} {expr {$x<2? $x: [fibo(r) [- $x 1]] + [fibo(r) [- $x 2]]}}
Evaluated proc fibo {x} {expr {$x<2? $x: [fibo(r) [incr $x -1]] + [fibo [- $x 2]]}}
Evaluated rename fibo {} ; rename fibo(r) {}