Class Float
back
+ arg
^ arg addToFloat: self