4 lines
81 B
Tcl
4 lines
81 B
Tcl
% set mult23 [multiplier 2 3]
|
|
apply {{ab m} {expr {$ab*$m}}} 6
|
|
% {*}$mult23 5
|
|
30
|