RosettaCodeData/Task/Function-definition/Tcl/function-definition-1.tcl

4 lines
66 B
Tcl

proc multiply { arg1 arg2 } {
return [expr {$arg1 * $arg2}]
}