v input view
Width returns the number of columns in v.
set v [view {A B} def {a b}] view $v width 2 view $v get @ # 2
2