3 lines
112 B
Tcl
3 lines
112 B
Tcl
# "John Miller"
|
|
set dad "$family(father) $family(lastname)"
|
|
set second_daughter [lindex $family(daughter) 1]
|