MModelQ

MModelQ[ expr ]
returns True if expr is a model set with head MModel, and False otherwise.