3 lines
63 B
Tcl
3 lines
63 B
Tcl
set u "abcbdab"
|
|
set v "bdcaba"
|
|
puts "SCS($u,$v) = [scs $u $v]"
|
set u "abcbdab"
|
|
set v "bdcaba"
|
|
puts "SCS($u,$v) = [scs $u $v]"
|