        X = 3.89672
        I = X
        WRITE (6,*) I
        STOP
        END
