character s*8
2 read'(a)',s
print*,merge(s(2:2),s(5:5),s(3:3)==s(2:2))
goto2
end