1proc hello {} {
 2    puts "Hello, World!"
 3}
 4
 5proc add {a b} {
 6    return [expr {$a + $b}]
 7}
 8
 9proc complex_proc {name {age 0} args} {
10    puts "Name: $name, Age: $age, Args: $args"
11}