Posted to tcl by alex at Sat Jul 28 17:11:17 GMT 2007view pretty

package provide t 1

namespace eval t {

proc t0 {} {return t}
proc t1 {} {return [t0]}
proc t2 {} {return [t1]}
proc t3 {} {return [t2]}
proc t4 {} {return [t3]}
proc t5 {} {return [t4]}
proc t6 {} {return [t5]}
proc t7 {} {return [t6]}
proc t8 {} {return [t7]}
........
........
........
proc t987 {} {return [t986]}
proc t988 {} {return [t987]}
proc t989 {} {return [t988]}
proc t990 {} {return [t989]}
proc t991 {} {return [t990]}
proc t992 {} {return [t991]}
proc t993 {} {return [t992]}
proc t994 {} {return [t993]}
proc t995 {} {return [t994]}
proc t996 {} {return [t995]}
proc t997 {} {return [t996]}
proc t998 {} {return [t997]}

}