_isModel
This produces Yes if the received Thing is a Model.
--
Function
THING -> _isModel -> Yes or No
