take
CatStr(# {0},{1},(1 :-> 0),(1 :-> 0),((1,1) :-> 1),(0 :-> 1) #)
; ( not CatStr(# {0},{1},(1 :-> 0),(1 :-> 0),((1,1) :-> 1),(0 :-> 1) #) is void & not CatStr(# {0},{1},(1 :-> 0),(1 :-> 0),((1,1) :-> 1),(0 :-> 1) #) is empty )
thus
( not CatStr(# {0},{1},(1 :-> 0),(1 :-> 0),((1,1) :-> 1),(0 :-> 1) #) is void & not CatStr(# {0},{1},(1 :-> 0),(1 :-> 0),((1,1) :-> 1),(0 :-> 1) #) is empty )
; verum