Check the object is a TKCat object
is.TKCat(x)
x
any object
A single logical: TRUE if x is a TKCat object