# Create the list of BrowseEntry boxes for the right frame
	for (1..5) {
		
	    $type_e[$_] = $right_frame_bottom->BrowseEntry(
		-variable  => \$type[$_],
		-listwidth => '45',
		-width     => 20,
		-choices   => [@type],
	    )->pack(-side => 'top', -pady => '3');
	}