4080 IF IFT=4 THEN X=LOG(X)