reconsider x = the Element of SCM-Data-Loc as Object of SCMPDS ;
take x ; :: thesis: x is Int-like
thus x is Int-like ; :: thesis: verum