:: deftheorem Def1 defines INT- MESFUNC1:def 1 :
for b1 being Subset of REAL holds
( b1 = INT- iff for r being Real holds
( r in b1 iff ex k being Element of NAT st r = - k ) );