Set up width and height tcl tk main window
itk_option add hull.width hull.height
$itk_component(hull) configure -width 1050 -height 868
wm minsize [winfo toplevel $itk_component(hull)] 1050 868
pack propagate $itk_interior 0
itk_option add hull.width hull.height
$itk_component(hull) configure -width 1050 -height 868
wm minsize [winfo toplevel $itk_component(hull)] 1050 868
pack propagate $itk_interior 0