A-M baby
This commit is contained in:
parent
764da6cbbb
commit
db842d013d
19005 changed files with 197040 additions and 7 deletions
4
Task/Map-range/Tcl/map-range-2.tcl
Normal file
4
Task/Map-range/Tcl/map-range-2.tcl
Normal file
|
|
@ -0,0 +1,4 @@
|
|||
interp alias {} demomap {} rangemap {0 10} {-1 0}
|
||||
for {set i 0} {$i <= 10} {incr i} {
|
||||
puts [format "%2d -> %5.2f" $i [demomap $i]]
|
||||
}
|
||||
Loading…
Add table
Add a link
Reference in a new issue