prog def multiply, return
	args a b
	return sca product=`a'*`b'
end

multiply 77 13
di r(product)