Integer >> fibBinetFloatE |phi rPhi| phi := FloatE phi. rPhi := 1 / phi. ^ (1 / 5 sqrt) * ((phi raisedTo:self) - (rPhi raisedTo:self))