set u "abcbdab"
set v "bdcaba"
puts "SCS($u,$v) = [scs $u $v]"