Five?

  one [two] three [four] five

  one [two [three] four] five

    if {[llength $b] == 0} {
	return $a
    }