read l set a (string sub -s 2 -l 1 $l) set b (string sub -s 3 -l 1 $l) if test $a = $b string sub -s 2 -l 1 $l else string sub -s 5 -l 1 $l end read l set a (string sub -s 2 -l 1 $l) set b (string sub -s 3 -l 1 $l) if test $a = $b string sub -s 2 -l 1 $l else string sub -s 5 -l 1 $l end read l set a (string sub -s 2 -l 1 $l) set b (string sub -s 3 -l 1 $l) if test $a = $b string sub -s 2 -l 1 $l else string sub -s 5 -l 1 $l end read l set a (string sub -s 2 -l 1 $l) set b (string sub -s 3 -l 1 $l) if test $a = $b string sub -s 2 -l 1 $l else string sub -s 5 -l 1 $l end read l set a (string sub -s 2 -l 1 $l) set b (string sub -s 3 -l 1 $l) if test $a = $b string sub -s 2 -l 1 $l else string sub -s 5 -l 1 $l end read l set a (string sub -s 2 -l 1 $l) set b (string sub -s 3 -l 1 $l) if test $a = $b string sub -s 2 -l 1 $l else string sub -s 5 -l 1 $l end read l set a (string sub -s 2 -l 1 $l) set b (string sub -s 3 -l 1 $l) if test $a = $b string sub -s 2 -l 1 $l else string sub -s 5 -l 1 $l end read l set a (string sub -s 2 -l 1 $l) set b (string sub -s 3 -l 1 $l) if test $a = $b string sub -s 2 -l 1 $l else string sub -s 5 -l 1 $l end read l set a (string sub -s 2 -l 1 $l) set b (string sub -s 3 -l 1 $l) if test $a = $b string sub -s 2 -l 1 $l else string sub -s 5 -l 1 $l end read l set a (string sub -s 2 -l 1 $l) set b (string sub -s 3 -l 1 $l) if test $a = $b string sub -s 2 -l 1 $l else string sub -s 5 -l 1 $l end read l set a (string sub -s 2 -l 1 $l) set b (string sub -s 3 -l 1 $l) if test $a = $b string sub -s 2 -l 1 $l else string sub -s 5 -l 1 $l end read l set a (string sub -s 2 -l 1 $l) set b (string sub -s 3 -l 1 $l) if test $a = $b string sub -s 2 -l 1 $l else string sub -s 5 -l 1 $l end read l set a (string sub -s 2 -l 1 $l) set b (string sub -s 3 -l 1 $l) if test $a = $b string sub -s 2 -l 1 $l else string sub -s 5 -l 1 $l end read l set a (string sub -s 2 -l 1 $l) set b (string sub -s 3 -l 1 $l) if test $a = $b string sub -s 2 -l 1 $l else string sub -s 5 -l 1 $l end read l set a (string sub -s 2 -l 1 $l) set b (string sub -s 3 -l 1 $l) if test $a = $b string sub -s 2 -l 1 $l else string sub -s 5 -l 1 $l end read l set a (string sub -s 2 -l 1 $l) set b (string sub -s 3 -l 1 $l) if test $a = $b string sub -s 2 -l 1 $l else string sub -s 5 -l 1 $l end read l set a (string sub -s 2 -l 1 $l) set b (string sub -s 3 -l 1 $l) if test $a = $b string sub -s 2 -l 1 $l else string sub -s 5 -l 1 $l end read l set a (string sub -s 2 -l 1 $l) set b (string sub -s 3 -l 1 $l) if test $a = $b string sub -s 2 -l 1 $l else string sub -s 5 -l 1 $l end read l set a (string sub -s 2 -l 1 $l) set b (string sub -s 3 -l 1 $l) if test $a = $b string sub -s 2 -l 1 $l else string sub -s 5 -l 1 $l end read l set a (string sub -s 2 -l 1 $l) set b (string sub -s 3 -l 1 $l) if test $a = $b string sub -s 2 -l 1 $l else string sub -s 5 -l 1 $l end read l set a (string sub -s 2 -l 1 $l) set b (string sub -s 3 -l 1 $l) if test $a = $b string sub -s 2 -l 1 $l else string sub -s 5 -l 1 $l end read l set a (string sub -s 2 -l 1 $l) set b (string sub -s 3 -l 1 $l) if test $a = $b string sub -s 2 -l 1 $l else string sub -s 5 -l 1 $l end read l set a (string sub -s 2 -l 1 $l) set b (string sub -s 3 -l 1 $l) if test $a = $b string sub -s 2 -l 1 $l else string sub -s 5 -l 1 $l end read l set a (string sub -s 2 -l 1 $l) set b (string sub -s 3 -l 1 $l) if test $a = $b string sub -s 2 -l 1 $l else string sub -s 5 -l 1 $l end read l set a (string sub -s 2 -l 1 $l) set b (string sub -s 3 -l 1 $l) if test $a = $b string sub -s 2 -l 1 $l else string sub -s 5 -l 1 $l end read l set a (string sub -s 2 -l 1 $l) set b (string sub -s 3 -l 1 $l) if test $a = $b string sub -s 2 -l 1 $l else string sub -s 5 -l 1 $l end read l set a (string sub -s 2 -l 1 $l) set b (string sub -s 3 -l 1 $l) if test $a = $b string sub -s 2 -l 1 $l else string sub -s 5 -l 1 $l end read l set a (string sub -s 2 -l 1 $l) set b (string sub -s 3 -l 1 $l) if test $a = $b string sub -s 2 -l 1 $l else string sub -s 5 -l 1 $l end read l set a (string sub -s 2 -l 1 $l) set b (string sub -s 3 -l 1 $l) if test $a = $b string sub -s 2 -l 1 $l else string sub -s 5 -l 1 $l end read l set a (string sub -s 2 -l 1 $l) set b (string sub -s 3 -l 1 $l) if test $a = $b string sub -s 2 -l 1 $l else string sub -s 5 -l 1 $l end read l set a (string sub -s 2 -l 1 $l) set b (string sub -s 3 -l 1 $l) if test $a = $b string sub -s 2 -l 1 $l else string sub -s 5 -l 1 $l end read l set a (string sub -s 2 -l 1 $l) set b (string sub -s 3 -l 1 $l) if test $a = $b string sub -s 2 -l 1 $l else string sub -s 5 -l 1 $l end