Number virtual: sgn
    self isPositive
       ifTrue: [ self ==0 ifTrue: [ 0 ] else: [ 1 ] ]
       else: [ -1 ] ;